Arsip: Create Form saat Runtime

more 13 years ago
uGLy
Allow semua?
Aku pemula banget neh dan bingung banget gimana caranya create form saat runtime?
Tolong ya mas sama contoh nya.... hik hik hik....

more 13 years ago
DelphiExpert
var Form: TMyForm;
begin
Form:= TMyForm.Create(Application);
Form.Show; // atau Form.ShowModal;
end;

more 13 years ago
ImanD
var Form: TForm;
begin
Form:= TForm.Create(Application);
Form.Show; // atau Form.ShowModal;
end;
gimana klo ini jalan ga?
more 13 years ago
uGLy
Naaah... kalo yg ini jalan! tp apa bedanya ya sama code nya DelphiExpert di atas?
Hanya beda TForm dan TmyForm.
Trus kalo mau secara otomastis nampilin form yang sudah ada gimana caranya ya?
masksud ku pada saat menuutama muncul, muncul juga Form yg uda dicreate saat design

more 13 years ago
ImanD
TForm itu ya bawaannya delphi klo TmyForm kudu di daftarin dulu yg seolah2 TmyForm=TForm {sorry lg males jelasin secara detail, xixixiix}
klo mo tampilin yg dah di desain ya tinggal di show az mis {Form1.Show}.
jd di FormShownya menuutama tulis Form1.Show {rebes kayaknya}

more 13 years ago
deLogic
bedanya ya di kelas-nya, kalo yang punya DE, variabel Form mengacu ke kelas TMyForm (yang kemungkinan besar adalah kelas turunan / buatan sendiri mbah DE), dan karena sifatnya adalah 'custom', maka ya harus ada terlebih dahulu, maslahnya dikau belum membuatnya / menyediakannya. Jadi ya error deh...
sedangkan kode dari bro ImanD, variabel Form mengaju pada kelas TForm, yang merupakan kelas form standar yg disediakan oleh Delphi.

more 13 years ago
DelphiExpert
daku tulis TMyForm utk meng-ilustrasikan form-class yg dikau pakai.
pada waktu design-time, me-rubah nama form otomatis akan membuat form-class baru sesuai dng nama form itu sendiri ditambahi embel2 T, misal defaultnya: - name: Form1; - class name menjadi: TForm1;
contoh ImanD menggunakan TForm bisa jalan dikarenakan semua turunan form dalam delphi defaultnya pasti turunan dari TForm. nah masalahnya form-class mana yg hendak dikau tampilkan (buat)? tergantung pada turunan form yg hendak ditampilkan :mrgreen:
misal dikau bikin form pembelian (sebut aja namanya FormPembelian sehingga class-form tsb menjadi TFormPembelian), maka coding dikau menjadi:
var Form: TForm; // atau me-reference langsung ke TFormPembelian, dng pertimbangan tidak perlu melakukan typecast utk mengakses property2 baru TFormPembelian
begin
Form:= TFormPembelian.Create(Application);
Form.Show; // atau ShowModal;
end;

more 13 years ago
uGLy
Ok thanks buat semuanya, maklum pemula banget neh tp uda rada ada ketangkep dikit... hik hik hik
tp untuk nampilin form secara otomatis tanpa meng-klik tombol masih belom bisa neh!
Instruksi " Form2.Show; " baru jalan kalo mengklik menu atau tombol kan?
Yang aku maksud, adalah pada saat menuutama nampil, Form2 juga nampil otomatis tanpa meng-klik apa2...
Gitu Bos....

more 13 years ago
julius
program Project1;
uses
Forms,
Unit1 in 'Unit1.pas' {Form1},
Unit2 in 'Unit2.pas' {Form2};
{$R *.res}
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.CreateForm(TForm2, Form2);
Form2.FormStyle:=fsStayOnTop;
Form2.Show;
Application.Run;
end.
more ...
- Pages:
- 1
- 2
reply |
Report Obsolete
Last Articles
- Project Group dalam Lazarus
- FastPlaz Database Explorer
- Release: FastPlaz Super Mom v0.12.22
- PascalClass #3: Web Development with Free Pascal
- Makna Pascal di Pascal Indonesia
- Kulgram : Instalasi Lazarus di Perangkat Berbasis ARM
- PascalClass #1: Analisa Database dan Machine Learning
- PascalTalk #6: (Podcast) Kuliah IT di luar negeri, susah gak sih?
- Mengenal OXYGENE – Pascal For .NET
- PascalTalk #5: UX: Research, Design and Engineer
Last Topic
- PascalTalk #6: (Podcast) Kuliah IT di luar negeri, susah gak sih?
by LuriDarmawan in Tutorial & Community Project more 3 months ago - PascalTalk #5: UX: Research, Design and Engineer
by LuriDarmawan in Tutorial & Community Project more 3 months ago - PascalTalk #4: Obrolan Ringan Seputar IT
by LuriDarmawan in Tutorial & Community Project more 4 months ago - PascalTalk #2: Membuat Sendiri SMART HOME
by LuriDarmawan in Tutorial & Community Project more 4 months ago - PascalTalk #3: RADically Fast and Easy Mobile Apps Development with Delphi
by LuriDarmawan in Tutorial & Community Project more 4 months ago - PascalTalk #1: Pemanfaatan Artificial Intelligence di Masa Covid-19
by LuriDarmawan in Tutorial & Community Project more 4 months ago - Tempat Latihan Posting
by LuriDarmawan in OOT more 1 years ago - Archive
- Looping lagi...
by idhiel in Hal umum tentang Pascal Indonesia more 8 years ago - [ask] koneksi ke ODBC user Dsn saat runtime dengan ado
by halimanh in FireBird more 8 years ago - Validasi menggunakan data tanggal
by mas_kofa in Hal umum tentang Pascal Indonesia more 8 years ago
Random Topic
- Rave di vista ultimate
by EkoIndri in Tip n Trik Pemrograman more 12 years ago - penambahan data pada grid
by ru_kd in Tip n Trik Pemrograman more 12 years ago - pengurangan jam/menit/detik
by esti_g in Hal umum tentang Pascal Indonesia more 12 years ago - Membagi gambar bitmap dalam kotak-kotak
by alfa1412 in Hal umum tentang Pascal Indonesia more 12 years ago - ActiveX FingerPrint SDK
by herux in Multimedia & Graphic Enhancement more 13 years ago - menjalankan dos command
by dinox in Tip n Trik Pemrograman more 15 years ago - Print MEMO............
by fissas in MySQL more 13 years ago - add 1 digit
by nurez in Tip n Trik Pemrograman more 13 years ago - Komponen Yang Bagus Buat Akses ke Firebird 2
by lord_kimm in FireBird more 14 years ago - Client Server pake dial-up
by kiki-Delphi in Network, Files, I/O & System more 14 years ago