dephi 怎么使编辑框中的文本加到ListBox里面？求助程序

去翻下书 ，伸手要答案不好，写个 bcb 你自己去转 delphi
void __fastcall TForm1::Button1Click(TObject *Sender)
{
    ListBox1->Items->Add(Edit1->Text);
}

ComboBox1.Items.Add(edt1.Text);
ComboBox1.ItemIndex:=ComboBox1.Items.Count-1;

lst1.Items.Add(edt1.Text);
lst1.ItemIndex:=lst1.Items.Count-1;