delphi中在类的private中加过程出错?

Question

我在类的private中加入一个过程定义如下
private
       str:string;
       procedure csq(s:string); //这一行是我加的
但在编译时出错:
[Error] MDIParent.pas(51): Unsatisfied forward or external declaration: 'TFm_MDIParaent.csq'
难道不能在类中加自定义过程?

Answer 1

只加了定义，但没有添加实现代码
procedure TFm_MDIParaent.csq(s:String);
begin
end;

Answer 2

光标移到 procedure csq(s:string); //这一行是我加的 ，同时按ctr+shift+c就能自动生成
procedure TFm_MDIParaent.csq(s:String); 
begin 
end;
就可以了