Zitat von
bluesbear:
Ich lese da nur interessehalber am Rande mit - heißt das, das Folgende würde dann wieder gehen?
Delphi-Quellcode:
procedure blubb(var ping : TForm);
begin
TForm1(ping).Caption:='test';
end;
Ich übergebe Objekte nie als var Parameter. Pointer auf Pointer sind mir etwas suspekt <g>.
hier könntest bspw. folgendes machen...
Delphi-Quellcode:
procedure blubb(var ping : TForm);
begin
if not assigned(ping) then
ping := tform1.create(nil);
...
end;
um anschliesend mit dem wert von ping weiter zu arbeiten.
wenn du ping bereits zuvor einen wert zugewiesen hast, welcher beibehalten werden soll, empfiehlt sich die
const deklaration
da kannst du dir nicht ausversehen, deinen zeiger zerschiessen ...