tagCANDY CGI VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
[ツリー表示へ]  [ワード検索]  [Home]

タイトル Re^6: こんなことできるのかな?
投稿日: 2008/03/01(Sat) 21:10
投稿者だめおやじ
< 琴さんへ早速の返事ありがとうございます。
>> Picture2はPicture1の中に配置されているんですよね?
< そのとおりです。
> >例えばデザイン画面でPicture1の位置だけを動かすとPicture2も一緒に動く状態です。
< そのとりです
> > 範囲を超えない仕組みは自分で作るしかないような。
> >Picture2の座標はPicture1上(左上が原点)での座標になるので
> >上方向と左方向はマイナス値になったら0にしてあげることで
> >Picture1の見えている部分からはみ出さなくなります
< このようなコードを書きましたがドラッグした位置には表示されませんでした。
 何か悪いんでしょうね。
If Picture1.Left + x - lngX < 0 Then
x = 0
    Source.Move (Picture1.Left + x - lngX), (Picture1.Top + y - lngY)
End If
If Picture1.Top + y - lngY < 0 Then
y = 0
   Source.Move (Picture1.Left + x - lngX), (Picture1.Top + y - lngY)
End If
x = 0
y = 0
If Picture1.Left + x - lngX < 0 Or Picture1.Top + y - lngY < 0 Then
    Source.Move (Picture1.Left + x - lngX), (Picture1.Top + y - lngY)
End If


< これから先のアドバイスは、未知の分野でけんとうもつきませんせした。頑張ってみます。
> 下方向と右方向はPicture1の表示範囲(ScaleHeight、ScaleWidth)と
> Picture2の座標(Top、Left)と大きさ(Height、Width)で計算して
> 範囲内に収まるようにしてあげるといいでしょう。
< 右お礼まで。

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。