|
ｿｽ@ｿｽｿｽｿｽ}ｿｽEｿｽXｿｽﾅ画像ｿｽ動ゑｿｽｿｽｿｽｿｽﾛのゑｿｽｿｽｿｽﾂゑｿｽｿｽｿｽﾈゑｿｽｿｽｿｽｿｽﾉゑｿｽ
|
ｿｽgｿｽbｿｽvｿｽyｿｽ[ｿｽWｿｽｿｽ
ｿｽeｿｽｿｽｿｽｿｽﾌ過具ｿｽｿｽｿｽｿｽO
ｿｽEC/C++
ｿｽEDelphi
ｿｽEVisual BasicｿｽｿｽｿｽSｿｽｿｽ
ｿｽ@(VB2-VB6ｿｽｿｽ.NETｿｽｿｽｿｽp)
ｿｽEVisual Basic(VB2-VB6)
ｿｽEVisual Basic .NET
ｿｽEVisual C++
ｿｽﾖ連ｿｽTｿｽCｿｽg
ｿｽEpapy's softwarelibrary
ｿｽ艪ｽｿｽｿｽｿｽﾒー 2011/04/08(ｿｽｿｽ) 08:24:38
ｿｽﾟ具ｿｽｿｽｿｽｿｽOｿｽｿｽｿｽｿｽQｿｽlｿｽﾉゑｿｽｿｽﾄマｿｽEｿｽXｿｽNｿｽｿｽｿｽbｿｽNｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾉマｿｽEｿｽXｿｽｿｽｿｽﾉゑｿｽｿｽｿｽ鞫懶ｿｽｿｽﾈ会ｿｽｿｽﾌようｿｽﾈ包ｿｽｿｽ@ｿｽﾅ難ｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽ
ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾆには撰ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽAｿｽﾇゑｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽﾅ抵ｿｽｿｽﾉ画像ｿｽｿｽｿｽｿｽｿｽｿｽﾂゑｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽﾄ搾ｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽ
ｿｽｿｽｿｽｿｽﾂゑｿｽｿｽﾆ鯉ｿｽｿｽｿｽｿｽｿｽｿｽﾍ、ｿｽｿｽｿｽﾉ縞ゑｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽﾄ鯉ｿｽｿｽﾉゑｿｽｿｽｿｽtｿｽHｿｽ[ｿｽｿｽｿｽﾌ色ｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽﾄゑｿｽｿｽ驫ｴｿｽｿｽｿｽﾅゑｿｽ
private
{ Private ｿｽ骭ｾ }
Orgpoint : Tpoint;
Drawing : Boolean;
procedure TForm1.Image1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
Drawing := true;
Orgpoint := point(x,y);
end;
procedure TForm1.Image1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
Var
P : TPoint;
begin
If Drawing then begin
P := Image1.Parent.ScreenToClient(Image1.ClientToScreen(Point(X, Y)));
Image1.Left := P.X - Orgpoint.x;
Image1.Top := P.Y - Orgpoint.y;
end;
end;
procedure TForm1.Image1MouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
Drawing := False;
end;
ｿｽﾂ具ｿｽｿｽｿｽDelphi7 Professional
WindowsXp Home SP3
ｿｽﾅゑｿｽｿｽB
ｿｽXｿｽpｿｽCｿｽ_ｿｽ¥ｿｽｿｽｿｽeｿｽBｿｽAｿｽｿｽｿｽｿｽDｿｽｿｽｿｽﾅ、ｿｽgｿｽｿｽｿｽｿｽｿｽvｿｽﾌマｿｽ[ｿｽNｿｽｿｽgｿｽpｿｽｿｽｿｽｿｽgｿｽｿｽｿｽｿｽFｿｽXｿｽJｿｽXｿｽ^ｿｽ}ｿｽCｿｽYｿｽﾅゑｿｽｿｽｿｽｿｽﾌゑｿｽｿｽ閧ｽｿｽｿｽｿｽﾆ思ｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽ
ｿｽﾅゑｿｽｿｽｿｽｿｽAｿｽﾅ擾ｿｽｿｽﾌテｿｽXｿｽgｿｽiｿｽKｿｽﾅつまづゑｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽAｿｽｿｽｿｽｿｽｿｽﾄまゑｿｽｿｽB
ｿｽﾇゑｿｽｿｽｿｽｿｽｿｽしｿｽｿｽｿｽｿｽｿｽ閧｢ｿｽvｿｽｿｽｿｽﾜゑｿｽ
3K 2011/04/08(ｿｽｿｽ) 10:29:16
DoubleBufferedｿｽﾅ鯉ｿｽｿｽｿｽｿｽｿｽ
ｿｽ艪ｽｿｽｿｽｿｽﾒー 2011/04/08(ｿｽｿｽ) 11:22:44
3Kｿｽｿｽｿｽｿｽ ｿｽﾇゑｿｽｿｽｿｽｿｽｿｽ閧ｪｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽ
ｿｽｿｽｿｽwｿｽEｿｽﾌ鯉ｿｽｿｽｿｽｿｽﾅゑｿｽｿｽﾜゑｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽI
ｿｽﾜゑｿｽｿｽﾜゑｿｽｿｽｿｽｿｽｿｽｿｽﾍ不ｿｽｿｽｿｽﾅゑｿｽｿｽ關費ｿｽｿｽｿｽｿｽ|ｿｽｿｽｿｽｿｽｿｽ¥ｿｽｿｽｿｽあゑｿｽﾜゑｿｽｿｽｿｽﾅゑｿｽｿｽｿｽ
ｿｽ艪ｽｿｽｿｽｿｽﾒー 2011/04/08(ｿｽｿｽ) 11:23:32
ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽYｿｽｿｽﾜゑｿｽｿｽｿｽ
ｿｽﾇゑｿｽｿｽｿｽｿｽｿｽ閧ｪｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽ
