Здраствуйте у меня вопросик! Написал код и при определенных условиях
я хочу чтобы приложение не закрывалось а просто ничего не делало(просто ждало).
у меня в коде если уберу Application.terminate то программа перескакиевает на нижнюю строку. а мне надо чтобы програма не выполняла следующую строку (формирование файла)
как это реализовать,подскажите пожалуста
| Код |
if Card='0' then
begin
ShowMessage('МПК для приема нет');
//Application.Terminate; и тут мы ничего не делаем
end;
DateNow:=Now;
TimeFile:=DateTimeToStr(DateNow);
ChDir(DirOut);
TimeFile:=Copy(TimeFile,7,4)+Copy(TimeFile,4,2)+Copy(TimeFile,1,2);
FileName:=TimeFile+'.'+Vedomost;
if FileExists(filename) then
//если файл существует говорим
begin
ShowMessage ('Файл '+DirOut+'\' +FileName + ' уже существует'+'- Приймите меры ');
// вот тут мы ничего не делаем
//Application.Terminate;
end;
|
|
)