Registriert seit: 4. Nov 2004
Ort: Basel (CH)
76 Beiträge
Delphi 2007 Professional
|
Re: Critical Sections
7. Jan 2008, 16:28
Delphi-Quellcode:
So: ?
procedure test;
begin
FCs := TCriticalSection.Create;
FCs.Enter;
test;
FCS.Leave;
end;
[/delphi]
Dies Funktioniert nicht (kein Deadlock)
Das mit dem Doppel-destroy seh ich ein. Gibt Probleme, wenn jemand diese Methode überschreiben will...
Debugging is twice as hard as writing the code in the first place. Therefore, if you write the code as cleverly as possible, you are, by definition, not smart enough to debug it.
|