Einzelnen Beitrag anzeigen

Benutzerbild von Dunkelbunt27
Dunkelbunt27

Registriert seit: 10. Aug 2010
232 Beiträge
 
Delphi XE Professional
 
#1

GDI+ Graduelles Rechteck (transparent)

  Alt 3. Feb 2013, 09:26
Hallo Delphi-PRAXIS,

ich möchte mit Hilfe von GDI+ ein Rechteck erzeugen, das einen Farbverlauf von
Grau (oben) zu weiß (Mitte) zu Grau (unten) beeinhaltet.
Das Rechteck soll außerdem semitransparen sein, also müsste Alpha = 80% mit berücksichtigt werden.

Das Grundprinzip habe ich so aus der Demo, ist aber ziemlich daneben...
Delphi-Quellcode:
  
var Graphics: IGPGraphics;
[...]

  Graphics := TGPGraphics.Create(Form1.Canvas.Handle);
  {Farben} //Die Farben passen nicht, war nur zum testen
   Farbe1.Initialize(255, 120, 248, 253);
   Farbe2.Initialize(255, 200, 216, 250);

  {Zeichnen}
  Brush := TGPLinearGradientBrush.Create(
    TGPPoint.Create(0, 10), TGPPoint.Create(200, 10),
    Farbe1,
    Farbe2);
  Pen := TGPPen.Create(Brush);

  Waagen.FillRectangle(Brush, 0, 155, 500, 30);
Kennt sich damit jemand aus?
Soll am Ende wie im Anhang aussehen.
Angehängte Grafiken
Dateityp: bmp Verlauf.bmp (1,5 KB, 44x aufgerufen)
FG Dunkelbunt
"Wer zuletzt lacht hat den höchsten Ping"
  Mit Zitat antworten Zitat