Einzelnen Beitrag anzeigen

mimi

Registriert seit: 1. Dez 2002
Ort: Oldenburg(Oldenburg)
2.008 Beiträge
 
FreePascal / Lazarus
 
#23

Re: StringList weiter reichen zur Eigentliche Klasse

  Alt 31. Okt 2007, 18:04
Das Seltsamme ist, so wird die richtige anzahl ausgeben.
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
begin
  PlayListeManger:=TPlaylistenManger.Create;
  PlayListeManger.PlayListItems:=ListBox1.Items;
  PlayListeManger.LoadFromFile('/media/hda7/Daten/music/entspannung.m3u');
  writeln(PlayListeManger.PlaylistItems.Count);
end;

// So aber nicht wird nur 0 Ausgeben.
procedure TForm1.SpeedButton5Click(Sender: TObject);
begin
  writeln(PlayListeManger.PlaylistItems.Count);
end;
Die Listbox ist aber gefüllt.
Michael Springwald
MFG
Michael Springwald,
Bitte nur Deutsche Links angeben Danke (benutzte überwiegend Lazarus)
  Mit Zitat antworten Zitat