Skalering af billede !

Hej, Du skal bruge en TBitmap, og bruge den der hedder StretchDraw

Vi siger du har dit "Store" billede i Bitmap1, og du skal have det ned i bitmap2, som du bestemmer størrelsen på.

var
  bitmap2: TBitmap;
  tmpRect: TRect;
begin
  bitmap2 := TBitmap.Create;
  bitmap2.Width := DinBredde; //Altså den bredde det nye billede skal have
  bitmap2.Height := DinHojde; //Selvfølgelig det samme som ovenfor
  tmpRect.Left := 0;
  tmpRect.Top := 0;
  tmpRect.Right := DinBredde;
  tmpRect.Bottom := DinHojde;

  Bitmap2.Canvas.StretchDraw(tmpRect, Bitmap1); //Bitmap1 er den med det store billede.

  Bitmap2.Picture.SaveToFile('lillebillede.bmp');
end;


Håber det kan bruges.

/SpEeDy

Hallo Snowball, er du der ;-)

Kan du ikke bruge det eller hvad ??

/SpEeDy

HEY !

Hvorfor har jeg ikke fået nogen mail om at der er nogen der har besvaret/kommenteret det ???

Nå, men det ser ud til at kunne bruges, så jeg tester det lige når jeg kommer hjem !

Snowball

Hej Speedy !

Undskyld ventetiden, men nu har jeg testet det, og det virker helt fint.

Tak for hjælpen !

Snowball

Selv tak ;-)

/SpEeDy