I ilovellq Unregistered / Unconfirmed GUEST, unregistred user! 2003-07-07 #1 1：用memo来做一个文本编辑器，怎样使他name属性的字符信息不在编辑框中显示出来？<br>2：把statusbar编辑成几部分时，怎样使其按百分比分配，而不是按数字分？<br>小弟是才学程序的，请大家多帮忙，谢谢！
1：用memo来做一个文本编辑器，怎样使他name属性的字符信息不在编辑框中显示出来？<br>2：把statusbar编辑成几部分时，怎样使其按百分比分配，而不是按数字分？<br>小弟是才学程序的，请大家多帮忙，谢谢！
B beisun Unregistered / Unconfirmed GUEST, unregistred user! 2003-07-07 #2 1,修改memo中的lines属性就可以了。<br>2，没有明白你说的是什么。
I ilovellq Unregistered / Unconfirmed GUEST, unregistred user! 2003-07-07 #3 我是说，用statusbar时，不是可以编辑嘛，编辑后statusbar就分割开了，分割开的各个部分默认是用50来表示所占宽度，我现在是想用百分比来表示，请问怎样可以做到？
X xiaoyu_online Unregistered / Unconfirmed GUEST, unregistred user! 2003-07-07 #4 1.<br>memo1.lines.clear;<br>memo1..lines.add('你写的文本');<br>2.statusbar1.max:=100;<br> statusbar1.step:=1;<br><br><br>
1.<br>memo1.lines.clear;<br>memo1..lines.add('你写的文本');<br>2.statusbar1.max:=100;<br> statusbar1.step:=1;<br><br><br>
R realLearning Unregistered / Unconfirmed GUEST, unregistred user! 2003-07-07 #5 1.读取之前memo.lines.clear晴空。<br>2.没有办法直接用百分比设置宽度，不过你可以编程实现。<br>总的宽度总是已知的，根据你设置的百分比计算一下赋值给每个panel就可以了。<br>
1.读取之前memo.lines.clear晴空。<br>2.没有办法直接用百分比设置宽度，不过你可以编程实现。<br>总的宽度总是已知的，根据你设置的百分比计算一下赋值给每个panel就可以了。<br>
如 如云 Unregistered / Unconfirmed GUEST, unregistred user! 2003-07-07 #6 2的解答：<br>Procedure Button2click(sender:Tobject);<br>var i:integer;<br>begin<br>for i:=0 to statusbar1.panels.count-1 do<br>begin<br>statusbar1.Panels.Items.Width:=Round(statusbar1.Width)div statusbar1.panels.count;<br>end;<br>end;
2的解答：<br>Procedure Button2click(sender:Tobject);<br>var i:integer;<br>begin<br>for i:=0 to statusbar1.panels.count-1 do<br>begin<br>statusbar1.Panels.Items.Width:=Round(statusbar1.Width)div statusbar1.panels.count;<br>end;<br>end;
L logingyw Unregistered / Unconfirmed GUEST, unregistred user! 2003-07-07 #8 2<br>procedure TForm1.FormResize(Sender: TObject);<br>begin<br> self.StatusBar1.Panels[0].Width:=self.Width div 5;//(20%)<br> self.StatusBar1.Panels[0].Width:=self.Width div 2 //(50%)
2<br>procedure TForm1.FormResize(Sender: TObject);<br>begin<br> self.StatusBar1.Panels[0].Width:=self.Width div 5;//(20%)<br> self.StatusBar1.Panels[0].Width:=self.Width div 2 //(50%)
