Hallo Sherlock,
ich habe mich vor langer Zeit mal mit dem generieren von Komponenten zur Laufzeit beschäftigt.
Ich muss doch eigentlich die erstellte Fastreport-Komponente beim Parent TForm1 eintragen oder?
Code:
procedure TForm1.FormCreate(Sender: TObject);
begin
{$ifdef MSWINDOWS}
Form1.Width:=Round(Screen.WorkAreaWidth);
Form1.Height:=Round(Screen.WorkAreaHeight);
AppFilePath := ExtractFilePath(ParamStr(0));
FR := TfrxReport.Create(Self);
FR.Parent := Self;
{$endif MSWINDOWS}
end;
...
...
...
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
{$ifdef MSWINDOWS}
Fr.Free;
{$endif MSWINDOWS}
end;
...
Die Zeile "FR.Parent := Self;" führt zum Fehler "[dcc32 Fehler] AppMain.pas(604): E2010 Inkompatible Typen: 'TfrxComponent' und 'TForm1'"
Lass ich das FR.Parent weg, scheint es zwar zu funktionieren, bin mir aber nicht sicher ob das auf Dauer ok ist.
Thorsten