Membuat object Runtime pada Delphi
Berikut adalah code untuk membuat sebuah object pada borland delphi ketika runtime dikondisikan seperti berikut : 1. buatlah satu aplikasi baru dimana terdapat satu form sebut saja form1 2. buatlah satu button yang diletakan diatas form1 dengan nama button1 3. kemudian untuk contoh kita akan membuat tombol baru lengkap dengan event didalamnya 4. sebelumnya kita buat terlebih dahulu procedure untuk mengisi event dari object yang akan kita buat seperti berikut ini. procedure TForm1.ClickShowMessage(Sender: TObject); begin ShowMessage('Hello World !'); end; 5. ketikan coding berikut pada event onclick dari button1 procedure TForm1.Button1Click(Sender: TObject); var button: TButton; begin button := TButton.Create(Self); with button do begin Top := Button1.Top; Width := Button1.Width; Left := Button1.Left+Width; Caption := 'Button '+ IntToStr(Self.ControlCount+1); Parent := Self; OnClick := ClickShowMessage; //memanggil proce...