Commit 8a96677e authored by Michael W. Vogel's avatar Michael W. Vogel
Browse files

LCL: TListBox.ScrollWidth is used when defined by user. Resolves issue #19079

git-svn-id: trunk@65169 -
parent 561099dc
......@@ -267,10 +267,10 @@ end;
function TCustomListBox.GetScrollWidth: Integer;
begin
Result := FScrollWidth;
if (Result > 0) or (csDesigning in ComponentState) then Exit;
if HandleAllocated then
Result := TWSCustomListBoxClass(WidgetSetClass).GetScrollWidth(Self)
else
Result := FScrollWidth;
Result := TWSCustomListBoxClass(WidgetSetClass).GetScrollWidth(Self);
end;
{------------------------------------------------------------------------------
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment