Friday, April 26, 2013

Menambahkan item pada ComboBox Delphi

Fungsi :
ComboBox1.Items.Add();
Contoh Penggunaan :
ComboBox1.Items.Add(‘Item A’);
ComboBox1.Items.Add(‘Item B’);ComboBox1.Items.Add(‘Item C’);

Thursday, April 25, 2013

DELPHI : Merubah Isi Caption Pada Button di Message DIalog


Berikut ini codingya :
function MyMessageDialog(const Msg: string; DlgType: TMsgDlgType;
  Buttons: TMsgDlgButtons; Captions: array of string): Integer;
var
  aMsgDlg: TForm;
  i: Integer;
  dlgButton: TButton;
  CaptionIndex: Integer;
begin
  { Create the Dialog }

Tuesday, April 23, 2013

DELPHI : Menghilangkan Spasi Pada Teks

Masalah : entrian tidak boleh di isi dengan spasi
Fungsi : 
StringReplace();
Contoh Penggunaan : 
NoMemo=StringReplace(EditNoMemo.Text,' ','',[rfReplaceAll]);

Referensi : click