попробовал через алерт... работает... не совсем как надо )) прога зациклилась...
repeat
delay(100);
clicked := getClickedCommand;
until clicked <> emptyCommand;
........................................
if lo<>0 then
begin
showAlert('Ошибка', 'ОШИБКА в строке:'+chr(10)+rtm[rt]+' '+n3[n], loadImage('/icon.png'), ALERT_INFO);
delay(3000);
showForm;
aax; // возврат в начало всей этой процедуры
end;
вот у меня и прыгает теперь, то одно показывает то другое... на сколько я понимаю это из-за того что "команда включена"? поэтому постоянно само проходит дальше? как обнулить тогда команду? пробовал чет не получилось ((
а, и ещё, в алерте иконку вставлять обязательно, а можно обойтись без неё? как?)
Решил кажись проблему, таким образом:
if lo<>0 then
begin
showAlert('Ошибка', 'ОШИБКА в строке:'+chr(10)+rtm[rt]+' '+n3[n], loadImage('/icon.png'), ALERT_INFO);
delay(3000);
showForm;
repeat
clicked := GetClickedCommand;
until clicked <> EmptyCommand;
aax;
end;
Возвращает обратно, всё как надо было ))
Вопрос с картинкой остался...