くだすれDelphi(超初心者用)その58【Embarcadero】

**デフォルトの名無しさん** · 2020/03/11(水) 18:30:39.03

Delphi(デルファイ)について、他のスレッドでは書き込めない超低レベル、もしくは
質問者自身何が何だか分からない質問を勇気を持って書き込むスレッドです。

Delphi使いが優しくコメントを返しますが、お礼はDelphiの布教と初心者の救済をお願いします。

■Delphi 10.3
ttp://www.embarcadero.com/jp/products/delphi

■Delphi Community Edition (無料)
iOS、Android、Windows、macOS向けアプリも開発可能。年間売上5000 US＄以内の商用開発可。
https://www.embarcadero.com/jp/products/delphi/starter

＜前スレ＞
くだすれDelphi(超初心者用)その57
https://mevius.5ch.net/test/read.cgi/tech/1476332514/

**デフォルトの名無しさん** · 2020/12/05(土) 16:28:56.22

C++Builder10.2Pro安く買えるほこどこ？
普通に買ったら20万だよね？
脱糞しそう

**デフォルトの名無しさん** · 2020/12/05(土) 19:49:24.90

>>339
毎回そんなことはないかと思うけど
ごくまれになおしたせいで別の所にとんでもない影響出すってあるよな
人なんだからそういう事もあると思ってるから今のところ俺は10.3を使い続けているｗ

**デフォルトの名無しさん** · 2020/12/06(日) 00:07:17.20

>>342
OpenCVとか使う場合はVS使ってる。
C++前提だけど、VSって面倒くさいんだよね。
IDE上でボタン等コンポーネンツを貼れるか？
mfcができた頃から進化してない。

**デフォルトの名無しさん** · 2020/12/07(月) 19:34:30.48

Delphi Advent Calendar　過疎りすぎ

**デフォルトの名無しさん** · 2020/12/07(月) 22:57:38.33

ロビー活動が足りてないんじゃないの

**デフォルトの名無しさん** · 2020/12/08(火) 06:51:20.30

どこにあんの？

**デフォルトの名無しさん** · 2020/12/08(火) 16:28:43.44

>>346
まぁ日本じゃmvpがあのキモ男だからな

**デフォルトの名無しさん** · 2020/12/09(水) 17:21:39.18

例外をプログラムが受け取るようにするオプション設定どこですか？
C++Builder10.2ですけど、

**デフォルトの名無しさん** · 2020/12/12(土) 09:35:54.72

>>350
C++Builderスレで聞け

**デフォルトの名無しさん** · 2020/12/12(土) 13:31:52.36

そういやMacの例外処理の方法を教えてくれ
エンバカの説明読んでもサッパリ

**デフォルトの名無しさん** · 2020/12/12(土) 13:45:35.22

>>352
Try except end
以外にって事？

**デフォルトの名無しさん** · 2020/12/12(土) 23:26:55.30

>>353
Macじゃtry...except...endで例外キャッチできないみたいなんだよな

**デフォルトの名無しさん** · 2020/12/13(日) 02:25:29.57

DelphiでRSSリーダー作れましゅか？

**デフォルトの名無しさん** · 2020/12/13(日) 04:13:22.79

はい

**デフォルトの名無しさん** · 2020/12/15(火) 10:24:34.11

10.4のComエディションまだか？

**デフォルトの名無しさん** · 2020/12/15(火) 12:23:04.98

10.4はバグだらけだから10.4.1以降で出してくると思われる

**デフォルトの名無しさん** · 2020/12/15(火) 12:56:01.60

10.4の高速サジェスト（）機能ほんと使い物にならん

**デフォルトの名無しさん** · 2020/12/15(火) 13:20:39.10

いつになったら使い物になるんですかっ

**デフォルトの名無しさん** · 2020/12/15(火) 13:56:17.72

arm windows のネイティブコンパイラって出たんだっけ？
vcl で対応？

