prozedur in Data Module auf andere Form anwenden

[fatalerror]

Kann zwar das Demoprogramm nicht zum laufen kriegen, da ich interbase nicht installiert habe.

Was mir aber so auf den 1. Blick aufgefallen ist:

Bei Programmstart erstellst du das Formular ein erstes Mal

Application.CreateForm(TPCchrt, PCchrt); und später erzeugst das Formular ein zweites Mal:

Delphi-Quellcode:

procedure TPCmain.FormCreate(Sender: TObject);
begin

  FChart :=  TPCchrt.Create(Self);
  with ChartF do
  begin
    Parent  := Self;
    align   := alClient;
    Visible := True;
  end;
 // ClientWidth := 1300;

end;