Thema: Delphi Bild skalieren

Einzelnen Beitrag anzeigen

Benutzerbild von _frank_
_frank_

Registriert seit: 21. Feb 2003
Ort: Plauen / Bamberg
922 Beiträge
 
Delphi 3 Professional
 
#4

Re: Bild skalieren

  Alt 22. Jul 2007, 21:45
wie hast du das nun jetzt gemacht?

ich würde das im OnPaint des forms machen:

so in etwa:

Delphi-Quellcode:
type
  TForm1...
    private
      bgbitmap:TBitmap;
...
procedure TForm1.FormCreate(...);
begin
  bgBitmap:=TBitmap.create;
  bgBitmap.loadFromfile(...); //oder loadFromResource etc.
end;

procedure TForm1.FormDestroy(...);
begin
  bgBitmap.free;
end;

procedure TForm1.FormPaint(...);
begin
  canvas.StretchDraw(rect(0,0,width,height),bgbitmap);
end;
für solche Sachen (Hintergründe) nehm ich ungern TImages, aber ist Ansichtssache

Gruß Frank
  Mit Zitat antworten Zitat