关于自定义函数和过程的问题？

Question

在DELPHI中，用户自定义的函数和过程应该写在什么地方？格式有什么特殊的要求？一个数的取反运算是不是not X?

Answer 1

type
  TData = class(TDataModule)
    Customers: TClientDataSet;
    temp: TClientDataSet;
    Sales: TClientDataSet;
    SalesSource: TDataSource;
    CustomerSource: TDataSource;
    Socket: TSocketConnection;
    Communicate: TClientDataSet;
    ComSource: TDataSource;
    Comp: TClientDataSet;
    CompSource: TDataSource;
    Health: TClientDataSet;
    HealthSource: TDataSource;
    SaleTable: TClientDataSet;
    SaleTableSource: TDataSource;
    procedure DataModuleCreate(Sender: TObject);
  private
    { Private declarations }
    Function decrypt(p:String):String; //解密函数
  public
    Cust:Integer;
    Function encrypt(p:String):String;   //加密函数
    Function decrypt(p:String):String; //解密函数
    { Public declarations }
  end;var
  Data: TData;implementation