This forum is temporaily read-only. All existing discussions remain available for reference. For new questions, bug reports or support requests, please contact us at mail@lmdsupport.com.
Fix in TElStdTab.DrawTabEdges (ElPgCtl
We have fixed above methode:
case FOwner.TabPosition of
etpLeft:
dec(R.Right, 1);
etpRight:
inc(R.Left, 1);
etpTop:
dec(R.Bottom, 1);
etpBottom:
inc(R.Bottom, 1);
end;
changed to
if (not StyleServices.Enabled) then
case FOwner.TabPosition of
etpLeft:
dec(R.Right, 1);
etpRight:
inc(R.Left, 1);
etpTop:
dec(R.Bottom, 1);
etpBottom:
inc(R.Bottom, 1);
end;
Please check if this is ok.
Works for us to avoid cutted to avoid cut of sublime of text
case FOwner.TabPosition of
etpLeft:
dec(R.Right, 1);
etpRight:
inc(R.Left, 1);
etpTop:
dec(R.Bottom, 1);
etpBottom:
inc(R.Bottom, 1);
end;
changed to
if (not StyleServices.Enabled) then
case FOwner.TabPosition of
etpLeft:
dec(R.Right, 1);
etpRight:
inc(R.Left, 1);
etpTop:
dec(R.Bottom, 1);
etpBottom:
inc(R.Bottom, 1);
end;
Please check if this is ok.
Works for us to avoid cutted to avoid cut of sublime of text
Comments