Good morning everybluddy.
I have a user who is complaining about scrollbars interfering with their
display. We have done the usual various settings (bits and screen size) and
changed the system font with no results.
It is only happening on his system. I have also changed the listbox font
from Times Roman to Arial 8 which is slightly smaller and is, I think pretty
well a global font.
However, do ya all think that the following command might force the
listboxes from appearing, or am I pushing sods uphill?

procedure TPRForm.FormPaint(Sender: TObject);
begin
sendmessage(ListBox1.Handle, LB_SetHorizontalExtent, 0 , 0);
sendmessage(ListBox2.Handle, LB_SetHorizontalExtent, 0 , 0);
sendmessage(ListBox3.Handle, LB_SetHorizontalExtent, 0 , 0);
sendmessage(ListBox4.Handle, LB_SetHorizontalExtent, 0 , 0);
end;

Thanks,
Alistair+

---------------------------------------------------------------------------
    New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
                  Website: http://www.delphi.org.nz

Reply via email to