**デフォルトの名無しさん** · 2020/12/16(水) 19:11:13.53

CreateIpForwardEntryでルート設定したいんだけどWin10だとエラーになる
Win7までは正常にできてたけど、Win10だと管理者で実行しないとダメだった。
そこで、自プログラムで管理者としてアレする方法教えて下さいよ

**デフォルトの名無しさん** · 2020/12/16(水) 22:37:43.75

>>362
プロジェクトオプションのマニフェストの所で実行レベルを「管理者権限で実行する」に設定するとかではなくて？
それとも通常モードで動いているソフトで、その時だけ管理者権限を要求するようにしたいって話？

**デフォルトの名無しさん** · 2020/12/16(水) 23:23:26.32

>>363
そんな事できたんですね、ちょっと試してみます。
ありがとうございます。

**デフォルトの名無しさん** · 2020/12/17(木) 11:00:21.78

ネットに繋いでないとプロジェクト読み込んだタイミングでdelphiが落ちるんだけどそういうもんだって？
サブスク切れてるのが関係してる？

**デフォルトの名無しさん** · 2020/12/17(木) 12:18:07.06

>>363
試してみました
確かに管理者権限で実行されていますが、
実行する時に例のユーザーアカウント制御ダイアログが表示されます。
これはexe実行時に管理者で実行と同じなので
ユーザーアカウント制御ダイアログが出ないで管理者にする方法を教えてください

**デフォルトの名無しさん** · 2020/12/17(木) 13:10:51.90

>>366
できません
できると立派な特権昇格攻撃です

**デフォルトの名無しさん** · 2020/12/17(木) 15:22:03.00

タスクスケジューラで自動起動に登録して常駐させといて
ユーザーに起動されたら常駐のプロセスがウィンドウを表示して
処理を引き継げばいいんじゃね

タスクスケジューラへの登録には当然管理者権限が必要だけど

**デフォルトの名無しさん** · 2020/12/17(木) 16:03:58.56

タスクスケジューラーにアプリを登録して置いて
そのタスクを /NoUACオプションを付けて起動する手もあるらしいな
https://news.mynavi.jp/article/win10tips-73/

**デフォルトの名無しさん** · 2020/12/17(木) 22:17:08.73

>>367-369
返答ありがとうございます。
やっぱりできないですか、権限をアレするAPIいくつか試してみましたが
戻り値はOKでも、現在の権限が管理者かどうか見る関数で調べると管理者になってなくてアレ
XP時代には普通にできていた事ができなくなってアレですな。

**デフォルトの名無しさん** · 2020/12/18(金) 10:09:20.47

Delphiで構築された強力な～シリーズ面白くはあるんだけど
オプソなやつ紹介してほしいな
小規模なのでいいからかっちりまとまったツールとか
他人の.pasソースって全く読む機会なくなったので新たな刺激がない

**デフォルトの名無しさん** · 2020/12/18(金) 10:45:12.12

Delphi Advent Calendar　自転車操業

**デフォルトの名無しさん** · 2020/12/22(火) 08:44:32.09

TMemoの複数行選択された時の範囲確認ってどうやるの？

**デフォルトの名無しさん** · 2020/12/22(火) 13:12:30.34

SelStartとSelLength

**デフォルトの名無しさん** · 2020/12/22(火) 23:00:27.49

画像ファイルを読んで、画像にファイル名を描画して別名で保存というプログラムを作ってるんだけど
フォーム上に
TImage、TButton1、TButton2、TButton3、その他

①Button1Click
begin
Image1.Picture.LoadFromFile(ファイル名);
end;

②Button2Click
begin
with Image1.Canvas do
begin
Brush.Style:=bsClear;
font.Color:=clRed;
font.Size:=20;
TextOut(50, 50, ファイル名);
end;
end;

③Button3Click
begin
Image1.Picture.SaveToFile(ファイル別名);
end;

