Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Новый участник


Сообщения: 5
Благодарности: 0

Профиль | Отправить PM | Цитировать


Код: Выделить весь код
$filename = FileOpenDialog( "Выберите файл.", " ", "My Files (*.*)", 1 + 4 )
$file = FileOpen($filename, 0)
; Проверить открытие файла
If $file = -1 Then
     MsgBox(0, "Error", "Не могу открыть файл.")
     Exit
EndIf
FileSaveDialog( "Сохраните файл", " ", "My Files (*.*)", 1 + 4 + 8 + 16 )
 
Msgbox(0, "", "Готово")
при выборе или сохранение файла, окно пропадает иногда не успевая выбрать файл, и прога закрывается.
это код просто для примера.

Отправлено: 19:54, 31-03-2009 | #6