Ergebnis der Suchanfrage

• Forum: Multimedia

  Re: Windows.GradientFill

    Delphi
    by turboPASCAL, 15. Sep 2009
  Hier mal noch ein Beispiel mit drei Farben:
  
  unit Unit1;
  
  interface
  
  uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;
• Forum: Multimedia

  Re: Windows.GradientFill

    Delphi
    by turboPASCAL, 25. Nov 2008
  Ich habe mir grad eine Funktion gebastelt:
  
  var
  _GradientFill: function(DC: HDC; pTriVertex: Pointer; dwNumVertex: DWORD;
  pMesh: Pointer; dwNumMesh, dwMode: DWORD): DWORD; stdcall; { external in "msimg32.dll" }
  
  type
  TFillMode = GRADIENT_FILL_RECT_H..GRADIENT_FILL_RECT_V;
  
  function wGradientFill(DC: HDC; fillRect: TRect; startColor, endColor: COLORREF; FillMode: TFillMode): Boolean;