MEMBUAT PROGRAM BIAYA RUMAH SAKIT MENGGUNAKAN DELPHI 7
a Posted o 1. DESIGN FO 2. DESIGN PROPERTIES OBJECT NAME CAPTION Label 1 Label1 RUMAH SAKIT BAKTI INSANI Label 2 Label2 Kode Dokter Label 3 Label3 Nama Dokter Label 4 Label4 Spesialis Label 5 Label5 Biaya Periksa (RP) Label 6 Label6 Kode Obat Label 7 Label7 Nama Obat Label 8 Label8 Harga Obat (RP) Label 9 Label9 Uang Bayar (RP) Label 10 Label10 Kembali (RP) Combo Box cmbkode – Group Box GroupBox1 DATA OBAT Edit 1 Edokter – Edit 2 Espesialis – Edit 3 ebiaya – Edit 4 ekode – Edit 5 eobat – Edit 6 eharga – Edit 7 etotal – Edit 8 ebayar – Edit 9 ekembali – Button 1 btotal TOTAL Button 2 bkeluar &KELUAR Button 3 bbersih &BERSIH 3. LISTING PROGRAM procedure TFORMRS.FormCreate(Sender: TObject); begin cmbkode.Items.Add(‘DRD01 ’); cmbkode.Items.Add(‘DRJ02 ’); cmbkode.Items.Add(‘DRM03 ′); end; procedure TFORMRS.cmbkodeClick(Sender: TObject); begin if cmbkode.Text=’DRD01 ′ then begin edokter.Text:=’dr Okta’; espesialis....