objectreferenz austauschen ohne globale variablen!!!!

[Angel4585]

übergibt doch das Objekt einfach der Prozedur

Delphi-Quellcode:

procedure bla2(AObject : TTestObject);
begin
with AObject do
 begin

end;
end;

Da war einer schneller

Aufruf kann auch
bla2(TTestObject.Create); sein