From 046a3365f5ecb39d49161636d0594e320c7b6417 Mon Sep 17 00:00:00 2001 From: zeljko Date: Mon, 6 Apr 2020 12:42:28 +0000 Subject: [PATCH] Qt5: reduced compiler warnings git-svn-id: trunk@62900 - --- lcl/interfaces/qt5/qtobjects.pas | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lcl/interfaces/qt5/qtobjects.pas b/lcl/interfaces/qt5/qtobjects.pas index 6a1feabf8b..6ff982c941 100644 --- a/lcl/interfaces/qt5/qtobjects.pas +++ b/lcl/interfaces/qt5/qtobjects.pas @@ -1806,7 +1806,7 @@ end; constructor TQtBrush.CreateWithRadialGradient(ALogBrush: TLogRadialGradient); var i: Integer; - lColor: PQColor; + lColor: TQColor; lR, lG, lB, lA: Double; begin FRadialGradient := QRadialGradient_create( @@ -1818,8 +1818,8 @@ begin lG := ALogBrush.radStops[i].radColorG / $FFFF; lB := ALogBrush.radStops[i].radColorB / $FFFF; lA := ALogBrush.radStops[i].radColorA / $FFFF; - QColor_fromRgbF(lColor, lR, lG, lB, lA); - QGradient_setColorAt(FRadialGradient, ALogBrush.radStops[i].radPosition, lColor); + QColor_fromRgbF(@lColor, lR, lG, lB, lA); + QGradient_setColorAt(FRadialGradient, ALogBrush.radStops[i].radPosition, @lColor); end; FHandle := QBrush_create(FRadialGradient);