Mmh. Als Destructor wird Destroy verwendet und nicht free. Durch Free wird Destroy explizit aufgerufen. Es müsste also so aussehen:
Delphi-Quellcode:
destructor TMobilePIM.Destroy;
begin
fTimer.Enabled := false;
if assigned(FTimer) then FreeAndNil(fTimer);
inherited;
end;
[Edit]Weiss nicht genau wie das bei Delphi 2005 ist, sollte aber bei einer
Win32 Anwendung genauso sein.[/edit]