1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26
| program test;
{$FRAME_WIDTH 800}
{$FRAME_HEIGHT 600}
{$FRAME_RATE 1}
type
MovieClip=external class
constructor Create(Parent:MovieClip; Name:string; Depth:integer) as Parent.createEmptyMovieClip;
function loadMovie(fileName: string): MovieClip;
property _x:integer;
property _y:integer;
property _width:integer;
property _height:integer;
property _xscale:double;
property _yscale:double;
end;
var
clip : MovieClip;
begin
clip := MovieClip.Create(nil, 'test', 0);
clip.loadMovie('test.jpg'); // ici l'image fait 800x600
clip._xscale := 50;
clip._yscale := 50;
end. |
Partager