Hjælp til program

Tags:    delphi

Hej allesammen.

Jeg er ved at lave et program, hvor man kan søge på nogle personer eller man kan vælge fra en Listbox.
Men jeg mangler koden til at søge.
Og så skal man kunne trykke på nogle personer i listboxen og så popper der et vindue, med informationer op...

Og så skulle man gerne kunne tilføje navnene til en liste som man senere kan se for sig selv.
Den ved jeg heller ikke hvordan man skal lave!

Jeg ved ikke så meget om det med koderne (som I kan se) men hvis jeg ikke spørger blvier jeg aldrig klogere! =)
Håber der er nogle der kan/vil hjælpe

Hvis det kan hjælpe vil jeg da gerne gå af med nogle UP...!



Hej allesammen.

Jeg er ved at lave et program, hvor man kan søge på nogle personer eller man kan vælge fra en Listbox.
Men jeg mangler koden til at søge.
Og så skal man kunne trykke på nogle personer i listboxen og så popper der et vindue, med informationer op...

Og så skulle man gerne kunne tilføje navnene til en liste som man senere kan se for sig selv.
Den ved jeg heller ikke hvordan man skal lave!

Jeg ved ikke så meget om det med koderne (som I kan se) men hvis jeg ikke spørger blvier jeg aldrig klogere! =)
Håber der er nogle der kan/vil hjælpe

Hvis det kan hjælpe vil jeg da gerne gå af med nogle UP...!



Svar1:

If (Pos(edit1.Text,edit2.Text > 0) then
begin
end;

Svar2:

var
MyList: TStringList;
Index: Integer;
begin
MyList := TStringList.Create;
try
MyList.Add('Test1');
MyList.Add('Test2');
MyList.Add('Test3');
ListBox1.Items.AddStrings(MyList);
Label1.Caption := IntToStr(Index);
end;
finally
MyList.Free;
end;





t