|
|
#1 |
|
Участник
|
Всем добрый день!
Мой вопрос связан с открытием файла из navision. Файл открываю так: CREATE(ShellEx); ShellEx.Open('file name'); CLEAR(ShellEx); где ShellEx это (Automation - 'Microsoft Shell Controls And Automation'.Shell) может быть кто-то знает, как сделать проверку на открытие файла. То есть, если файл не открыт или не найден, то выдается ошибка.. Все заранее спасибо! |
|
|
|
|
#2 |
|
Участник
|
Сначала проверьте средствами Nav что файл есть и открывается
Код: IF File.OPEN('file name') THEN BEGIN
CREATE(ShellEx);
File.CLOSE;
ShellEx.Open('file name');
CLEAR(ShellEx);
END; |
|
|
|
|
#3 |
|
Участник
|
Еще можно так
Код: Name DataType Subtype Length
Folder Automation 'Microsoft Shell Controls And Automation'.Folder3
FolderItem Automation 'Microsoft Shell Controls And Automation'.FolderItem2
FolderItem := Folder.ParseName(fileName);
IF NOT ISCLEAR(FolderItem ) THEN
FolderItem.InvokeVerbEx('open'); |
|
|