Thema: Delphi Menu Hintergrundbild

Einzelnen Beitrag anzeigen

EWeiss
(Gast)

n/a Beiträge
 
#7

AW: Menu Hintergrundbild

  Alt 31. Aug 2016, 15:34
Muss sich niemand mehr melden..
Alleinunterhalter!

Geht jetzt so wie es soll.
Mein Fehler war das ich die Top Position berechnet habe aber nicht die Höhe
deshalb wurde das Bild nicht korrekt Skaliert.

Ach ja ein Invalidate war nicht nötig.
Vorher.
Delphi-Quellcode:
GDIP_DrawImageRectRectI(Graphics, ImgBack, PDis.rcItem.Left, PDis.rcItem.Top,
  PDis.rcItem.Right, 20, 0, PDis.rcItem.Top, imgW, 20 , 2, nil, False, nil);
Nachher.
Delphi-Quellcode:
GDIP_DrawImageRectRectI(Graphics, ImgBack, 20, PDis.rcItem.Top,
  Rect.Right, ImgItemHeight, 0, PDis.rcItem.Top * (Integer(imgH) div Rect.Bottom),
  imgW, (Integer(imgH) div Rect.Bottom) * ImgItemHeight, 2, nil, False, nil);


gruss

Geändert von EWeiss (11. Jul 2019 um 16:44 Uhr)
  Mit Zitat antworten Zitat