掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
スレッドがマウスイベントで止まらないようにするには? (ID:40229)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
tor様、 >> TForm2 = class(TThread) >スレッドなのにTForm2という名前なのですね 名前が紛らわしいのですが、Unit2.pasでは type TForm2 = class(TThread) private .... function GetData: boolean; .... protected procedure Execute; override; public ... end; 以外に、 type TForm2Thread = class(TForm) procedure FormCreate(Sender: TObject); procedure FormDestroy(Sender: TObject); private DatWriteFlag: integer; DatReadFlag: integer; ... .. public end; を定義しています。 FormCreateでは通信ポートを開けて、FormDestroyではポートを閉じる処理をしています。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.