くだすれDelphi(超初心者用)その57 [無断転載禁止]©2ch.net

**デフォルトの名無しさん** · 2016/10/13(木) 13:21:54.84

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

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

■Delphi XE6　Professional/Enterprise/Ultimate/Architect エディション(トライアル版有)
64bit Windows、Mac OS XからiOS、Androidのアプリも開発可能。ライブラリのソースコード付き。アカデミックライセンス有り。
旧バージョン（XE6/5/4/3/2/XE/2010/2009/2007/Delphi 7）のライセンス取得とダウンロードが可能。（アカデミック不可）
ttp://www.embarcadero.com/jp/products/delphi

■Delphi XE6　Starter エディション
個人／5人以下の企業・組織向け。年間売上1000US＄以内の商用開発可。
（※）Delphi、Visual Studio等の有償／無償の開発ツールユーザーが対象。インストール確認は特に行わない。
ttp://www.embarcadero.com/jp/products/delphi/starter

■Embarcadero RAD Studio XE6 （Delphi、C++Builder、HTML5 Builder等を含むビジュアル開発スイート）
ttp://www.embarcadero.com/jp/products/rad-studio

＜前スレ＞
くだすれDelphi(超初心者用)その56
http://echo.2ch.net/test/read.cgi/tech/1405783063/

＜過去スレ＞
DelWiki （Delphi 関連の過去スレッド）※行方不明
ttp://delwiki.info/?

**デフォルトの名無しさん** · 2016/11/22(火) 17:14:24.12

えっ?そう言う事じゃないw

**デフォルトの名無しさん** · 2016/11/22(火) 18:10:29.79

コンポーネントパレットのコンポーネントをダブルクリックすればいいんじゃね。

**デフォルトの名無しさん** · 2016/11/22(火) 18:15:01.08

最大化した状態を想定してコントロールを配置したい?
...ということでもなよね

**デフォルトの名無しさん** · 2016/11/22(火) 20:43:49.84

>>96
そう言う事です。
俺、相当変なこと聞いてる？

**デフォルトの名無しさん** · 2016/11/22(火) 20:54:34.84

フォームのサイズに追随するように作るから
わざわざ最大化で考えたりしない

**デフォルトの名無しさん** · 2016/11/22(火) 21:23:29.12

>>97
自分だけが使うんだったら、最大化を想定して
コントロールの絶対位置を決めることもありだけどね

でも、どのような環境で使われるか分からない場合
フォームの最大化への対応は結構難しいと思う

まあコントロールのAlignでフォームサイズに
追随するだけでいいなら簡単だけど...

**デフォルトの名無しさん** · 2016/11/22(火) 22:15:22.90

>>98,99
ありがとうございます。
大きなディスプレイ使います。w

**デフォルトの名無しさん** · 2016/11/22(火) 23:16:57.50

ふーん

**デフォルトの名無しさん** · 2016/11/23(水) 13:06:18.51

>>100
4Kディスプレイを買うのかな？

**デフォルトの名無しさん** · 2016/11/23(水) 13:16:56.95

4Kディスプレイはプログラミングする上で非常に作業性が高まって
生産能力が跳ね上がるからアリだな
たくさんの資料と開くのはマルチディスプレイでも出来なくないけど
4Kディスプレイは縦が長いのが素晴らしい

一つ問題があるとしたら
自分のソフトを4Kディスプレイで最大化したら
描画が追い付かなくなってカクカクになるという事実に気づいてしまうこと
ただし、MS謹製のエクスプローラでもカクカクになるぐらいなので
本当の意味で4K対応のソフトはそんなに多くないし
気にしなくてもよいのかもしれんが、どーなんだろ
アンチエイリアスのかかった文字の描画がとにかく遅い
1FPSぐらいになって操作困難だ

**デフォルトの名無しさん** · 2016/11/23(水) 14:35:16.76

k-ブルが糞なんじゃね

