Thread in DLL will nicht so recht ....

**alzaimar**

... funktionieren.

Ich habe eine DLL, die verschickt an eine andere Anwendung eine Nachricht per mailslot und dann wartet sie auf die Anwort. Genauergesagt ist da ein Thread, der wartet. Die empfangende Nachricht wird in einen String (fServerList) geschrieben und dann wartet das Teil eben wieder. Funktioniert seit Jahren.
Nun muss das in eine DLL rein. Rumms, da fangen die Probleme an.

Eigentlich habe ich ja nur ein Problem (bezügl. der DLL). Wirklich nur eins. Es geht nicht

So warte ich auf die Nachricht.

zusammenfalten · markieren

Delphi-Quellcode:

			Function TIDEClientMail.WaitForServerList : Boolean;

Const

  ccTimeOut = 5000;

Var

  t : Cardinal;

Begin

  t := GettickCount;

  Repeat

    Application.ProcessMessages;

    Sleep (0);

    Result := (GetTickCount - t) <= ccTimeout;

  Until Not Result or (fServerList <> '');

End;

So gehts nicht.

Wenn nich nun eine blöde Zeile einfüge

markieren

Delphi-Quellcode:

			...

Begin

  MessageDlg('Wie witzig', mtWarning, [mbOK], 0); // <-- Das hier am Anfang eingefügt und -funzt-

  t := GettickCount;

...

klappt es plötzlich. Da frag ich mich doch ganz spontan:

Oder anders ausgedrückt: Kann ich die Zauberei, die im 'MessageDlg' passiert, nicht irgendwie simulieren, das meine "%%§$§$-DLL endlich funktioniert?

Thread in DLL will nicht so recht ....

Thread in DLL will nicht so recht ....

Forumregeln