Einzelnen Beitrag anzeigen

eric - the master

Registriert seit: 15. Mär 2009
Ort: Radeberg
6 Beiträge
 
#11

Re: zusatzinformationen in tlistbox

  Alt 28. Apr 2009, 21:43
Zitat von taaktaak:
das ist es auch nicht ...

Delphi-Quellcode:
procedure TfoTest11.FormShow(Sender:TObject);
var i : Integer;
    Str : String;
begin
  for i:=0 to 9 do begin
   Str:='hihihihi';
   Listbox1.Items.AddObject('Hallo'+IntToStr(i),Pointer(Str))
   end;

end;

procedure TfoTest11.ListBox1DblClick(Sender:TObject);
begin
  ShowMessage(String(Listbox1.Items.Objects[Listbox1.ItemIndex]))
end;
DANKEEEEE!!!!!!!! an alle

taaktaak ich glaub das ist genau das was ich schön vergeblich im ganzen Internet gesucht habe. Einfach und verständlich. Sehr schön

Fazit: es ist nicht so komplexx wie in den anderen beispielen und für mich besser zu verstehen, da ich noch nicht so ein pro bin thx
------------------------------------------------------------------------------


my webpage(noch in arbeit): erickaden.funpic.de
  Mit Zitat antworten Zitat