ようこそゲストさん | ログイン |

掲示板

トップページ > 記事閲覧
ver7で作成したvb6アプリをver9で動作した時のPRI
日時: 2018/04/11 14:10
名前: nakano10

お世話になります。

xp sp3、VB6.0 SP6、GEOSIS-OCX ver7 で作成したプログラムを
windows10(64bit)、GEOSIS-OCX ver9(2016.11.18.9)で動作させたところ、PRINTOUTにて意図しない結果が印刷されました。
印刷指定範囲が用紙の左上に意図したサイズより縮小して印刷されるという状態です。

GEOSIS-OCX ver9はdiskのGEOSIS-OCX Ver9 license\setup.exeからインストールしております。

なお、exeと同じフォルダにver7(2016.10.14.7)またはver8(2016.10.14.8)のgeoltocx.ocxを配置すると問題なく印刷されるのですが、
ver9で適切に印刷される方法はございませんでしょうか?

メンテ

Page: 1 |

Re: ver7で作成したvb6アプリをver9で動作した時 ( No.1 )
日時: 2018/04/12 13:50
名前: GEOSISサポート

nakano10様

弊社内で確認を行いましたが現象が確認できませんでした。
画面の表示倍率設定で正常に出力されない場合も考えられますので
・コントロールパネル→ディスプレイ→全ての項目のサイズを変更する→100%に設定する
をお試し頂けますでしょうか。
※弊社内で100%、125%で試してみましたが現象は確認できませんでした。

上記で現象が改善されない場合、下記情報をいただけますでしょうか。
・PRINTOUTコマンドのパラメータ
・出力範囲中間ファイルを作成している場合は作成方法
・プレビュー上での表示

以上よろしくお願いします。
メンテ
Re: ver7で作成したvb6アプリをver9で動作した時のPRI ( No.2 )
日時: 2018/04/12 15:20
名前: nakano10

ご返信ありがとうございます

「コントロールパネル〜〜〜100%に設定する」で改善が見られませんでしたので以下に指定されたものを示します。


<PRINTOUTコマンドのパラメータ>

georet = gexec(GEOSIS, "PRINTOUT", "PRNRECTA2", argRS![XMIN], argRS![YMIN], argRS![XMAX], argRS![YMAX], "!", "OFF", seishokuFn & ".prt", argExeMode, "! !", "COLOR", "! ! ! !", Chr$(&H22) & prnJobName & Chr$(&H22))
各変数の値は
argRS![XMIN]=5
argRS![YMIN]=49
argRS![XMAX]=282
argRS![YMAX]=405
seishokuFn="A3VerAbiko3"
argExeMode="ON"
prnJobName="2018/04/12 14:32:43"


※続きます
メンテ
Re: ver7で作成したvb6アプリをver9で動作した時のPRI ( No.3 )
日時: 2018/04/12 15:21
名前: nakano10

※続きから

<出力範囲中間ファイルを作成している場合は作成方法>
georet = gexec(GEOSIS, "FGCURDB", "PRNRECTA2", "C", "!", "! !", aryRctX(1), aryRctY(1), "POLS", 98, "12345", 1, 0)
georet = gexec(GEOSIS, "FGCURDB", "PRNRECTA2", "A", "!", "! !", aryRctX(2), aryRctY(2), "POLN", 98, "12345", 1, 0)
georet = gexec(GEOSIS, "FGCURDB", "PRNRECTA2", "A", "!", "! !", aryRctX(3), aryRctY(3), "POLN", 98, "12345", 1, 0)
georet = gexec(GEOSIS, "FGCURDB", "PRNRECTA2", "A", "!", "! !", aryRctX(4), aryRctY(4), "POLN", 98, "12345", 1, 0)
各変数の値は
aryRctX(1)=20568.486
aryRctY(1)=-17236.215
aryRctX(2)=20568.486
aryRctY(2)=-17022.615
aryRctX(3)= 20734.686
aryRctY(3)=-17022.615
aryRctX(4)=20734.686
aryRctY(4)=-17236.215

※続きます
メンテ
Re: ver7で作成したvb6アプリをver9で動作した時のPRI ( No.4 )
日時: 2018/04/12 15:22
名前: nakano10

※続きから

<プレビュー上での表示>

印刷時とは異なり、指定範囲の一部が欠損して表示されることがあります、
一部とは、指定範囲を上下左右に4分割したならばそれらのうちの左上に相当する領域です、
印刷時とは異なり縮小される、ということはありません、なおプレビューを繰り返すとプレビュー内が正常に表示されることもあります。

また、プレビューが表示された瞬間に「警告:拡大制限エラーです」とメッセージボックスが表示されます、
そしてGEOSISコントロール上で表示中のVXYの上になぜかプレビューと同じ内容が欠損なく表示されることがあります(ただの白紙のときもあります)、プレビューを閉じると消えます。


