>Jeg har et problem med en listbox... Jeg vil gerne kunne fyre noget kode af,
>når man klikker på et element i Listboxen. F.eks. Hvis Man klikker på
>Elementet "Adresse" skal der skrived noget i en Memo eller noget andet...
>Kan nogen hjælpe?
Så vidt jeg forstår, så er problemet at identificere hvilket item
brugeren har valgt? Det kan du finde ud af ved, at løbe alle items
igennem, indtil du finder det der valgt. Virker selvfølgelig bedst
hvis MultiSelect er False.
procedure TForm1.ListBox1Click(Sender: TObject);
var
iIndex: Integer;
begin
for iIndex := 0 to ListBox1.Items.Count - 1 do
if ListBox1.Selected[iIndex] = True then
Break;
Edit1.Text := ListBox1.Items[iIndex];
end;
Ovenstående eksempel kopierer item-teksten fra listboksen over i et
edit-felt. Med lidt omskrivning burde du kunne få koden tilpasset til
dit behov... Ellers spørg igen. :)
Mvh, Claus Nielsen
--
e-mail: cnn@post6.tele.dk
homepage:
http://home6.inet.tele.dk/cnn