で、①②はうまくいくけど③は①で読み込んだ画像がそのまま出力されるだけで、②で書き込んだ（はずの）
ファイル名が書き込まれていない。画面には表示されてるのに。

何が間違ってますかね。
RadStudioCommunityとLazarusです。

**デフォルトの名無しさん** · 2020/12/23(水) 13:27:54.11

Android上のFMX.MEMOでIMEの変換中に文節区切りを表す色が
付かない問題って、技術的に解決不可能なの？
この問題がある限り、文字を複数行扱うアプリが作れない

**デフォルトの名無しさん** · 2020/12/23(水) 17:36:40.02

>>375
TImage.Canvasはスクリーン上のデバイスコンテキストが描画対象で、
TImage.Pictureの中身とは別だからね。
例えばTImage.RefreshすればPictureにある元の画像で上書きされて文字は消えてしまう。

TBitmapにAssignしてそのCanvasを操作してから保存すればいい

**デフォルトの名無しさん** · 2020/12/26(土) 07:32:22.20

https://www.packtpub.com/catalogsearch/result/?q=Delphi&;product_type_filter=Book&released=Available&sortBy=store_prod_us_products_date_of_publication_desc

**デフォルトの名無しさん** · 2020/12/26(土) 16:11:50.13

>>377
ありがとうございました。
ちょっとがんばってみます。

**デフォルトの名無しさん** · 2020/12/27(日) 18:36:38.47

>>377

できました。ありがとうございます。

**デフォルトの名無しさん** · 2020/12/27(日) 22:48:09.91

>>380
ソース見せろよ

**デフォルトの名無しさん** · 2020/12/29(火) 15:51:35.11

TChartでLeftAxisとかのラベル数値のフォントが何か変、にじんでるみたいな
同ソースで別プロジェクトでコンパイルすると正常にラベル数値が表示されてる。
Chart1->LeftAxis->LabelsFont->Name = "Tahoma";
とか色々フォントを変えても何か変、
誰かTChartの軸ラベルとかの文字を指定したフォントとかでちゃんと表示する方法とか教えてくださ

**デフォルトの名無しさん** · 2020/12/29(火) 21:05:15.86

Community Edition期限切れたからDLしなおしてみたがまだ10.3.3だった

そろそろ367日の期限切れ出てくる頃だけど期限の延長手順

・Community Edition起動
・期限切れの場合は登録ウィザードが自動起動する
・古いシリアルだと認証されないのでここで登録ウィザードは一旦放置
・エンバカサイトでログインしてCommunity EditionをDLしなおす
・新しいシリアルがメールで送られてくる
・そのシリアルを登録ウィザードに入れればOK
・バージョン変わらないときは再インストールは不要

**デフォルトの名無しさん** · 2020/12/29(火) 21:30:17.60

エンバカのQCが荒れてるもんな
10.4が出てから半年もたつのに簡単に直せるバグすら放置されているって
サブスク更新料払っているのに10.4はバグ放置されてて信頼できないので仕事に使えないって言われてる

**デフォルトの名無しさん** · 2020/12/29(火) 23:51:30.54

10年ぶりくらいにdelphiのスレに来たけど意外と盛況、RADすら死語になった世の中なのに。
何用途で使ってる人が多いんですかね

**デフォルトの名無しさん** · 2020/12/29(火) 23:56:11.14

Delphi5と併用しているが、小物は5で作ることの方が多い
最新Delphiは、コンポーネントが多すぎて探して選択するのが面倒すぎる

**デフォルトの名無しさん** · 2020/12/30(水) 09:23:43.04

AHK使って変換＋L,絞り込み,Enterでコンポーネント選択できるようにしてあるから
めっちゃ楽だよ
この手のコードを山ほど仕込んでおくと良い

sc79 & L:: ; コンポーネントパレット
ImeOff()
send,!vtl
return

