[7ion.]

здорово) я как то сам не подумал что оно-то выполняется, но просто сразу завершается. кстати, чтобы ждать нажатие кнопки юзаю более простую конструкцию:

cmdOk:=CreateCommand('OK',CM_OK,1); 
    addCommand(cmdOK); 
    repeat  
    delay(100); 
    until getClickedCommand <> emptyCommand; 


но вот опять вопрос как работать с Goto? я слышал что нужно поставить якорь

yakor: 


где надо, а когда надо на него перейти, то написать

Goto yakor 


Заюзал эту конструкцию в попытке перейти с кнопки на меню

ty:
    showMenu('Simple Antivirus 2009', CH_IMPLICIT);
    about := menuAppendStringImage('О программе', loadImage('/exit.png'));
    exit := menuAppendStringImage('Выход', loadImage('/exit.png')); 
    okCommand2 := createCommand('Выбор', CM_OK, 1);
    addCommand(okCommand2); 
     while (getClickedCommand <> okCommand2) do 
      delay(100);
      showForm;
    if menuGetSelectedIndex = about then
    begin
    clearForm;
    setTicker('О программе');
    cmdOk:=CreateCommand('OK',CM_OK,1); 
    addCommand(cmdOK); 
    repeat  
    delay(100); 
    until getClickedCommand <> emptyCommand;
    GoTo ty 
    end
    if menuGetSelectedIndex = exit then halt;
  end. 


но компилятор не понимает ty:
Почему?