Einzelnen Beitrag anzeigen

Darlo

Registriert seit: 28. Jul 2008
Ort: München
1.196 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#1

[FM] Free auf nil wird zu self.free

  Alt 1. Mär 2012, 13:43
Hallo zusammen,

mir ist gerade etwas merkwürdiges unter FM aufgefallen.

Folgender Beispielcode
Code:
procedure TForm1.btnTestClick(Sender: TObject);
var
  sl: TStringList;
begin
  sl.Free;
end;
Führt unter Firemonkey dazu, dass der Button freigegeben wird, unter VCL kommt es
wie zu erwarten zu einer Exception.

Kann mir jemand das Verhalten unter FM erklären, oder ist es ein Bug?

Gruß
Philip
  Mit Zitat antworten Zitat