Forum: Object-Pascal / Delphi-Language
Delphi
by fiasko,
13. Nov 2004
Ich stelle mir das so vor:
procedure TMyThread.Execute();
var
Msg: String;
c: boolean;
begin
while not Terminated do
begin
EnterCriticalSection(..);
Forum: Object-Pascal / Delphi-Language
Delphi
by fiasko,
13. Nov 2004
Jo, jetzt verstehe ich dein Problem auch langsam ;-). Dann mach also nach dem .Terminate das Disconnect und lass das WaitFor drinne. Vor dem WriteLn machst du noch eine Überprüfung rein ob immernoch Connected ist und dann müßte das gehen. Das ist aber nicht ganz sauber, da zwischen dieser überprüfung und dem WriteLn gerade das disconnect kommen könnte - eigentlich müßtest du das mit gegenseitigen...
Forum: Object-Pascal / Delphi-Language
Delphi
by fiasko,
13. Nov 2004
Hallo,
du solltest vielleicht das Terminieren so machen:
Connection.Thread.Terminate;
Connection.Thread.WaitFor;
das Terminate beendet die Threads ja nicht sofort, waitfor wartet bis sie wirklich weg sind.