请各们帮帮忙。Splitter 控件的用法。(50分)

C

cjsh

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-17

• #1

我在编程的时候。我的窗体右边是一个TreeView 控件(Align:=alLeft),而右边是一个
Panel控件（Align:=alClient）中有一个Richedit控件(Align:=alClient).我在
TreeView 控件和Panel控件之间加入一个Splitter 控件(Align:=alLeft)，我在移动
Splitter 控件时候当该控件移到最左边是，这个TreeView 控件就不见了。我要它
只能移动到左边的一定距离就不能再往前移动。一句话就是要实现资源管理器哪种窗口。
请各位帮帮忙谢谢！！！

 

Z

zw84611

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-17

• #2

将Splitter的AutoSnap属性设成false

 

J

jsxjd

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-17

• #3

在 treeview 的 Constraints 中设置 Minwidth属性。

 

M

mjsh

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-17

• #4

类似问题我遇到过，原因是放了splitter。一个在左边，被隐藏了。

 

C

cjsh

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-17

• #5

不知各位能否帮我另外一个忙怎样在Richedit控件中改变字体颜色。还有是否可以提供
Treeview控件和Sql数据库操作的源码。也就是说我要在Treeview建立树状型然后把它
保存到数据库中去。谢谢了。wjh107@sina.com

 

C

cjsh

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-17

• #6

怎样在Richedit控件中得到光标所在的行和列。

 

J

jsxjd

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-17

• #7

47. 改变RichEdit 字体及颜色
procedure TForm1.Button1Click(Sender: TObject);
begin
with RichEdit1 do
begin
lines.clear;
lines.add('说明：大家好！');
SelStart:=7;
SelLength :=8;
SelAttributes.color:=$0000ff;
lines.add('说明：大家好！');
SelStart:=17;
SelLength :=4;
SelAttributes.color:=$00ff00;
SelAttributes.size:=20;
end;
end;


showmessage(inttostr(RichEdit1.CaretPos.y)); //行
showmessage(inttostr(RichEdit1.CaretPos.x)); //列

 

C

cjsh

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-17

• #8

老兄我要改变的是字体的[]背景颜色。不是字体颜色啊，

 

J

jsxjd

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-17

• #9

delphi 自带的RichEdit ,背景无法改变!

 

W

wjh_wy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-28

• #10

我有个例子，你要么
wjh107@sina.com

 

C

cjsh

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-28

• #11

谢谢zw84611和wjh_wy帮我解决了问题

 

C

cjsh

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-28

• #12

多人接受答案了。