LCL: grids: fixed regression from r50262 #fa277e1eb3. Issue #28959

git-svn-id: trunk@50371 -
This commit is contained in:
ondrej 2015-11-17 17:56:11 +00:00
parent 904373f6ce
commit b8b626d91e

View File

@ -11646,7 +11646,7 @@ procedure TGridColumn.SetWidth(const AValue: Integer);
begin
if (AValue=0) and not Visible then
exit;
if AValue>0 then begin
if AValue>=0 then begin
if FWidth = nil then begin
if AValue=GetDefaultWidth then
exit;