**デフォルトの名無しさん** · 2020/12/30(水) 09:51:12.46

ここまできたらA-Zを制覇しておきたいな
https://i.imgur.com/jrNhpZa.jpeg

**デフォルトの名無しさん** · 2020/12/31(木) 23:24:09.07

TMemoで複数行選択した状態のままチェックボックスクリックしたりする方法ない？

**デフォルトの名無しさん** · 2020/12/31(木) 23:43:09.55

>>389
言っている意味が分かりませんが

TMemoとTCheckBoxは異なるコントロールだから
チェックボックスをクリックしたところでTMemoの選択が解除されることはないよ
もしチェックボックスをクリックしたときに選択している反転表示が見えなくなるのが嫌と言うなら
TMemoのHideSelectionをfalseにする

**デフォルトの名無しさん** · 2021/01/03(日) 12:09:07.23

Delphiとは、CodeGearによって開発されている、主にWindows用の
アプリケーションを開発するためのGUIの統合開発環境の名称である。

delphi二次元関数のやりにくさ、線じゃなくて点にしろよ

ツイッターで繰り返し繰り返し繰り返しツイートされるコレ何なん？

**デフォルトの名無しさん** · 2021/01/03(日) 15:53:23.85

知るか
直接ツイートしてる奴に聞けよ

**デフォルトの名無しさん** · 2021/01/03(日) 16:07:05.26

それがツイートしてるやつ次々と変わるんだ

**デフォルトの名無しさん** · 2021/01/04(月) 00:18:32.61

その次々とかわるどれかに聞きゃーいいんじゃないのかと
「すみませんそれいろいろな人がツィートしてますが
どういうことですか？」と
ボットなんだったらただの宣伝だ、が結論だしコレ何なん？？と
いわれてもはぁ、宣伝でしょ、としか

**デフォルトの名無しさん** · 2021/01/04(月) 00:55:41.41

>>394
お前が聞いてくれよ
そして答えをここで教えて欲しい

**デフォルトの名無しさん** · 2021/01/04(月) 22:08:15.26

ちまちまとしたGUI作らずにすむような
Firefoxのabout:configっぽい設定用コンポーネントでいい感じのものないですか

**デフォルトの名無しさん** · 2021/01/06(水) 11:20:51.65

シーケンサーと信号のやり取りをするプログラムを作成中なんだけど、相手からの入力を監視する場合ってマルチタスクで監視するかアイドル時に監視するかどっちが負荷が少ないですか？

**デフォルトの名無しさん** · 2021/01/06(水) 11:54:00.61

>>397
マルチスレッドって言いたいとエスパー
スレッド分けて監視しないとメインスレッドがBusyの時信号が来たら取りこぼす

**デフォルトの名無しさん** · 2021/01/06(水) 13:13:15.14

マルチスレッド、その通りです。
ありがとうございます。

**デフォルトの名無しさん** · 2021/01/06(水) 18:47:01.99

負荷を計測する方法は知らないけどスレッド増やしまくったらファンがブォンブォン唸り始めるんだがこれは負荷が高いってことなんでないの？

**デフォルトの名無しさん** · 2021/01/06(水) 19:10:41.59

まず、マルチスレッドかどうかにかかわらずどうやってデータ監視してるの？

データが来なくても、頻繁に無限ループでチェックしたらそりゃマルチスレッドにしたとん、全開のCPUコアが増えるから死ぬだろ

**デフォルトの名無しさん** · 2021/01/06(水) 19:17:25.73

シーケンサがようわからんが、UIスレッド以外の監視スレッドは一つだけでいいんじゃ？

**デフォルトの名無しさん** · 2021/01/06(水) 19:25:44.95

アイドル時をどうやって判断してるのかとか色々疑問が残る吉宗であった

**デフォルトの名無しさん** · 2021/01/06(水) 21:10:21.72

