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]);