Проверка существования файла... :(

← →
[BAD]Angel © (2003-10-30 23:07) [0]

Доброго времени суток мастера.

У меня ДУРАЦКИЙ вопрос:
запускается прога... проверяет существует ли файл... если нет, то
raise EFOpenError.CreateFmt(...)

а как сделать дальше, чтобы после нажатия на кнопку форма не открывалась... (т.е. программа прекращала свою работу)

← →
default © (2003-10-30 23:11) [1]

if not FileExist(YourFileName) then Application.Terminate

← →
Иван Шихалев © (2003-10-30 23:13) [2]

А может проще ее вообще не создавать?

← →
[BAD]Angel © (2003-10-30 23:13) [3]

это понятно! :)
а как вывести окно с собственным текстом, кнопкой и иконкой ОШИБКИ?

← →
Нурик © (2003-10-30 23:19) [4]

Application.MessageBox("Такой файл не существует!","Ошибка",MB_OK+MB_ICONERROR)

← →
Zacho © (2003-10-30 23:21) [5]

> [BAD]Angel © (30.10.03 23:13) [3]

RTFM Application.MesageBox

> RTFM Application.MesageBox

RTFM MessageBox

+MB_ICONERROR вот оно :)))

Спасибо!!!

Офф топик.

Проверка существования файла... :( Найти похожие ветки