Forum: Object-Pascal / Delphi-Language
Delphi
by marabu,
2. Dez 2005
Hallo.
Kein Wunder, dass alles immer das gleiche ist - ist ja auch immer das gleiche Objekt.
// ...
for i := 0 to Items.Count-1 do
begin
if countMP3s(addSlash(currDir+getNodePath(Items))) > 0 then
begin
Forum: Object-Pascal / Delphi-Language
Delphi
by marabu,
1. Dez 2005
Noch besser so:
type
Tm3u = class(TObject)
dir : String;
list : TStringList;
constructor Create;
destructor Destroy; override;
end;
Forum: Object-Pascal / Delphi-Language
Delphi
by marabu,
1. Dez 2005
Hallo eyeless,
wenn du im constructor deiner Klasse zuerst inherited Create aufrufst, dann sollte es klappen.
Grüße vom marabu