per Create eine Form erzeugen

[Akku]

Delphi-Quellcode:

unitA:

function TExec.ccOutput(name: String): TMDIChildBaseOutput;
begin
  Result := OPack^.outp.Create(OPack^.pti);
...
end;

procedure TExec.ccExecute;
var
  outputObject: TMDIChildBaseOutput;
begin
...
  outputObject := ccOutput(name);
  outputObject.execute(SetOfData);
end;


unitB:

procedure TMDIOutputText.Execute(setOfCalcResult: PSetOfCalcResults);
begin
  RiEdOutput.Clear;
  ...
end;

RiEdOutput ist vom Typ TRichEdit und produziert in der letzten Zeile hier einen Fehler, weil RiEdOutput = nil ist.