本文整理自网络,侵删。
设置它的几个属性:
BevelEdges
|_ beLeft = False;
|_ beTop = False;
|_ beRight = False;
|_ beBottom=True; //就是下面那根横线了
BevelInner=bvNone;
BevelKind =bkSoft;
BevelOuter=bvRaised;
BorderStyle=bsNone;
ParentColor=True;
就这些了,看看效果吧!!
相关阅读 >>
Delphi 2009 之 tstringbuilder 类[6]: equals
Delphi webbrowser1 querystatuswb
Delphi tnotification android通知
Delphi 2009 之 tstringbuilder 类[7]: tostring
更多相关阅读请进入《Delphi》频道 >>