HanDs
管理员

[Delphi文章] delphi自定义函数的位置 





学习中请遵循国家相关法律法规,黑客不作恶。没有网络安全就没有国家安全

本站需要登陆后才能查看

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;

type
TForm1 = class(TForm)
    lbl1: TLabel;
    lbl2: TLabel;
    lbl3: TLabel;
    edt1: TEdit;
    edt2: TEdit;
    edt3: TEdit;
    btn1: TButton;   
    procedure btn1Click(Sender: TObject);
private
    { Private declarations }
public
    { Public declarations }
end;

var
Form1: TForm1;
   function myAdd(num1:Byte;num2:Byte):Byte; // 在Var 和 implementation之间的位置

implementation

{$R *.dfm}


function myAdd(num1:Byte;num2:Byte):Byte ;
begin
      myAdd:= num1 + num2;
end;



学习中请遵守法律法规,本网站内容均来自于互联网,本网站不负担法律责任
delphi 自定义函数的位置
#1楼
发帖时间:2016-7-9   |   查看数:0   |   回复数:0
游客组
快速回复