Страница 1 из 1

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

Добавлено: 29 авг 2005, 11:10
DarkAngel27

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

cmInit:
   {
    ...
    if getlast spsopr=tsOK then dat := spsopr.dsopr else 
	begin
	      message('Данные не обнаружены !!!',2);
                      CloseInterface(cmOK);
                end;
    ...
    }
Почему Если записей нет, то интерфейс не закрывается по CloseInterface?
Атлантис 3.03.22...

Добавлено: 29 авг 2005, 12:22
m0p3e
CloseInterface(cmOK);
замени на Abort;

Добавлено: 29 авг 2005, 14:02
DarkAngel27
Пробовал, не помогло...

Добавлено: 29 авг 2005, 14:16
oiko
А если так:
abort;
closeinterface(0);

Добавлено: 29 авг 2005, 15:19
DarkAngel27
Все равно не хочет закрываться.

Добавлено: 29 авг 2005, 16:11
Max_Fin

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

if ....
{
  abort;
  exit;
}
по-любому

Добавлено: 29 авг 2005, 18:07
DarkAngel27

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

if .... 
{ 
  abort; 
  exit; 
} 
по-любому
Заработало. Спасибо.