Sabtu, 17 November 2012

LA : PENGENALAN DELPHI



Dapat didownload di https://www.dropbox.com/s/y0tgllv4desc5c4/1%20LAPORAN%20AKHIR%20Pengenalan%20Delphi.docx?dl=0

CODING                         

begin
edit4.Text:='Makanan yang di pesan = '+edit1.Text+ ', '+edit2.Text+' dan '+edit3.Text;
end;
begin
edit4.Text:='  ';edit3.Text:='  ';edit2.Text:=' ';edit1.Text:='  ';
end;
begin
application.Terminate;
end;
end.

LOGIKA                                   

  • Logika untuk button OK adalah isi edit 4 yang kosong di isi oleh string ‘Makanan yang di pesan = ‘ di tambahkan oleh isi pada edit1, tanda  koma ‘ , ‘ , isi pada edit2, string ‘dan’, kemudian isi pada edit3.
  • Logika untuk button CLEAR adalah isi pada edit4, edit3, edit2, dan edit1 di ganti dengan spasi ‘  ‘.
  • Logika untuk button END adalah untuk mengakhiri atau menutup program.

0 komentar:

Posting Komentar