Не закрывается интерфей по условию.

DarkAngel27 · Сообщение **DarkAngel27** » 29 авг 2005, 11:10

cmInit:
   {
    ...
    if getlast spsopr=tsOK then dat := spsopr.dsopr else 
	begin
	      message('Данные не обнаружены !!!',2);
                      CloseInterface(cmOK);
                end;
    ...
    }

Почему Если записей нет, то интерфейс не закрывается по CloseInterface?
Атлантис 3.03.22...

m0p3e · Сообщение **m0p3e** » 29 авг 2005, 12:22

CloseInterface(cmOK);
замени на Abort;

DarkAngel27 · Сообщение **DarkAngel27** » 29 авг 2005, 14:02

Пробовал, не помогло...

oiko · Сообщение **oiko** » 29 авг 2005, 14:16

А если так:
abort;
closeinterface(0);

DarkAngel27 · Сообщение **DarkAngel27** » 29 авг 2005, 15:19

Все равно не хочет закрываться.

Max_Fin · Сообщение **Max_Fin** » 29 авг 2005, 16:11

Код: Выделить всё

if ....
{
  abort;
  exit;
}

по-любому

DarkAngel27 · Сообщение **DarkAngel27** » 29 авг 2005, 18:07

Код: Выделить всё
if .... 
{ 
  abort; 
  exit; 
} 
по-любому

Заработало. Спасибо.