D danliyou Unregistered / Unconfirmed GUEST, unregistred user! 2002-03-05 #1 如果循环还没结束，如何跳出执行另外一个事件？ 谢谢！！！
X xwings Unregistered / Unconfirmed GUEST, unregistred user! 2002-03-05 #2 application.processmessage. call some function setSomeEvent break
D D影子D Unregistered / Unconfirmed GUEST, unregistred user! 2002-03-05 #3 用goto语句！ 如 label 1; var i:integer; begin for i:=0 to 10 do if i=2 then goto 1; 1:showmessage('ok'); end;
用goto语句！ 如 label 1; var i:integer; begin for i:=0 to 10 do if i=2 then goto 1; 1:showmessage('ok'); end;
