请教!自定义函数怎么使用,加在程序哪里?

qywjg 2001-11-13 10:29:26
...全文
105 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
grayfox 2001-11-13
  • 打赏
  • 举报
回复
每个窗体中有private、public和publish三个部份都可以声明自已的过程和函数。
声明过后再用Ctrl+Shift+c就可以输入代码了。
iloveyan 2001-11-13
  • 打赏
  • 举报
回复
建议这种低级问题大家不要回答
iloveyan 2001-11-13
  • 打赏
  • 举报
回复
烦人,你先别作程序,再学习学习吧,作程序必须有很好的基础,程序员岂能摸摸脑袋就是一个
tikkypeng 2001-11-13
  • 打赏
  • 举报
回复
unit Unit1;

interface

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

type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.DFM}

procedure ShowMyMessage(MyString:String);
begin
ShowMessage(MyString);
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMyMessage('调用');
end;

end.
li_zhifu 2001-11-13
  • 打赏
  • 举报
回复
在同一单元里放哪都行(要在调用前或在调用前声明)

5,931

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