>>398
メインスレッドがbusyにならない様に、スレッド化するんじゃ無いの？
WindowsのメインスレッドってUIの守備範囲だよ、UIが遅くなるソフトは糞ソフトの認識だが。

**デフォルトの名無しさん** · 2021/01/06(水) 21:11:11.60

CPUnの負荷を最小にするには割り込みしか無いよ。

**デフォルトの名無しさん** · 2021/01/06(水) 21:13:14.70

OnIdleとかそういうことじゃね？

**デフォルトの名無しさん** · 2021/01/06(水) 21:43:26.03

>>404
ん？
受信専用のスレッド側で監視してメインがBusyでも受信できるようにってそこまで詳しく説明しないと伝わらなかった？

**デフォルトの名無しさん** · 2021/01/06(水) 22:17:47.00

>>407
それが成立するのはPPLを使った場合だけで無いの？
同一コアでの実行ならメインがbusyなら子スレッドもbusyになり結果受信できなくなると思うが違う？

**デフォルトの名無しさん** · 2021/01/06(水) 22:49:58.18

同一コア?
実行環境が1コアでも、OSのスレッドで分けてればタイムスライスでメインがbusyでも、子スレッドはbusyじゃないが

エスパーして、子スレッドで受信したデータを子スレッドでTThread.synchoronizeしてUIスレッドに同期とってUIスレッドに渡したりしたらメインがbusyなら子スレッドも引きづられるけど
その場合はTThread.Queueでいいのかな
つか、受信したデータどうするのか知らんが..

**デフォルトの名無しさん** · 2021/01/06(水) 23:05:19.23

ごめん、1コアの話は忘れてくれw

同一コアって、OSのスレッドでわけてれば、OSがスレッドの実行をコアが複数あれば適切に振り分けるし、仮に同一コアになってもタイムスライスでメインがbusyでも子はbusyにならん

**デフォルトの名無しさん** · 2021/01/06(水) 23:07:23.62

>>408
は？

**デフォルトの名無しさん** · 2021/01/06(水) 23:11:46.48

>>410
1コアの話は忘れた。

>> OSがスレッドの実行をコアが複数あれば適切に振り分けるし、

PPL使えばね

>>仮に同一コアになってもタイムスライスでメインがbusyでも子はbusyにならん

メインCPUがbusyってCPU使用率が100%近いって事だよね、子スレッドはどのCPUで動いてるの？

もっとググって！

**デフォルトの名無しさん** · 2021/01/06(水) 23:22:00.30

>>412
いや、君は根本が間違ってる...

DelphiのPPLって内部でOSのスレッド使って実装してて、
スレッドやスレッドプールをもっと使いやすくしたものがライブラリがPPL

**デフォルトの名無しさん** · 2021/01/06(水) 23:24:18.56

>>412
問題です

WebBrokerアプリケーションを新規で作ります

デフォルトのHttp応答にDateTimeToStr(Now)を追加して時間が表示されるようにします

メインフォームにボタンを追加して
d := now;
while True do begin
if secondsBetween(now,d) > 10 then break;
end;
を実行するようにします

コンパイルし、Httpサーバーを起動します
デフォルトのブラウザを開くボタンを押します

追加したボタンを押してメインフォームを応答なしにします

ブラウザ側を更新します

さてどうなるでしょう

**デフォルトの名無しさん** · 2021/01/06(水) 23:25:52.63

答え

メインフォームが応答なしでもブラウザは更新された正常に現在の時間を表示します

WebBrokerは意識せずマルチスレッドを実験できる良いコンポーネントですね

**デフォルトの名無しさん** · 2021/01/06(水) 23:34:47.78

DelphiのPPLって内部でOSのスレッド使って実装してて、
スレッドやスレッドプールをもっと使いやすくしたものがPPLというライブラリ

文末がおかしかくて放置しようかと思ったけど、彼は根本的に間違ってるのでちゃんと修正しときます

**デフォルトの名無しさん** · 2021/01/07(木) 00:08:05.04

