Fungsi :
ComboBox1.Items.Add();
Contoh Penggunaan :
ComboBox1.Items.Add(‘Item A’);
ComboBox1.Items.Add(‘Item B’);ComboBox1.Items.Add(‘Item C’);
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 }
Masalah : entrian tidak boleh di isi dengan spasi
Fungsi :
StringReplace();
Contoh Penggunaan :
NoMemo=StringReplace(EditNoMemo.Text,' ','',[rfReplaceAll]);