prozedur in Data Module auf andere Form anwenden

[danieleh]

Danke, danke, danke !!!

Das muss zwar so sein (anders bekomme ich es nicht zum laufen), aber du hast mich drauf gebracht.

anstatt:

Delphi-Quellcode:

procedure TPCdmod.D1BeforeConnect(Sender: TObject);
begin
   with PCchrt do
  begin
    Opentime('von: TPCchrt.Opentime, aus Event: TPCdmod.D1BeforeConnect - string müsste eigentlich in Edit1 stehen');
  end;
end;

geht es nun so:

Delphi-Quellcode:

procedure TPCdmod.D1BeforeConnect(Sender: TObject);
begin
   with PCmain.ChartF do  <-- springender punkt
  begin
   // Opentime('von: TPCchrt.Opentime, aus Event: TPCdmod.D1BeforeConnect - string müsste eigentlich in Edit1 stehen');
   // oder eben:
      Edit1.Text := 'Mistery Solved';
  end;
end;

Herzlichen Dank
Daniele