Designer.Modified war die Lösung:
Code:
procedure TMyEditor.Edit;
var lform: TMyForm;
begin
lform := TMyForm.Create(nil);
try
lform.MyData:= TMyData(GetOrdValue);
lform.ShowModal;
Designer.Modified;
finally
FreeAndNil(lform);
end
end {Edit};
Vielen Dank an stahli!