Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- procedure TMainForm.Button1Click(Sender: TObject);
- begin
- ListBox1.Items.Add(Edit1.Text);
- ComboBox1.Items.Add(Edit1.Text);
- end;
- procedure TMainForm.Button2Click(Sender: TObject);
- begin
- ListBox1.Items.Delete(ListBox1.Selected.Index);
- ComboBox1.Items.Delete(ComboBox1.Items.IndexOf(ListBox1.Selected.Text));
- end;
Add Comment
Please, Sign In to add comment