• ベストアンサー

コードで描画した図形の個別の消去方法

VB6.0でLineやCircleで図形をピクチャの上に描画することを現在作成中ですが、描画した図形をすべてクリアすることはできるのですが、描画した直前のもの、または描画した図形の中で個別に指定して消去できるのでしょうか。教えて頂けたらありがたいと思います。

質問者が選んだベストアンサー

  • ベストアンサー
  • A88No8
  • ベストアンサー率52% (834/1602)
回答No.1

こんにちは >VB6.0でLineやCircleで図形をピクチャの上に描画することを現在作成中ですが、描画した図形をすべてクリアすることはできるのですが、描画した直前のもの、または描画した図形の中で個別に指定して消去できるのでしょうか。  原則的にプログラムで制御して描画した図形は、プログラムで消去するしかありません(CTRL+Zが有効なプログラミング言語があればよいのですが)。  実現方法としては、描画した過去のグラフィック画面を保存しておく方法が単純です。  おおよその処理は以下のようになるでしょう(エラー処理も入れてくださいね)(^^; 描画プログラム開始  DO WHILE   コマンド受け付け   IF 描画コマンド THEN    実行する    現在の画面を保存する   ELSEIF 復活コマンド THEN    現在の画面を保存された画面に置き換える   ELSEIF 終了コマンド THEN    END WHILE   ENDIF  WEND 描画プログラム終了

sh2361
質問者

お礼

A88No8さん、早速のご教授ありがとうございました。

関連するQ&A

  • 図形描画

    ワードでテキストを使用すると図形描画が出その中で作成し必要な場所 で貼り付けています。図形描画の枠が出ず好きな所で使用するには どうしたらいいのですか どなたな教えて頂けませんか? パソコンは古く2000です。

  • ワード2002で図形を描画すると・・・

    こんにちは。 ワード2002で、地図入りの案内状を作成しようとしています。(地図は、図形描画ツールバーを使い、図形を組み合わせて作ります。) そこで、図形描画ツールバーから図形を挿入すると、画面が変わり(別画面が出ます)、上の文章とのバランスを見ながら、地図作成ができなくなります。これを、以前の2000の時のように、印刷レイアウトのまま、作成することはできますか? 初期設定のままですが、何か設定を変えたらできるのでしょうか。 よろしくお願いしま~す!

  • Picture の描画について 質問です

    「[Picture1]に描画された図形」の上に 「[Picture2]に描画された図形」を重ねて表示したいのですが、 この場合、[Picture2]の背景のみを透明にして、描画された図形のみを表示するという事をしたいです。 例 a「[Picture1]に半径6cmの色が赤の円」 b「[Picture2]に半径3cmで色が黒の円」 aの上にbを重ねると、外側が赤、内側が黒の二重丸が描画される という具合です。  この描画が可能なら[Picture1]に限らず他のものでも構いませんので、どうか御教授お願いします。

  • 図形描画の方法

    2000XPでワードの書類の文字に ○で囲みたいのですが図形描画の ○を使いオートシェイプの書式設定を塗りつぶし無し、レイアウトを前面で 貼り付けたのですが、○を文字に重ねると文字と○が上の方に少し移動してしまい 位置がずれてしまいます。指定した位置に、○で囲った文字を書きたいのですがどうすればいいのでしょうか。ちなみに、ウィンドウズ98の時はすんなり、指定した位置でまるを囲むことが出来ました。教えてください。お願いいたします。

  • ワードで図形描画を使用する理由

    ワードの勉強の中で 複数を図形を描いた場合 図形描画を使用します。 ワードで図形描画を使用する理由は 描いた全ての図形の一括移動などに 便利だからでしょうか?

  • WORD、図形描画の枠線

    Microsoft WORD2003を使っています。 文書の中で図形描画コマンドのアイコン(矢印やテキストボックスなどを挿入する)を クリックすると文書のほうに「描画をここに作成します」という文字と共に半グレーの 枠線が表示され文字行がずれます。この図形描画用の枠をデフォルトで表示されないように 設定することは可能なのでしょうか。可能でしたらその方法をお教え願います。

  • Excelのグラフに重ねて描画した図形が表示されない

    Excelでグラフを作成し、その上に重ねる形で図形を描画しました。 (グラフを選択したのち、図形描画ツールバーの「オートシェイプ」ボタンを使って作成しました) すると、グラフの選択を解除すると、描いたはずの図形が消えてしまいます。でも、グラフを選択すると、表示されます。印刷プレビューでも表示されますし、実際に印刷もされます。 グラフを選択していなくても図形が表示されたままにしたいのですが、どうすればよいかご存知の方、ご教授下さい。

  • VISIOでVBAを使っての図形描画

    VISIOで自動で図形を描画するVBAを作成しております。 テキストからのデータの取得、 取得したデータにしたがっての、 長方形の作図、線の作成は出来ました。 この発展系として、 取得した座標を使っての図形の描画(例:三角形、中が塗れるやつ)が 上手くできません。 VISIOで普通に線を書くと、線をつなげて書いて、 最後に始点とつなげると、自動で図形になり、中を塗ることが出来るようになります。 ためしに、マクロの自動記録で、↑の作業をマクロ化してみましたが、 1個の三角形を書くマクロが生成され(ShapeのIDが決め打ち) 目的のような使い方は出来ませんでした。 お手数ですが、サンプルコード等ありましたら、お教えください。

  • タブコントロール上のピクチャーコントロールへの描画

    お世話になっております。 VC2005を使用しております。 SDIベースです。 ダイアログを作成し、その上にタブコントロール(2ページ)を作成しました。 タブコントロールの1ページ目にピクチャーコントロールを配置し、ピクチャーコントロール上に描画を行おうと思うのですが、正常に動作しません。 OnPaintの中で描画を行っているのですがだめのようです。 タブコントロール外に、ピクチャーコントロールを配置すると描画する事ができます。 どのような、タイミングで描画を行えばよいのでしょうか? 教えてください。 よろしくお願いします。

  • VB6で直前の操作を取り消す方法

    VB6を使ってフリーハンドで「ピクチャ」コントロールに描画をするアプリケーションソフトを作成中ですが、間違って描画した直前の線だけを取り消したいのですが、Excelで使用できる「戻る」ボタンや「やり直し」のようなボタンを作成できないでしょうか?

専門家に質問してみよう