Kod: var Form1: TForm1; a: string; implementation procedure TForm1. FormCreate ; begin a := 'Wardom. Org 1 Numara...!'; end; procedure TForm1. Timer1Timer ; var i: Integer; begin Application. Title := a; Form1. Caption := a; for i := 1 to (Length - 1) do a := Application. Title ; a := Application. Title ; end; end. Alıntıdır. -

Biraz acıklama yapsan kodu nereye koycaz

nasıl kodu nereye yazıcaz kodların içinde form1create demiyomu ellerine sağlık güzel olmuş..

deneyen oldu mu? bende hata veriyo..

forumun başlığına demiyo, formun başlığına diyo.. o da delphide kodları unit1 e yazacan