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

掲示板

トップページ > 記事閲覧
印刷時のコピーについて
日時: 2009/08/24 11:37
名前: GEOSISサポート受付

印刷時に、決まったレイヤ・ラインタイプのポリゴンのみ、違うグループにコピーしたいのですが、処理に時間がかかります。何かよい方法はないでしょうか?

ポリゴン(Grp600 Lay610 Lin611)をポリゴン(Grp990 Lay610 Lin611)へコピー

GeoRet = GExec("SETSGRP", "OFF ! ! ALL")
GeoRet = GExec("SETEGRP", "OFF ! ! ALL")
GeoRet = GExec("SETSLAY", "OFF ! ! ALL")
GeoRet = GExec("SETELAY", "OFF ! ! ALL")
GeoRet = GExec("SETSGRP", "ON ! ! 600")
GeoRet = GExec("SETSLAY", "ON ! ! 610")
GeoRet = GExec("SETEGRP", "ON ! ! 990")
GeoRet = GExec("SETELAY", "ON ! ! 610")
GeoRet = GExec("FGGETFIG", "ZALL ZWK GRP P 611")
GeoRet = GExec("FGGTOA", "ZWK ZWK1")
GeoRet = GExec("FGINPUT", "ZWK1 990 ALL OFF")
メンテ

Page: 1 |

Re: 印刷時のコピーについて ( No.1 )
日時: 2009/08/24 11:37
名前: GEOSISサポート

【FGCOPY】コマンドを使用すると、処理速度が速くなります。
※ただし、GEOSIS-OCXがVer5以降で使用可能なコマンドになります。

■変更前
GeoRet = GExec("FGGETFIG", "ZALL ZWK GRP P 611")
GeoRet = GExec("FGGTOA", "ZWK ZWK1")
GeoRet = GExec("FGINPUT", "ZWK1 990 ALL OFF")
  ↓
■【FGCOPY】を使った場合
GeoRet = GExec("FGGETFIG", "ZALL ZWK GRP P 611")
GeoRet = GExec("FGCOPY", "ZWK 990 610 ALL OFF")


※GEOSIS-OCXがVer4以前の場合は、対策がございません。
どのような目的でコピーをされているのでしょうか?
メンテ
Re: 印刷時のコピーについて ( No.2 )
日時: 2009/08/24 11:38
名前: GEOSISサポート受付

GeosisVer3を使用しています。

以下の通りの処理をしたいのですが

通常の画面表示
ラスタ  Grp 300
ポリゴンA Grp 600 Lay610 Lin611
ポリゴンB Grp 600 Lay620 Lin621
   ※ラスタの上にポリゴンA・Bを表示 


図面印刷時のみ
ポリゴンB Grp 600 Lay620 Lin621
ラスタ  Grp 750 ←Grp300と同一ファイルをBMRで設定
ポリゴンA Grp 990 Lay610 Lin611 ←Grp600 Lay610 Lin611をコピーして使用したい
   ※ポリゴンAの上にラスタ、その上にポリゴンBを表示
メンテ
Re: 印刷時のコピーについて ( No.3 )
日時: 2009/08/24 11:39
名前: GEOSISサポート

以下の設定にすることで、図形を登録せずに図面印刷時の設定にすることが可能です。

GRP 990 にGRP 600と同じ図面を定義し、GRP990で使用するEDSでは 610 のみを表示する設定にします。
※LAY 610 にLin611のポリゴン以外のデータが存在する場合は、表示テーブルの設定で非表示にします。(陰線にする、サイズを0にするなど)


■既存の動作の場合
以下のように変更することで処理速度が多少速くなります。
(FGGETFIGをALLで実行し、FGGTOAは実行しない)
 【変更前】
  GeoRet = GExec("FGGETFIG", "ZALL ZWK GRP P 611")
  GeoRet = GExec("FGGTOA", "ZWK ZWK1")
  GeoRet = GExec("FGINPUT", "ZWK1 990 ALL OFF")
  ↓
 【変更後】
  GeoRet = GExec("FGGETFIG", "ZALL ZWK ALL P 611")
  GeoRet = GExec("FGINPUT", "ZWK 990 ALL OFF")
メンテ

Page: 1 |



| 利用規約 |

(C) 2024 AS Locus INC.