Hi,
meiner Meinung nach fehlt das Resume,
Du erzeugst den Thread ja suspended(s. in Deinem Create)
Deshalb musst Du wenn Du Deinen Thread erzeugt hast :
Delphi-Quellcode:
var myThd : TReadCOM1Thread ;
begin
myThd := TReadCOM1Thread.create;
myThd.resume; // startet den Thread
// ....
end;
Gruß Data
Der Horizont vieler Menschen ist ein Kreis mit Radius Null, und das nennen sie ihren Standpunkt.