TCriticalSection und Timeout

[SubData]

Morjn...

Hat jemand ne Idee wie man einer CriticalSection einen Timeout zuweisen kann?
Das Programm soll x Sekunden auf eine kritische Sektion warten und falls die Zeitspanne überschritten wird, soll der Code der in der kritischen Sektion steht nicht ausgeführt werden.

Ich möchte dafür nicht unbedingt einen Timer verwenden...

[Basilikum]

ein Timeout ist meines Wissens mit CriticalSections nicht realisierbar... ausser Du pollst mittels TryEnter eine gewisse Zeit lang, bis die Section entweder frei wird, oder die Zeit abgelaufen ist (nicht gerade eine schöne Lösung; viele Context-Switches für nichts und wieder nichts)...
besser wäre es, dazu ein Mutex zu verwenden... beim "Betreten" des Mutex mit WaitForSingleObject kannst Du auch ein Timeout definieren....

CreateMutex
WaitForSingleObject

[SubData]

Klingt gut, das werd ich mir mal ansehen...

TryEnter gibs bei D7 EP übrigens nicht :/

[Basilikum]

Zitat:

Zitat von SubData

Klingt gut, das werd ich mir mal ansehen...

TryEnter gibs bei D7 EP übrigens nicht :/

oha... diese Methode gibts demfalls erst ab D2k5...

TryEnterCriticalSection wäre die entsprechende API Function

[MosiXXL]

So gehts mit TEvent (syncobjs)

Delphi-Quellcode:

  case lvEvent.WaitFor(1000) of
    //Das Signal für das Ereignisobjekt wurde gesetzt.
    wrSignaled :;
    //Die im Parameter TimeOut angegebene Zeitspanne ist verstrichen, ohne dass das Signal gesetzt wurde.
    wrTimeOut   :;
    //Das Ereignisobjekt wurde gelöscht, bevor das TimeOut-Intervall verstrichen ist.
    wrAbandoned   :;
    //im Warten ist ein Fehler aufgetreten. Überprüfen Sie die Eigenschaft LastError. Der Fehlercode in LastError enthält nähere Informationen.
    wrError   :;
    end;

[SubData]

Ui das is genau das was ich brauche... Super, danke :>