**デフォルトの名無しさん** · 2016/11/24(木) 21:31:04.24

サブスクリプションって、アップデート2をインスコすれば
勝手にライセンス適用してくれるの？

**デフォルトの名無しさん** · 2016/11/26(土) 08:53:16.82

フォームに入力した数値を保存する方法を教えてください。

**デフォルトの名無しさん** · 2016/11/26(土) 10:20:52.50

>>106
フォーム（上のエディットコンポ）に入力した数値を（ファイルに）保存する方法ということかしら？

簡単な一例。
フォームにエディットコンポEdit1とボタンButton1があるとしてボタンを押したらエディットコンポに入力されたテキスト（数値でなくても同じ）をファイルに保存する。

procedure TForm1.Button1Click(Sender: TObject);
var
　sl: TStringList;
begin
　sl := TStringList.Create;
　try
　　// 入力された文字列を取り出し（数値だろうと扱いは文字列）、文字列リストに追加
　　sl.add(Edit1.Text);
　　// 文字列リストの内容をファイルに保存（ここでは実行ファイルと同じフォルダーにした）
　　sl.SaveToFile(ChangeFileExt(Application.ExeName, '.txt'));
　finally
　　sl.Free;
　end;
end;

**デフォルトの名無しさん** · 2016/11/26(土) 10:35:43.40

ありがとうございます。
ちょっとやってみます。

**デフォルトの名無しさん** · 2016/11/26(土) 23:59:22.61

TFile使ったら1行で書けるかも

**デフォルトの名無しさん** · 2016/11/27(日) 21:47:18.22

TEdit.Lines自体がTStringsだからSaveToFile持ってるんじゃなかったかな

**107** · 2016/11/27(日) 22:12:21.76

昔のDelphiしかないので最近のはわかりません、あしからず。
昔のでもメモコンポならLines.SaveToFile(ファイル名)できますね。

**デフォルトの名無しさん** · 2016/11/28(月) 01:18:24.55

TEditにLinesプロパティってなくね？

**デフォルトの名無しさん** · 2016/11/28(月) 13:10:31.06

TEditにはLinesはないね
もともと1行編集ボックスだからね

TEditの内容を保存するんだったら
TStringList.に読み込んでSaveToFile()を使うか
TFile.WriteAllText()を使うかだね

まあ後者のほうが簡単だけど

**デフォルトの名無しさん** · 2016/11/28(月) 22:30:06.28

TFileってのは最近できたのか
TFileStreamとは別物なんだな？

**デフォルトの名無しさん** · 2016/11/29(火) 05:29:51.70

TFile はDelphi2010からだって
TFileStreamとは別物
http://docwiki.embarcadero.com/Libraries/Seattle/en/System.IOUtils.TFile
System.IOUtils自体が2010からの追加らしい

**デフォルトの名無しさん** · 2016/11/29(火) 11:14:31.26

パスワードがかかっているExcelファイルを開ける時にパスワードを入れる方法を教えて下さい。
delphi からパスワード無しファイルを操作する事は出来ています。

**デフォルトの名無しさん** · 2016/11/30(水) 09:51:10.70

>>116
どういうやりかたで
「delphi からパスワード無しファイルを操作する事は出来ています。」
ができているのかしらんけど

OLEオートメーションを使っているなら、
xlApp.Workbooks.Open(FileName, UpdateLinks, ReadOnly, Format,
Password, WriteResPassword, IgnoreReadOnlyRecommended, Origin,
Delimiter, Editable, Notify, Converter, AddToMRU)

excelを持ってないなら
?FlexCel for VCL / FireMonkey
を使うとか　

**デフォルトの名無しさん** · 2016/12/01(木) 19:46:00.26

D6の使用許諾コードって今でも都連だね　知らなかったわ

**デフォルトの名無しさん** · 2016/12/02(金) 19:55:58.69

なぜに今さらD6？
新しいの無料になってなかったっけ

