prozedur in Data Module auf andere Form anwenden

[DeddyH]

Wie sieht es so aus?

Delphi-Quellcode:

procedure TPCdmod.Q_TIMEAfterOpen(DataSet: TDataSet);
begin
  PCchrt.Opentime(PCdmod.Q_TIME['Min']); // Opentime ist in Public eingetragen  
end;

//und in Hauptform:

procedure TPCchrt.Opentime(const TimeStr: string);
begin    
  cxTextEdit2.Text :=  TimeStr; 
end;