请问如何向一窗体添加函数？在线给分！

[klbs53]

请问如何向一窗体添加函数？
谢谢啊！

[thinkcat]

与过程是一样的

[bluemeteor]

public下定义一个不就可以了么？

public
function XXXXX(para):integer

[MyCrooner]

在窗体的privete,public和Delphi窗体默认函数位置(publish类型)加入函数声明:
function yourFunc(canshu : string) : boolean //例如

在implementation下面加入函数实现
function TForm1.yourFunc(canshu : string) : boolean
begin
Result := true;
end;

[mrfanghansheng]

同意hotzhu(非洲白脸) 的,就这么做

[DelphiStudy]

UP

[立志做一个佳娃~]

function tform1.fun(youconst:string):string;
begin
end;

在
begin
end;
中间的部分按
ctrl+shift+c
能自动声明

[redlegend_126_com]

在窗体的privete,public和Delphi窗体默认函数位置(publish类型)加入函数声明:
function yourFunc(canshu : string) : boolean

然后点ctrl+shift+c自动生成框架然后加代码

[Linux2001]

你的意思是给窗体本身添加函数吗，那么请参考上面的回答

[linlky]

private
function address(a,b:integer):integer;

implementation

function address(a,b:integer):integer;
Begin
.
.
.
end;

[yhq2002]

窗体默认函数位置(publish类型)加入函数声明:
然后将鼠标放在其上，按ctrl+shift+c就自动生成函数框架，加上自已的代码就可以了，

ctrl+shift+c这招不错，要记劳了