真的就没人会吗？(50分)

B

biyesheng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-10

• #1

在Panel1里放入一Panel2(align:alLeft)和一RichEdit1(align:alClient),如何在
Panel2里一行一行的对应RichEdit的每一行显示RichEdit中文本的行号？例如：能在
Panel2中相当于RichEdit第三行的位置显示出行号“3”

 

B

biyesheng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-10

• #2

看来真的真的是没有人会了

 

沧

沧海

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-10

• #3

procedure TForm1.RichEdit1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
var
p:Tpoint;
begin
p:=richedit1.CaretPos;
panel2 :=inttostr(p.y);
end;

至于要在什么位置出现行号，那就要你自己去控制了
可以使用 canvas ！！！

 

V

varphone

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-10

• #4

See the MWEdit component!
Dwon From: http://www.inprises.com/control/interface.htm

 

H

HD_Copy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-10

• #5

你首先想一下，你这么做有必要吗？！

 

Z

zhengzhijia

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-10

• #6

得到richeidt的行号，方法有的是；

 

B

biyesheng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-14

• #7

to varphone
你说的资料我下载了，但是看不懂，怎么办呀？

 

B

biyesheng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-17

• #8

多人接受答案了。