wie wäre es mit einem Vorgabe Parameter im "ShowModal"
Delphi-Quellcode:
procedure ShowModal(data : TData = Data1);
begin
if data = data1 then begin
// Formular zum "Ersteller" machen
end else begin
// Forumlar zum "Editor" machen
end;
end;
Glaube so geht es
sonnst muss data1 noch irgendwo definieren, aber eig müsste es so ja gehen
Gruss Thorben