Hi DJ-SPM,
du kannst ja mal folgendes ausprobieren, probeweise:
Delphi-Quellcode:
procedure TTest.Execute;
begin
{ Thread-Code hier plazieren }
Synchronize(foo);
end;
procedure TTest.Foo;
begin
while true do;
end;
Sobald du jetzt den Programmablauf des Threads TTest anstößt (z.B. mit TTest.Create(False); ) wird das ganze Programme festhängen - der Nutzer kann in dieser Zeit nirgendswo hinklicken. Brauchst dir also keine Sorgen machen, dass gleichzeitig mehrmals auf den String schreibend zugegriffen wird.