Wie soll das ohne erzeugtes Datenmodul funktionieren?
Er erzeugt es doch:
Delphi-Quellcode:
function dmMain: TdmMain;
begin
if FdmMain = nil then
begin
FdmMain := TdmMain.Create(Application);
FdmMain.AfterConstruction;
end;
Result := FdmMain;
end;
Walter,
AfterConstruction musst du nicht aufrufen, du vererbst diese Methode und diese wird nach dem Erzeugen automatisch aufgerufen.
Also nimm das raus. Macht zwar nichts (glaub ich), aber ist Quatsch.
Frank