fix button width for ButtonEditor in rxdbgrid

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2490 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
alexs75 2012-08-23 17:24:06 +00:00
parent 774aa2e4f9
commit 3414e0ec24

View File

@ -3550,8 +3550,16 @@ begin
if W>0 then
begin
Editor.Width:=Editor.Width - W;
W:=Editor.Width + Editor.Left;
if Editor.Name = 'ButtonEditor' then
begin
Editor.Left:=Editor.Left - W;
W:=Editor.Width + Editor.Left;
end
else
begin
Editor.Width:=Editor.Width - W;
W:=Editor.Width + Editor.Left;
end;
for i:=0 to R.EditButtons.Count-1 do
if R.EditButtons[i].Visible then