如何使我自己写的函数成为FORM的函数

Question

TYPE区,加入
Edit1:TEdit;试试~

Answer 1

要用Form1.Edit1。因为你定义的函数不是TForm1的成员函数。在调用类TForm1中的成员时要指明是哪一个类或者实例。

Answer 2

EDIT1控件是否实际存在？
函数是否和edit1在同一个单元中呢？
函数必须加入到form的public中

Answer 3

unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;type
  TForm1 = class(TForm)
  private
    { Private declarations }
     function YourFunction():string;
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation{$R *.dfm}{ TForm1 }function TForm1.YourFunction: string;
beginend;end.