以上、よろしくお願いいたします。
メンテ
Re: ver7で作成したvb6アプリをver9で動作した時のPRI ( No.5 )
日時: 2018/04/17 15:39
名前: nakano10

お世話になっています

状況に変化がありましたのでお伝えします。

PRINTOUT直前にDoEventsまたはDSPINVALを行いますと、プレビューの問題は解消いたしました。

そして当初申し述べました「印刷指定範囲が用紙の左上に意図したサイズより縮小して印刷される」という問題も解消いたしましたが、

見落としていた問題が顕わになりました。整飾ファイルで指定したL、SG、PFGが印刷されないことがある、という状況です。(プレビューは正しく表示されます)

A4印刷とA3印刷(各々別な整飾ファイルです)を行っていますがA3のみこの状況に見舞われます。

またPRINTOUTの他に印刷指定範囲を回転してPRINTOUTOP3も行っているのですが、PRINTOUTのみこの状況に見舞われます。

また別なプログラムにおいても同様の状況に置かれており、こちらもPRINTOUTのみですがver7,ver8でも発生しています。
なおこちらはDSPINVALでは当初の問題は解消せず、DoEventsで解消しました。

※続きます
メンテ
Re: ver7で作成したvb6アプリをver9で動作した時のPRI ( No.6 )
日時: 2018/04/17 15:39
名前: nakano10

※続きから

まとめますと

<最初のプログラム>

ver7
○A4印刷
○A4回転印刷
○A3印刷
○A3回転印刷

ver8
○A4印刷
○A4回転印刷
○A3印刷
○A3回転印刷

ver9
○A4印刷
○A4回転印刷
×A3印刷
○A3回転印刷

※続きます
メンテ
Re: ver7で作成したvb6アプリをver9で動作した時のPRI ( No.7 )
日時: 2018/04/17 15:40
名前: nakano10

※続きから

<また別なプログラム(A4印刷機能とプレビュー機能はありません)>

ver7
×印刷
○回転印刷

ver8
×印刷
○回転印刷

ver9
×印刷
○回転印刷


以上、よろしくお願いいたします。
メンテ
Re: ver7で作成したvb6アプリをver9で動作した時のPRI ( No.8 )
日時: 2018/04/18 09:42
名前: GEOSISサポート

nakano10様

弊社でA3印刷を確認いたしましたが、現象を確認することができませんでした。

大変恐縮ですが、確認用に表示テーブル一式と整飾ファイルを下記GEOESISサポートメール宛にお送り頂けないでしょうか。

GEOSISサポートメールアドレス:support_geosis@as-locus.jp
メンテ
Re: ver7で作成したvb6アプリをver9で動作した時のPRI ( No.9 )
日時: 2018/04/18 16:08
名前: nakano10

お世話になっております

送付してから試行錯誤しておりますと、
PRTファイルの「R」の行をコメントアウトすると当然付属図は出なくなりますが、
先の「L、SG、PFGが印刷されない」が解消されることが確認されました、解決ではありませんが。

なお、Rに伴うTで指定されている中間ファイルは以下のように登録しております。

georet = gexec(GEOSIS, "FGCURDB", "MAYERSTAMP", "C", "! ! ! ", -10, -10, "! ! ! !")
georet = gexec(GEOSIS, "FGCURDB", "MAYERSTAMP", "A", "! ! ! ", 10, -10, "! ! ! !")
georet = gexec(GEOSIS, "FGCURDB", "MAYERSTAMP", "A", "! ! ! ", 10, 10, "! ! ! !")
georet = gexec(GEOSIS, "FGCURDB", "MAYERSTAMP", "A", "! ! ! ", -10, 10, "! ! ! !")

georet = gexec(GEOSIS, "ADDBMC", Chr$(&H22) & App.Path & "\BMP\stamp.bmp" & Chr$(&H22), 500, "MAYERSTAMP.TMP")

stamp.bmpは248dotx248dot 8bit のビットマップです。

以上、よろしくお願いいたします。
メンテ
Re: ver7で作成したvb6アプリをver9で動作した時のPRI ( No.10 )
日時: 2018/04/19 11:26
名前: nakano10

お世話になっております

送付していただいたocxで問題が解決したことを確認しました。

なお、先に挙げました「また別なプログラム」でver7,8での問題はocxをexeと同じところに置いていたときの現象でした、
ver7,8のocxをsyswow64に配置して動作して問題無かったことを確認しました、これについては失礼しました。

また何かありましたときはよろしくお願いいたします。

※EDITSDSPのスレッドに間違って書き込んでしまいました、可能でしたら削除をお願いいたします。
メンテ

Page: 1 |



| 利用規約 |

(C) 2024 AS Locus INC.