>>412
>メインCPUがbusyってCPU使用率が100%近いって事だよね、子スレッドはどのCPUで動いてるの？

だから、タイムスライスとかでOSがスレッド(例えばメインスレッド)の実行を強制的に停止するんだって、で、他のスレッドにそのCPUを割り当てる

https://ascii.jp/elem/000/000/672/672088/
タイムスライスとかプリエンプティブとか、スレッドの実行がどうなってるか勉強しよう

**デフォルトの名無しさん** · 2021/01/07(木) 00:22:12.33

>>417
前にも書いたがCPU負荷が100%近いってのが前提だが、その状態で子プロセスにCPUが割り当てられても殆ど動かん。

Webbrokerの話はそもそも、http serverは固まったアプリの子プロセスでないんで無いの？

**デフォルトの名無しさん** · 2021/01/07(木) 00:36:01.13

>>418
メインCPU100%とか具体的にあげてきたのは途中からでしょ
最初はメインスレッドがbusyしか君いってないけど

**デフォルトの名無しさん** · 2021/01/07(木) 00:41:06.78

だから、メインスレッドがbusyっていってんだから、負荷の原因はそのメインスレッドの処理が主で、そのメインスレッドの実行をOSが強制的に停止して他のスレッドに割り当てるんだから

**デフォルトの名無しさん** · 2021/01/07(木) 00:41:31.32

>>418
？？？
そもそもCPU使用率が100%なんて前提は誰も話してないわけで（まぁOSのタスクスケジューリングさえなんとか稼働してりゃ例に出したコードは動くが）
机上の空論はいいからコードで示して

**デフォルトの名無しさん** · 2021/01/07(木) 00:50:04.29

あと面倒だけど確認の為にソースおさらいしてきた
WebBrokerの送受信はTThreadから派生したTidThreadが担当してて立派にメインスレッドの子スレッドだった事をお知らせしておきます

**デフォルトの名無しさん** · 2021/01/07(木) 00:51:53.74

メインスレッドがbusyってどんな状態？
もしかして、*****中って表示されてる事？
それならあなたの言う通りです。

ウィンドウが真っ白、無応答時のCPU負荷見てみて。
Windows95だとマウスすら動かんかったわ。

**デフォルトの名無しさん** · 2021/01/07(木) 00:55:48.92

>>422
嘘はいけないよ

**デフォルトの名無しさん** · 2021/01/07(木) 00:59:01.61

>>423
君嘘はいわないでね
君は>>407でPPLなら大丈夫といってるんだけど

**デフォルトの名無しさん** · 2021/01/07(木) 01:00:53.79

君が勝手に想定する状態でもPPLなら大丈夫っていってるんだけど
どういうことなの？

**デフォルトの名無しさん** · 2021/01/07(木) 01:08:10.16

>>424
だから嘘だと言うならソコード示してって

**デフォルトの名無しさん** · 2021/01/07(木) 01:08:41.78

ソコードってなんじゃｗ
コードね

**デフォルトの名無しさん** · 2021/01/07(木) 01:10:13.52

>>425
407だけどアンカー間違いだよね？

**デフォルトの名無しさん** · 2021/01/07(木) 01:11:03.96

>>423の君なんか勝手に前提コロコロ変えすぎだろ

>>407の時はPPLなら大丈夫とかいってて、

>>423では
>ウィンドウが真っ白、無応答時のCPU負荷見てみて。
>Windows95だとマウスすら動かんかったわ。
の時でもPPLなら大丈夫なんだろ？

それとも前提を大幅に変えたから>>423ではPPLは駄目になったの？

**デフォルトの名無しさん** · 2021/01/07(木) 01:11:50.55

>>426
面倒くさいのでこれが最後ね
PPLは並列プログラミングライブラリーの略で、スレッドを複数のCPUに振り分けて高速化が出来る。
通信スレッドでPPLを使う事は通常少ないと思うが、PPLを使い子プロセスを実装した場合はメインスレッドとCPUが違うので取りこぼしは無いって事。

