コンパイルエラーの回避策は？

[TPK]

お世話になってます。
今回はコンパイルエラーで困ってます。
WROBJPROPERTY構造体変数を引数に持つAPI関数（wrSetObjectPropなど)を一つのプロシージャ内でたくさん使うと,「動的なローカル変数が多すぎます｣というコンパイルエラーが発生します。

しかも、ヘルプの通りにローカル変数をStatic宣言しても,パブリック変数にしても,やはりエラーは出るのです。

例えば,以下のサブプロシージャを新規プロジェクトに追加します（FormモジュールでOK。もちろんWINGRPT.TXTも追加)。

Private Sub ABCtest()
Dim intret As Integer
Dim hReport As Long
dim usruseobject As WROBJPROPERTY
Dim k As Long
intret = wrSetObjectProp(hReport, “ABC”, WON_VISIBLE, usruseobject)
intret = wrSetObjectProp(hReport, “ABC”, WON_VISIBLE, usruseobject)
　　～（以下同じ行を140行ほど貼り付けます。）
End Sub

他には何のコードも書かずに,｢完全コンパイル後に実行｣をかけるとだいたい133回目ぐらいにwrSetObjectPropを呼び出した行で,上記のコンパイルエラーが出ます。

環境は,Win2000+VB6(SP4)+WingReport2.0J(最新モジュール摘要済)です。

何か,回避方法はあるでしょうか？私のマシンだけでのトラブルでしょうか…？

[松嶋＠ソフトウィング]

お世話になります。

ご連絡頂きました現象を確認させて頂きました。
現象の発生する原因は判明しておりません。このタイミングで
はウィングレポートの呼び出しは行われておりませんので、
ＶＢ側の制約で実行出来ない場合が考えられます。

対応方法としては、wrSetObjectPropを複数の関数に分散する
事が考えられます。

以上です。宜しくお願い致します。

[投稿者]

投稿