Also ich habe jetzt in der Playlist Klasse folgendes geschrieben
Delphi-Quellcode:
var Playlist: Ts0nPlaylist;
implementation
constructor Ts0nplaylist.Create;
begin
inherited create;
scPlayList := THashedStringList.Create;
scActTrackIndex:= 0;
end;
destructor Ts0nplaylist.Destroy;
begin
scPlaylist.Free;
inherited destroy;
end;
// eine menge Prozeduren und funktionen
initialization
Playlist := Ts0nPlaylist.Create;
finalization
FreeAndNil (Playlist);
end.
Wobei ich die initial.... auch diret in create schreiben könnte ( denke ich mal )
Ich habe es probiert so zu schreiben:
Delphi-Quellcode:
initialization
Playlist := Ts0nPlaylist.Create(Nil);
Da sagt er mir aber das ich zu viele PArameter angegeben habe.Ohne Nil nimmt er es an.
So nun aber zum eigentlichen. Es funzt irgendwie nicht. Ich kann aus der Form2
Unit alle propertys oder proceduren verwenden. Aber nicht aus der Mainform obwohl in Uses mit angewählt. DAs heißt, ich kann immernoch nicht von der Main FOrm und von Form2 auf die Playlist_Klasse zu greifen.