Wann bzw. an welcher Position CloseHandle?

[Sir Rufo]

Das ist wie mit TObject.Free und TObject.Destroy (wobei CloseHandle hier mit TObject.Destroy vergleichbar ist).

Ein SafeCloseHandle (analog zu TObject.Free) würde so aussehen:

Delphi-Quellcode:

function SafeCloseHandle( hObject : THandle ) : Boolean;
begin
  if ( hObject = 0 ) then
    Exit( True );

  Result := ( CloseHandle( hObject ) <> 0 );
end;