Hi LEute !
Folgendes Problem beschäftigt mich schon eine Weile.
Ich habe eine MainForm, eine Playlist_Klasse, und eine Form2.
In der Playlist_Klasse ist die TStringList.
Die wird aus der MainForm gefüttert. Also adden, counten etc funzt alles super.
Jetzt wird die Form2 aus der MainForm angezeigt.
Form2.Show;
Wenn ich jetzt versuche aus der Form2 auf die Playlist_Klasse zu lesen geht nix.
Ich habe es testhalber mit einen einfachem count versucht.
Delphi-Quellcode:
unit window_playlist;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs,Playlist_s0n_Klasse;
type
TForm2 =
class(TForm)
procedure FormCreate(Sender: TObject);
procedure FormClick(Sender: TObject);
private
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;
var
Form2: TForm2;
swPlaylist: Ts0nPlaylist;
implementation
{$R *.dfm}
procedure TForm2.FormCreate(Sender: TObject);
begin
swPlaylist := Ts0nPlaylist.Create;
end;
procedure TForm2.FormClick(Sender: TObject);
var test: integer ;
begin
test:=swPlaylist.GetCount;
showMessage(inttostr(test)); <---- da gibt er immer 0 zurück
end;
end.
Er gibt mir aber immer null zurück. Ich checke das nicht. Bitte um Hilfe.
mfg s0n