因みにこのスレはDelphiユーザーが多いからか、話が噛み合わない、日常的にマルチスレッドアプリを作成してるC++builderでした。

おやすみ

**デフォルトの名無しさん** · 2021/01/07(木) 01:13:00.20

いやだから逃げる前にコードをー・・・

**デフォルトの名無しさん** · 2021/01/07(木) 01:13:09.84

>>429
ごめん、間違えた
>>407じゃなく>>408ね

**デフォルトの名無しさん** · 2021/01/07(木) 01:13:55.72

受信用にスレッド作る
メインで全部やると取りこぼす可能性がある
ってだけの話が何故ここまでこじれるかなぁ

**デフォルトの名無しさん** · 2021/01/07(木) 01:16:44.70

>>431
>CPUが違うので

ダウト！
どのスレッドがどのCPU（論理コアか？？）使うかはOSのタスクスケジューラーが決める事で違う論理コアか同一論理コアかは一般的なWin32アプリケーションでは意識することができない

**デフォルトの名無しさん** · 2021/01/07(木) 01:23:47.23

すげえC++BuilderでPPL使うとCPU使用率100%の壁突破して動けるのか
未来技術やんけ

**デフォルトの名無しさん** · 2021/01/07(木) 06:24:47.98

なんでメインスレッドがbusy＝cpu使用率100%前提で話しているの？

メインスレッドbusyっていうのはメインスレッド側の処理が手一杯で受信処理に時間が割り当てられず
取りこぼしてしまうような状態を言うんでないの？　
一つのスレッドがCPU食い潰して他のスレッド止めてしまうのはもはやバグの類だろう

**デフォルトの名無しさん** · 2021/01/07(木) 06:44:54.69

コード実行時のタイムスケジュールの問題とハードウエアであるCPUのリソースの問題を混ぜこぜにして論ずるからこんなことになる。
シーケンサ、乱暴に言ってしまえばプログラマブルリレー回路の出力信号の受信の話だから前者の話だと思うんだけどな。
せいぜい数ms程度の信号でしょ　

**デフォルトの名無しさん** · 2021/01/07(木) 14:24:42.44

なんかやけに伸びてるな
10年近くC++Builder使ってるけど>>431が何を言っているのか理解が追いつかん

**デフォルトの名無しさん** · 2021/01/07(木) 21:39:31.17

ざっと読んでみたけどPPLの並列スレッドとメインスレッドからCreateしたTThreadは別物って考えてそうだね。
メインスレッドのビジー状態が子スレッドを引きずるってTThread.Createで実行するかSynchronize内で実行しないとそんな事にはならないんだけども。
むかーしそれこそDelphi使い始めた頃、TThread.Create内にスレッドでやりたい処理書いちゃって応答なしになったの思い出したわ。なつかしいな。

**デフォルトの名無しさん** · 2021/01/08(金) 07:33:08.43

そもそも>>397は負荷を聞いてて
アプリケーションのフリーズの話はしてない

メインVCLスレッドでも別スレッドでも同じ処理の負荷は変わらない
もし割り込みなし、OSのタイムスライスも気になるレベルで
入力監視がしたいと言うなら
sleepもなしにビジーウェイトを全力で回し続けるという事で、
そのスレッドはコア一つを可能な最大限まで食いつぶす
スレッドの優先度を上げれば取りこぼしや遅延が減る代わりに
他のプロセス、スレッドの実行に支障が出る可能性がある

そんだけの話では?
質問が言葉不足で意図や前提条件が不明だから本当に欲しい答えは分からんけど

**デフォルトの名無しさん** · 2021/01/08(金) 10:09:57.74

>>441
そんな実装メインスレッドでやったらそれこそずっと応答なしのアプリが完成するわ