**デフォルトの名無しさん** · 2016/12/02(金) 23:02:38.10

RXバグだらけで使いづらいよ

**デフォルトの名無しさん** · 2016/12/02(金) 23:39:57.49

具体的にどんなバグ？

**デフォルトの名無しさん** · 2016/12/03(土) 09:26:01.40

ボタンの色の変更ってTButtonから派生させて改造しないとダメ？

**デフォルトの名無しさん** · 2016/12/04(日) 00:23:15.66

結局どんなバグがあったんだろう

**デフォルトの名無しさん** · 2016/12/04(日) 00:50:42.52

こんなバグ
http://gigazine.net/news/20161201-windows-10-upgrade-bitlocker-bypass/

**デフォルトの名無しさん** · 2016/12/04(日) 01:14:11.69

WindowsのバグとRadStudioになんの関係が？

**デフォルトの名無しさん** · 2016/12/04(日) 20:23:52.39

7以降アップデートしてないんだけど
すると良いことある？

**デフォルトの名無しさん** · 2016/12/05(月) 16:25:17.26

人に依る

**デフォルトの名無しさん** · 2016/12/05(月) 20:51:09.49

ユニコード対応がなんたらうんたら

**デフォルトの名無しさん** · 2016/12/05(月) 22:36:44.05

Delphi2.0 の高速コンパイルは素晴らしかった

**デフォルトの名無しさん** · 2016/12/05(月) 22:44:55.05

>>128
Unicode対応なんだ・・・TNTいらなくなるのか
これだけでも少し便利そうだな・・ありがと考えてみる

**デフォルトの名無しさん** · 2016/12/05(月) 23:11:20.14

新機能使わなきゃそりゃあってもしょうがないけど、
さすがに7からならアップグレードすりゃ色んな新機能がわんさかだと思うよ。
古い新機能ではUnicodeから始まってWin64bit対応やOSX対応、ジェネリックやら
Vistaとかの新コントール。
http://docwiki.embarcadero.com/RADStudio/Berlin/ja/%E3%83%A1%E3%82%A4%E3%83%B3%E3%83%9A%E3%83%BC%E3%82%B8
から新機能のページだけを過去のバージョンにさかのぼってみていけばいい。

**デフォルトの名無しさん** · 2016/12/06(火) 00:07:34.75

コードエディタの進化は効率アップにもなるしやっぱ良いよ

**デフォルトの名無しさん** · 2016/12/06(火) 18:04:09.67

Editへの入力時のキーバッファをキャンセルする方法を教えて下さい。
今、バーコード入力するソフトを書いているのですが、担当者をComboboxで選択していないと
EditをクリアしてShowMessageを表示するつもりです。
EditをクリアしてMessageを出す事自体は出来ているのですが、バーコードから送られるデータの
最後にCRがついてきて（バーコードリーダーが付けてきます。）、多分このCRがShowMessageに
送られてShowMessageが勝手に消えてしまうようなのです。
イベントはKeyPressを使っています。
Windows7 Delphi10.1の環境です。
よろしくお願いします

**デフォルトの名無しさん** · 2016/12/06(火) 18:16:56.25

何がききたいのかようわからん。

**デフォルトの名無しさん** · 2016/12/06(火) 18:24:00.95

「Editへの入力時のキーバッファをキャンセルする方法を教えて下さい。」
後ろにごちゃごちゃよくわからん説明が書いてあるけどこれが聞きたいの？

単に入力された文字をキャンセルならKeyPressのイベントでKeyパラメータに
Key := #00とか代入すればいいんじゃなかったっけ？
if Key = 'A' then
　Key := #00;
すりゃ、Aの文字が入力できなくる

このことじゃなかったらもっと適格に書いてくれんとわからん。

**デフォルトの名無しさん** · 2016/12/06(火) 19:02:50.65

ありがとうございます。
バーコードから送られてくる文字を全てキャンセルしたいのです。
一文字ずつチェックするのではなく、一気に送られて来た文字を消す方法はありませんか？
宜しくお願いします。

