|
Registriert seit: 17. Jun 2009
616 Beiträge
|
AW: (Formular-)Handling größerer Projekte
12. Mär 2015, 14:54
[QUOTE=mm1256;1293209]
Delphi-Quellcode:
if (Result = nil) then
begin
Result := TForm(AFormClass.Create(Application));
end;
if Assigned(Result) then // sonst knallts !!!!
Result.Show;
Wenn Du hier Angst hast, dass es knallt und deshalb die Assigned-Abfrage eingefügt hast, dann darfst Du das unten auch nicht so machen:
with TFrmClient1.Create(Application) do Show;
.
EDIT:
Da war ein Fehler in der Abfrage
Programmieren ist die Kunst aus Nullen und Einsen etwas sinnvollen zu gestalten.
Der bessere Künstler ist allerdings der Anwender, denn dieser findet Fehler, welche sich der Programmierer nicht vorstellen konnte.
Geändert von BadenPower (12. Mär 2015 um 15:06 Uhr)
Grund: Abfrage berichtigt
|