![]() |
|
#1
|
|||
|
|||
![]() Доброго времени суток, читающий этот форум. Я понимаю что задаю откровенно ламерский вопрос но тем не менее =)
Есть код: Код:
var Form1: TForm1; Size: Integer; implementation {$R *.dfm} procedure TForm1.FormCreate(Sender: TObject); begin Size := 100; end; procedure TForm1.Timer1Timer(Sender: TObject); begin Size:= -1; Form1.Caption:= Size; end; Последний раз редактировалось Admin, 26.01.2009 в 21:50. |
#3
|
|||
|
|||
![]() Оппа
![]() |