投稿日	： 2006/09/27(Wed) 09:15
投稿者	： あおむし
Ｅメール	：
ＵＲＬ	：
タイトル	： Re^2: 画像を消去したいのですが・・・

花ちゃん　様
早速ご覧頂き、ありがとうございました。また、返事が遅くなってしまい、申し訳ございませんでした。

> > ある条件で検索されたビットマップをイメージボックスに表示させた後、その表示を消去させた
> > いのですができません。
> > イメージボックスのVisibleをFalseにしたり、
> イメージボックス とは、表示設定はどのようにしていますか？
>
うまく説明できないので、画像を貼り付けている部分のコードを記します。
s_Kakutyoshi = "bmp"
s_BMPFile = Dir$(Dir1 & "\*.*")
Do While s_BMPFile <> ""
     If StrComp(Right$(s_BMPFile, 6), Me.cbo_KaisyaCd & "." _
          & s_Kakutyoshi, 1) = 0 Then
        AutoRedraw = True
        s_stamp = (Dir1) & "\" & (s_BMPFile)
        Img_Stamp.Picture = LoadPicture(s_stamp)
        Img_Stamp.Stretch = True
        PaintPicture Img_Stamp.Picture, 7320, 4260, 2895, 2805
　　　　　　　　　　　：
　　　　　　　　　　　：
としています。消去させたい部分でAutoRedraw = Falseとも記述しています。

> > Set Image1.Picture = LoadPicture()
> > を記述してみましたが、消すことができません。
> Image コントロールに描画しているなら、Set Image1.Picture = LoadPicture() で消えますが。

描画自体にも悩んでいて、ようやく上記のやり方でできたところです。
これだけでも苦労しているほどの初心者です。よろしくお願いします。

★ - 画像を消去したいのですが・・・ - あおむし 09/26-21:54No.7343
• Re: 画像を消去したいのですが・・・ - 花ちゃん 09/26-22:11 No.7344
  • Re^2: 画像を消去したいのですが・・・ - あおむし 09/27-09:15 No.7345
    • Re^3: 画像を消去したいのですが・・・ - 花ちゃん 09/27-09:52 No.7346
    • Re^3: 画像を消去したいのですが・・・ - 大吉末吉 09/27-10:51 No.7349
      • Re^4: 画像を消去したいのですが・・・ - あおむし 09/27-11:24 No.7351
        • Re^5: 画像を消去したいのですが・・・ - 大吉末吉 09/27-11:50 No.7353
          • Re^6: 画像を消去したいのですが・・・ - あおむし 09/28-19:04 No.7372