Minggu, 11 Maret 2012

Memanggil Form Child Delphi

Form Child merupakan peranakan dari Main Form delphi, biasanya digunakan untuk menampilkan form dalam form main...
berikut ini tips untuk menampilkan form child pada delphi.




procedure TMainForm.Button1Click(Sender: TObject);
var FHutangCustomer:TFHutangCustomer;
begin
pesan:='Hutang Customer';
FHutangCustomer := TFHutangCustomer(Application.FindComponent('FHutangCustomer'));
if FHutangCustomer = nil then
  begin
  FHutangCustomer := TFHutangCustomer.Create(application);
  FHutangCustomer.Caption := 'Hutang Customer';
  FHutangCustomer.Show;
  end
else
  FHutangCustomer.Show;
  end;


semoga bermanfaat...

Tidak ada komentar:

Posting Komentar

10 Fitur Ios 9

10 Fitur Terbaik dari iOS 9 Acara WWDC 2015 kemarin Apple telah memperkenalkan iOS 9. Untuk kalian yang kemarin tidak memiliki kesemp...