CoderX :: Forums - Показать сообщение отдельно

alexteam · 03.02.2010, 15:37

delphi Код:

procedure OnTimer01(Sender: TObject);
 begin
 Timer01.interval := 1000+round(random(1000)); 
 case a of  
.....

03.02.2010, 15:37	#63
alexteam Рыцарь Регистрация: 07.03.2009 Сообщений: 9,139 Сказал Спасибо: 70 Имеет 2,820 спасибок в 1,735 сообщенях	delphi Код: procedure OnTimer01(Sender: TObject); begin Timer01.interval := 1000+round(random(1000)); case a of ..... __________________ L2Ext - project closed.