这样声明过程不可以吗？(10分)

Z

zyhkernel

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-03-19

• #1

type
TMyclass=class
procedure append(var name:string;ch:char)
//道这里报错
……
end;
出错信息：Unsatisfied forward or external declaration:'TMyclass.append'
如果这样声明不对，那应该怎么声明？

 

小

小神通

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-03-19

• #2

你在implementation后加上
procedure TMyclass.append(var name: string
ch: char);
begin
end;

 

F

fei_l

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-03-19

• #3

是你没写完整。
type
TMyclass=class
procedure append(var name:string;ch:char)
//道这里报错
……
end

implementation

{$R *.dfm}

procedure TMyclass.append(var name:string;ch:char);
begin
//
end;

 

L

lb_icesea79

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-03-19

• #4

楼上说的对, 声名了就要实现

 

M

mstar

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-03-19

• #5

声明好了以后 再那一行 按 CTRL-SHIFT-C 就可以自己出来了

 

N

nicai_wgl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-03-19

• #6

to zyhkernel:
明白你的想法，正确的写法如下：
type
TMyclass=procedure append(var name:string;ch:char)

......
......
MYclass:TMyclass
//可以在使用时再实现

 

Z

zyhkernel

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-03-20

• #7

谢谢！