ab.com コミュニティ

真紅

追加情報

PC起動
↓
ABエディタでこのソースを貼り付ける
↓
デバッグ実行
↓
コンパイル＆実行成功
↓
１文字消してから消した文字を書き直す
↓
デバッグ実行
↓
不正な処理でコンパイラが落ちる

何でしょうこれ？

真紅

Ver4.21にて ↓をデバッグ実行（F2）しようとすると、コンパイラが不正な処理で落ちます。ところが、デバッグコンパイル（F4）やリリースコンパイル（F7）では問題なくコンパイルが完了し、動作も問題ありませんでした。 #console Class HideMenuItem Private ItemStr As BytePtr pfDraw As *Sub() pfMain As *Sub() pfSet As *Sub() Public Sub ~HideMenuItem() free(ItemStr) End Sub Sub Set(str As BytePtr, pfMain As V...

真紅

結局こんな感じにしたら割と楽になりました。

コード: 全て選択


Class TEST
Public
    b As Long
End Class

Dim a As *TEST
Dim i As Long

a = New[ELM(4)] TEST
For i = 0 To 3
    a.b = 1
Next
Delete a

ただし数の変更が効かないのが難点ですね。

有難う御座いました。

真紅

クラスオブジェクトのポインタの配列を扱いたいのですが、配列数が不定なので動的にメモリを確保したいのです。静的であれば、 Dim test[100] As *TEST とすればうまくいくのですが…。 ↓のような事をしようとしています。 Class TEST Public b As Long End Class Dim a As **TEST Dim i As Long a = malloc(4 * 4) For i = 0 To 3 a = New test() a ->b = 1 Delete a Next free(a) 要はポインタのポインタ型を使えないかということです。ポインタ配列を...

真紅

> 私のコードはウィンドウクラスを登録して、それをDLGTEMPLATEの後ろにウィンドウクラス名を指定したんです。
> なのであれはダイアログプロシージャではなく、ウィンドウプロシージャなんです。

そうなんですか。
ウィンドウクラスを指定するとダイアログプロシージャではなくなるんですね。
アプリケーションが終了してしまうのは何でだろう…。

真紅

できました!! どうもうまくいかないなと思っていたら、DialogBoxIndirectParam関数の第２引数にメモリオブジェクトハンドルを渡してしまっていました。どっかのサイトではそんな風になってたんだけどな…。 DLGTEMPLATE構造体の後ろに付加しなければならないのは「メニュー」、「クラス名」、「タイトル名」、「フォントサイズ」、「フォント名」、「DLGITEMTEMPLATE構造体配列」らしいです。いまいちわからないのはMSDNで書かれていたDWord境界に整列するとか何とか。可変長配列はWord境界ともあったし、どこからどこまでをどう整列すればいいのかよくわからない…。 ...

真紅

DialogBoxIndirectParam関数を調べてみましたが、かなり大変ですね。

DLGTEMPLATE構造体の後につけなければならないという可変長配列もあまりはっきりとわからないし…。

アイコンを無しにするためにここまでやるのも疲れるので、アイコンくらいもう気にしないようにします。（逃？

真紅

それも考えたんですけどねー。

ツールウィンドウは別のところで使用しているので意味付け的にちょっと…。

真紅

やっぱりそういう方法しかないみたいですね。
クローズボタンのみってのができればいいんですけど…。

Cではリソースでダイアログを作成したりするとアイコンなしのが作れますよね。
あれはまた何か特殊だったりするのでしょうか？

とりあえずはアイコン有りでやっていこうかと思います。
有難う御座いました。

真紅

タイトルバーのアイコン無しのウィンドウって作れるのでしょうか？

WNDCLASS(EX)構造体の hIcon・hIconSm を NULL にしたり、WM_SETICONでNULLを送るという方法ではダメでした。
何か条件や他の方法があるのでしょうか？

アイコンのない方がダイアログっぽいかなと思いまして…。

真紅

わかりやすい説明有難うございます。
結構自分は長いこと勘違いしてました。
普通に関数で同じことをやってみても同じことになりますね。

オブジェクトを生成するたびに次の配列番号を変更していくようにしたかったのですが、コンストラクタでなくても普通に生成後に処理すればよかっただけなんですよね…。

とにかく有難うございました。

真紅

コード: 全て選択


Dim a As Long

Class test
Public
	Sub test()
		a = 1
	End Sub
End Class

Dim obj[1] As *test
obj[a] = New test()

debug

オブジェクトポインタの配列で配列番号にaという変数を使用しています。
aの内容が0の状態で obj[a] = New test() などとして、testクラスのコンストラクタでaの内容を書き換えると、代入されるオブジェクトポインタの配列番号はコンストラクタで書き換えられた方が使われてしまいます。

これは仕様でしょうか？バグでしょうか？

ab.com コミュニティ

検索結果 12 件

追記

関数ポインタ型メンバ変数

Re: ポインタのポインタ

ポインタのポインタ

Re: RADのダイアログをDialogBoxIndirectParamで

Re: RADのダイアログをDialogBoxIndirectParamで

Re: う～ん

Re: う～ん

う～ん

アイコン無しダイアログ

仕様ですか

コンストラクタでのグローバル変数の書き換え