{"provider_name":"Hatena Blog","categories":["FreePascal"],"url":"https://sasaplus1.hatenadiary.com/entry/20101207/1291728048","blog_title":"\u56db\u89d2\u9769\u547d\u524d\u591c","author_name":"sasaplus1","published":"2010-12-07 22:20:48","title":"FreePascal\u3067\u30de\u30eb\u30c1\u30b9\u30ec\u30c3\u30c9","provider_url":"https://hatena.blog","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fsasaplus1.hatenadiary.com%2Fentry%2F20101207%2F1291728048\" title=\"FreePascal\u3067\u30de\u30eb\u30c1\u30b9\u30ec\u30c3\u30c9 - \u56db\u89d2\u9769\u547d\u524d\u591c\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","blog_url":"https://sasaplus1.hatenadiary.com/","type":"rich","height":"190","width":"100%","image_url":null,"version":"1.0","author_url":"https://blog.hatena.ne.jp/sasaplus1/","description":"Java\u3067\u30de\u30eb\u30c1\u30b9\u30ec\u30c3\u30c9\u306e\u5f8c\u306a\u306e\u3067FreePascal\u3067\u30de\u30eb\u30c1\u30b9\u30ec\u30c3\u30c9\u3092\u66f8\u3044\u3066\u307f\u3088\u3046\u304b\u306a\u30fc\u3068\u3002 \u74b0\u5883\uff1aWindowsXP SP3 / FreePascal 2.4.0 { ThreadEx.pas } unit ThreadEx; {$MODE OBJFPC} interface uses Windows, Classes; type PThreadEx = ^TThreadEx; TThreadEx = class(TThread) private FWait: Integer; FName: String; protected procedure Execute; override; pu\u2026"}