Hi Martin,
I have popup form. On it's OnLayout event I want to place tbooleanedit
at bottom but it shows vertical scrollbar and I need to correct it by
-2. I have printed all sizes, form has levelo = 1 and seems that I can
use any rect except widgetsizerect
procedure TfrmVolume.ArrangeWidgets(const Sender: TObject);
begin
lblVolume.pos := makepoint(0,0);
cbMute.pos := makepoint(0, clientheight-cbMute.widgetsizerect.cy-2);
WriteLn(cbMute.widgetsizerect.cy);
writeln('paintrect = ',paintrect.cy,'|',paintrect.size.cy);
writeln('paintclientrect = ',paintclientrect.cy,'|',paintclientrect.size.cy);
writeln('paintheight = ',paintheight);
writeln('clippedpaintrect =
',clippedpaintrect.cy,'|',clippedpaintrect.size.cy);
writeln('innerpaintrect = ',innerpaintrect.cy,'|',innerpaintrect.size.cy);
writeln('widgetsizerect = ',widgetsizerect.cy,'|',widgetsizerect.size.cy);
writeln('paintsizerect = ',paintsizerect.cy,'|',paintsizerect.size.cy);
writeln('clientsizerect = ',clientsizerect.cy,'|',clientsizerect.size.cy);
writeln('containerclientsizerect =
',containerclientsizerect.cy,'|',containerclientsizerect.size.cy);
writeln('clientrect = ',clientrect.cy,'|',clientrect.size.cy);
writeln('clientsize = ',clientsize.cy,'|',clientsize.cy);
writeln('clientheight = ',clientheight,'|',clientheight);
writeln('clientwidgetrect =
',clientwidgetrect.cy,'|',clientwidgetrect.size.cy);
writeln('innerwidgetrect = ',innerwidgetrect.cy,'|',innerwidgetrect.size.cy);
writeln('innerclientrect = ',innerclientrect.cy,'|',innerclientrect.size.cy);
writeln('innerclientsize = ',innerclientsize.cy,'|',innerclientsize.cy);
end;
------------------------------------------------------------------------------
Mobile security can be enabling, not merely restricting. Employees who
bring their own devices (BYOD) to work are irked by the imposition of MDM
restrictions. Mobile Device Manager Plus allows you to control only the
apps on BYO-devices by containerizing them, leaving personal data untouched!
https://ad.doubleclick.net/ddm/clk/304595813;131938128;j
_______________________________________________
mseide-msegui-talk mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk
