Delphi Delphi 7 Hack für Assigned -> Ersatz für Delphi 2010 gesucht

Thema durchsuchen

Ansicht

Themen-Optionen

Delphi 7 Hack für Assigned -> Ersatz für Delphi 2010 gesucht

Ein Thema von knochen · begonnen am 22. Apr 2010 · letzter Beitrag vom 23. Apr 2010

Vorheriger Beitrag

Nächster Beitrag

Neutral General

Registriert seit: 16. Jan 2004
Ort: Bendorf
5.219 Beiträge

Delphi 10.2 Tokyo Professional

Re: Delphi 7 Hack für Assigned -> Ersatz für Delphi 2010

22. Apr 2010, 14:24

Deine Funktion funktioniert bei mir übrigens auch unter Delphi7 nicht:

zusammenfalten · markieren

Delphi-Quellcode:

			procedure TForm1.Button1Click(Sender: TObject);

var tmp: TObject;

begin

  tmp := TObject.Create;

  tmp.Free;

  if Assigned(tmp) then

    ShowMessage('Assigned nachher!');

  if ObjektAssigned(tmp) then

    ShowMessage('ObjektAssigned nachher!');

end;

Beide MessageBoxen werden angezeigt.

Michael

"Programmers talk about software development on weekends, vacations, and over meals not because they lack imagination,
but because their imagination reveals worlds that others cannot see."