Most of my applications are for RightToLeft (Hebrew) and TToolBar and TStatusBar don't support RightToLeft so I use this technique to make my own. I use the Align:= alLeft/alRight method though. And I use TPanel for dividers.
On Mon, Nov 11, 2013 at 12:51 PM, Valdas Jankūnas <[email protected]> wrote: > 2013.11.11 06:06, Avishai rašė: > > Could you use a TPanel in place of the TBevel? I tried that and it gives >> the same visual effect without the size problems. But I don't know what >> you are doing with the TBevel. >> > > Hello, > > I use TBevel as separator (Shape=bsLeftLine) between components. I tried > TPanel: looks good, also its Width automatically adjusts to 2 when > "CellAlighHorizontal" is set to other than "ccaFill". > > Also I found how to rearrange Childs easily when "ChildSizing" is used: > - Parent.ChildSizing set to "cclNone"; > - change "Z order" of Child; > - revert back Parent.ChildSizing. > > I found why TBevel "doesn't want" shrink less than 50px: TBevel has > function "GetControlClassDefaultSize" where "Result.CY := 50;" is hardcoded. > > > -- > Valdas Jankūnas > > -- > _______________________________________________ > Lazarus mailing list > [email protected] > http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus > -- Shalom, Avishai [email protected] אבישי גוֹר
-- _______________________________________________ Lazarus mailing list [email protected] http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