**デフォルトの名無しさん** · 2016/12/06(火) 19:18:11.18

>>136
CRって復帰コードのことだろ？
最後にCRがついてくるなら、それが送られてくる最後の文字
なら、それが送られてきたら　Key には0入れて　Edit.Text := "";　でよかんべ

**デフォルトの名無しさん** · 2016/12/06(火) 20:03:14.51

こんなんじゃだめなの？

procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key = VK_RETURN then begin
ShowMessage('Enter!');
Edit1.Clear;
end;
end;

**デフォルトの名無しさん** · 2016/12/06(火) 20:26:28.30

ありがとうございます。
出来ました。
条件に合わなかったら入力したらいけないと変な思い込みをしてました。
助かりました。

**デフォルトの名無しさん** · 2016/12/07(水) 09:03:33.62

キーバッファｗ

**デフォルトの名無しさん** · 2016/12/07(水) 09:09:12.00

えっ？

**デフォルトの名無しさん** · 2016/12/07(水) 09:47:59.67

ラジオボタンって大きくならない？

**デフォルトの名無しさん** · 2016/12/07(水) 16:09:50.00

できません。

大きなラジオボタンの絵を描くならできます（ちょっと気持ち悪いので注意）。

procedure TForm1.FormPaint(Sender: TObject);
begin
　DrawFrameControl(Canvas.Handle, ClientRect, DFC_BUTTON, DFCS_BUTTONRADIO or DFCS_CHECKED);
end;

procedure TForm1.FormResize(Sender: TObject);
begin
　Invalidate; // フォームの再描画をWindowsに促す。
end;

**デフォルトの名無しさん** · 2016/12/08(木) 15:42:09.36

Berlin update2 のFireMonkeyで
Listbox.Items.Exchangeメソッドが動作しないXE2では動くのに

**デフォルトの名無しさん** · 2016/12/09(金) 16:34:59.90

お前が悪い

**デフォルトの名無しさん** · 2016/12/10(土) 23:22:51.23

質問です

**デフォルトの名無しさん** · 2016/12/10(土) 23:33:56.35

関連付けされてるファイルを起動するのは ShellExecute でできますが
例えば abc.csv ファイルを .txt で関連付けされてるアプリケーションで
開く簡単な方法はあるでしょうか

**デフォルトの名無しさん** · 2016/12/11(日) 06:10:35.77

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

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

”

**デフォルトの名無しさん** · 2016/12/11(日) 12:45:00.53

>>147
簡単には無いと思う。
レジストリ開いて関連付け調べてabc.csvを引数にそのプロセスを起動させる。

**デフォルトの名無しさん** · 2016/12/11(日) 16:52:57.05

拡張子に関連付けされた実行ファイル名の取得
http://mrxray.on.coocan.jp/Delphi/plSamples/480_GetFullExePath.htm

**デフォルトの名無しさん** · 2016/12/11(日) 18:44:37.29

>>149-150
サンキュー参考になりそう

ちなみに xray さん元気そうでなにより

**デフォルトの名無しさん** · 2016/12/12(月) 14:28:19.03

私はFindExecutable APIで拡張子".txt"のダミーのファイル名を渡して…というところまで考えていたのですが、そのものずばりなAPIがあるのですね。

**デフォルトの名無しさん** · 2016/12/15(木) 11:41:17.48

Cのライブラリで
const char *ss[] = {"abc", "def", "xyz", NULL};
を引数として要求するAPIがあるのですがDelphiからは
どうやって定義すればよいでしょう？

**デフォルトの名無しさん** · 2016/12/15(木) 12:42:40.01

ポインタのポインタ

**デフォルトの名無しさん** · 2016/12/15(木) 21:30:43.84

array of PChar

**デフォルトの名無しさん** · 2016/12/16(金) 08:13:11.02

>>154
>>155
ありがとう。
array of は内部的にはポインタなんですね。上手く動作しました。

**デフォルトの名無しさん** · 2016/12/16(金) 13:53:20.44

　IntArray: array[0..99, 0..99] of Integer;

　AI　:IntArray;
　P　 :Pointer;
　Fs　:TFileStream;
　i,j :Integer;

　　for i := 0 to 99 do
　　　for j := 0 to 99-1 do
　　　　AI[i,j] := Random(1000)+50;

　　Fs.Write(AI[0,0], SizeOf(Integer)*L );
　　Fs.Write(AI, SizeOf(Integer)*L );　　　 ………(#)
のどちらでも OK ですが、これは AI[0,0] と AI のアドレスが同じというだけで
　　AI[0,0] = AI
ではないのですから、(#)の記述は AI という '配列名' はポインタのように感じられます。しかし、
　　P := AI;
とするとコンパイラに怒られます。Delphi の '静的配列名' はポインタではないのしょうか。

**デフォルトの名無しさん** · 2016/12/16(金) 13:58:41.71

Fs.Writeの引数の型宣言みろ

**デフォルトの名無しさん** · 2016/12/16(金) 14:20:04.02

　引数は型なしパラメータだから、実際にはパラメータのアドレスが Fs.Write に渡され、
そのアドレスが処理対象になる。つまりそこに必要なサイズのメモリ領域が正しく確保さ
れていれば、その領域がどのような型なのかは関係ないということか。

　結局　Delphi の '静的配列名' はポインタではないんだね。

**デフォルトの名無しさん** · 2016/12/16(金) 14:32:37.28

P := Pointer(AI);

**153** · 2016/12/16(金) 16:08:44.84

後に誰かの参考になるかもしれないので少し詳しく書いておきます。

Cで作成されたDLL内の関数の.hファイルの定義が
void hoge(const char **hage);
となっていて、
const char *ss[] = {"abc", "def", "xyz", NULL};
hoge(ss);
という使用例が書かれてたところ、

procedure hoge(hage: array of PAnsiChar); cdecl; external 'kage.dll';

hoge(['abc', 'def', 'xyz', nil]);

で上手く動作しました。ペコリ。

**デフォルトの名無しさん** · 2016/12/16(金) 16:14:50.71

さんざん概出

**153** · 2016/12/17(土) 10:45:35.06

>>162
そうですか。スレ汚し失礼しました。ペコリ

**デフォルトの名無しさん** · 2016/12/18(日) 18:39:46.50

　TreeView をデザイン時にフォームに貼り付けてできたアプリを終了するとき
　TreeView の各ノードが保持するデータ（TreeView1.Items[n].data が保持しているデータ）
も自動的に廃棄されるのですか？

**デフォルトの名無しさん** · 2016/12/18(日) 18:51:06.13

>>164
TTreeNode::Data が保持するデータはプログラマが明示的に破棄しないとダメ。

**デフォルトの名無しさん** · 2016/12/18(日) 20:05:19.93

>>165
　ありがとう。
　以下のような感じでいいのですかな？

//TNodeData は TreeNode.Data が保持するデータのクラス

//+----------- FormDestroy ------------+
procedure TForm1.FormDestroy(Sender: TObject);
i: Integer;
begin
with TreeView1 do
for i = 0 to Items.Count - 1 do
TNodeData(Items[i].Data).Free;

//TreeView1.Items.Clear; 不要
end;

　あるいは TreeView のOnDeletion を使って

//+-------------- TreeViewDeletion --------------+
procedure Form1.TreeView1Deletion(Sender: TObject; Node: TTreeNode);
begin
if Assigned(Node.Data) then
TNodeData(Node.Data).Free;
end;

**デフォルトの名無しさん** · 2016/12/18(日) 20:17:52.63

>>166
そんな感じ。

**デフォルトの名無しさん** · 2016/12/20(火) 23:16:00.88

スレッドを使ったプログラムで、スレッド内にある未使用の変数をコメントアウトしたら、
終了する時にアクセスバイオレーションが出るんだけど、こんな事ってあるの？
プライベートに宣言してあるからメインとかが絡んでる事は無いのだけど。

**デフォルトの名無しさん** · 2016/12/20(火) 23:35:38.32

コメントアウトされた変数が確保していたメモリ域のおかげで
偶然アクセス違反が発生しない状態になってるとかじゃね？
要はコメントアウトしていなくてもコーディングミスで不正なメモリアクセスしている状態なのかも

**デフォルトの名無しさん** · 2016/12/20(火) 23:43:04.81

こんな時間にありがとう！
そんな事があり得るんですか。
難しいなぁ。

**デフォルトの名無しさん** · 2016/12/21(水) 12:39:12.66

あり得るというより一番多いパターンだったり

**デフォルトの名無しさん** · 2016/12/21(水) 14:28:11.26

「参照」とポインタの話か？　慣れるまで結構厄介だからな。

**デフォルトの名無しさん** · 2016/12/21(水) 17:50:14.49

ちょっと教えてください

自分自身（実行ファイル）を再起動する方法を教えてください
ちなみに二重起動を禁止したアプリでです
できれば再起動用の別アプリを使用しないのが理想的です．．．

**デフォルトの名無しさん** · 2016/12/21(水) 18:38:54.87

>>173
自分自身が起動するときだけ二重起動許可して起動確認できたら自分を閉じる

**デフォルトの名無しさん** · 2016/12/21(水) 21:13:47.15

>>174
ありがとうございます。
やはりその方向ですか。

リスタート後に最初のインスタンスのiniファイルを読み込みたいで
Mutexのチェックの前に最初のインスタンスの終了を待つ処理が
必要かなと漠然と考えていたんですが．．．

簡単でスマートな方法はないんですね

**デフォルトの名無しさん** · 2016/12/21(水) 21:25:28.28

>>175
自分（プロセスA）が自分（プロセスB）を起動するときに、コマンドラインで /restart というようなコマンドを渡す。
プロセスBは /restart ってコマンドを受け取ったら、Mutexの所有権を得るまで待機する。（再起動処理）
プロセスAはMutexの所有権を開放する。
/restartを受け取らなかった場合は、Mutexの所有権を得られなかった場合は終了する。（二重起動防止）

**デフォルトの名無しさん** · 2016/12/21(水) 23:03:33.63

>>176
そうですね

Mutexが取得できるまで待機すればいいですよね
終了待ちをもっと複雑な方法で考えてました
ありがとうございます

**デフォルトの名無しさん** · 2016/12/22(木) 20:53:24.89

よろしくお願いします。
『レコード型Aを利用する、クラスA』を自作したとします。
そして、『このクラスAとほとんど同じ機能を持つが、レコード型Bを利用する、別のクラス』を作りたいとします。
この場合、どう記述するのが効率良いでしょうか。

例えば、よくサンプルで見る、TListのItemにレコード型のポインタを使ってデータを入れる場合。
type
// レコード型A
PTRecA = ^TRecA;
TRecA = record
// 略
end;
// レコード型B
PTRecB = ^TRecB;
TRecB = record
// 略
end;

// クラスA・・・レコード型Aを利用
TClassA = class(TList)
　procedure SetItem(Rec: TRecA);
　function GetItems(Index: Integer): TRecA;
end;
// クラスB・・・レコード型Bを利用
TClassB = class(TList)
　procedure SetItem(Rec: TRecB);
　function GetItems(Index: Integer): TRecB;
end;

上記の様に、クラスAとクラスBで似た様なコードの重複が多い場合、
クラスの定義をもっと効率良く記述できる方法があれば教えていただきたいです。

**デフォルトの名無しさん** · 2016/12/22(木) 20:58:35.19

delphi ジェネリックスでググる

**デフォルトの名無しさん** · 2016/12/24(土) 05:08:06.07

クラスの継承を使えないか？
レコードのほうに「違い」を押し込んでクラスにして継承して、クラスは共用とできないか？
そもそもクラスとレコードに分ける必要があるのか？
などなど

**デフォルトの名無しさん** · 2016/12/24(土) 16:48:03.74

レコード型をクラスのメンバとしてポインタで管理して
そのポインタの実体を操作する仮想メソッドなどを作る。

**デフォルトの名無しさん** · 2016/12/24(土) 23:24:23.58

firemonkeyを使ってandroid向けのゲームを作り始めましたが
いきなり躓いて困ってます。

ゲームループのスレッドを作って描画を行っていますが
TBitmapがスレッドセーフでないため描画処理が正常に行えません。

firemonkeyでゲームを作る場合はメインスレッドのみで作るのでしょうか。

**デフォルトの名無しさん** · 2016/12/25(日) 02:11:22.91

lockしてもダメ?

**デフォルトの名無しさん** · 2016/12/25(日) 09:12:26.41

DrawGridのセルの色を取得する方法を教えて下さい。
どのセルに何色を塗ったか記憶しているのですか、
もっと簡単に知る方法があると思い質問させてもらいました。
宜しくお願いします。

**デフォルトの名無しさん** · 2016/12/25(日) 09:56:13.82

>>182
スレッド側でBitmap描画してからSynchronize使ってメインスレッドのBitmapに転送すれ

**デフォルトの名無しさん** · 2016/12/25(日) 09:59:02.44

>>183
Delphi6の時はCanvas.Lockがあったと思いますが
今使ってるDelphi10.1ではLockが見つからなくて・・・

**デフォルトの名無しさん** · 2016/12/25(日) 10:11:02.14

>>185
スレッド側で描画用のBitmapをCreateしてWidth、Heightを設定した段階で
EBitmapSizeTooBigの例外が発生してしまうため、そこまで辿り着けなくて困ってます。

**デフォルトの名無しさん** · 2016/12/25(日) 10:30:12.14

例外の種類見る限り、スレッドと関係なさそうに見えるが。
ビットマップが大きすぎるってWidthとHeightをいくつに設定しようとしたの？

**デフォルトの名無しさん** · 2016/12/25(日) 10:36:40.00

>>188
サイズは350x450なのでたぶん大きすぎることはないと思います。
メインスレッドで動作させた場合は、例外が発生することなく動作するので
メインスレッド以外ではTBitmapは使えないのかと・・・

また、Windowsでは正常に動作してAndroidで動作させると例外が発生するため
Android固有の問題なのかなと思いまして

**デフォルトの名無しさん** · 2016/12/25(日) 12:33:01.08

>>186
map/unmap

**デフォルトの名無しさん** · 2016/12/25(日) 17:27:44.55

>>189
AndroidのThreadで発生するってQPに上がってるからVOTEしとけばそのうち治るんじゃないかな
そのうち。

**デフォルトの名無しさん** · 2016/12/25(日) 17:59:22.97

Delのバグかよ

**デフォルトの名無しさん** · 2016/12/25(日) 18:04:15.67

>>190
教えていただいたものを使って処理を行ってみましたがダメでした。

>>191
期待しないで待つことにします。

別スレッドでの処理を諦めてとりあえずメインスレッドで全て行うようにします。
相談に乗っていただいた方々ありがとうございました！

**デフォルトの名無しさん** · 2016/12/28(水) 09:28:27.13

Delphi 10.1 BerlinのStarterでチュートリアルをやってます。
http://docwiki.embarcadero.com/RADStudio/Berlin/ja/ユーザーアクションに対する応答をコードエディタでコーディングする（IDE チュートリアル）
このページの中ほどまで進んだら
[dcc32 エラー] TextEditorUnit.pas(94): E2003 未定義の識別子 : 'TDialogServiceSync'
というエラーが表示されてしまいます。
どうしたら修正できるのでしょうか？