aber natürlich!
Delphi-Quellcode:
constructor TdxGPLinearGradientBrush.Create(rect: TdxGPRect; color1, color2: DWORD; mode: TdxGPLinearGradientMode);
var
ABrush: GpLineGradient;
begin
ABrush := nil;
FLastResult := GdipCreateLineBrushFromRectI(@rect, color1, color2, mode, WrapModeTile, ABrush);
SetNativeBrush(ABrush);
end;
aber thema hat sich eben erledigt, hab zwar nichts gemacht aber jetzte gehts wieder, delphi mit laune, wenn das mal nix is