* Removed unnecessary parameters from DoUpdateWindowPosition.

1 files changed, 3 insertions, 4 deletions

diff --git a/src/gui/gui_editcombo.pas b/src/gui/gui_editcombo.pas
index 3ed30a4c..28c0b526 100644
--- a/src/gui/gui_editcombo.pas
+++ b/src/gui/gui_editcombo.pas
@@ -90,7 +90,7 @@ type
     function    GetText: string; virtual;
     function    HasText: boolean; virtual;
     procedure   SetText(const AValue: string); virtual;
-    procedure   DoUpdateWindowPosition(aleft, atop, awidth, aheight: TfpgCoord); override;
+    procedure   DoUpdateWindowPosition; override;
     procedure   HandleResize(AWidth, AHeight: TfpgCoord); override;
     procedure   HandleKeyChar(var AText: TfpgChar; var shiftstate: TShiftState; var consumed: Boolean); override;
     procedure   HandleKeyPress(var keycode: word; var shiftstate: TShiftState; var consumed: Boolean); override;
@@ -399,13 +399,12 @@ begin
   end;
 end;
 
-procedure TfpgBaseEditCombo.DoUpdateWindowPosition(aleft, atop, awidth,
-  aheight: TfpgCoord);
+procedure TfpgBaseEditCombo.DoUpdateWindowPosition;
 begin
   //This does not work because is not called before handle create
   if FDirty then
     CalculateInternalButtonRect;
-  inherited DoUpdateWindowPosition(aleft, atop, awidth, aheight);
+  inherited DoUpdateWindowPosition;
 end;
 
 procedure TfpgBaseEditCombo.HandleResize(AWidth, AHeight: TfpgCoord);