dropdown box

Du kan bruge en combobox.
Her er 2 events, som du kan bruge:

procedure TForm1.Button1Click(Sender: TObject);
begin
{Her indlægger du det, som du vil have i boxen}
combobox1.Items.add('Dette er en ny');
end;

procedure TForm1.ComboBox1Click(Sender: TObject);
begin
{Her læser du fra boxen  - det der er klikket på }
edit1.text := combobox1.Text;
end;

Mvh
Pjotre

procedure TForm1.FormCreate(Sender: TObject);
begin
  combobox1.items.add('hej');
  combobox1.items.add('med');
  combobox1.items.add('dig');
end;

procedure TForm1.Combobx1Change(Sender: TObject);
begin
  if combobx1.text = 'hej' then
    //Gør et eller andet her.
 
  if combobox1.text = 'med' then
    //Gør et eller andet her.
 
  if combobox1.text = 'dig' then
    //Gør et eller andet her.
end;

procedure TForm1.Combobx1Change(Sender: TObject);
skal ændres til:

procedure TForm1.Combobox1Change(Sender: TObject);

:)