在公共模块中声明函数该怎么声明呢?

hxy1982 2004-10-14 02:43:33
unit PublicModal;

interface
var
SearchStr:string;
SearchGuestType:integer;
function GetDicCode(Called:string,TabName:string):string;
uses MainForm;
function GetDicCode(Called:string,TabName:string):string;
begin
showmessage('');
end;
end.

---------------------
本人菜鸟,请各位帮忙看看~~
...全文
81 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
hxy1982 2004-10-14
  • 打赏
  • 举报
回复
3Q
cobi 2004-10-14
  • 打赏
  • 举报
回复
最笨的办法,把delphi自动生成的unit文件头拷贝上去。
dh9450 2004-10-14
  • 打赏
  • 举报
回复
interface
Uses ...,...,...,//外部单元

function 1...
function 2...
const
//常量
var
//单元变量

implementation

User
.....//内部单元

function 1://实现
begin
end;

2,496

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 数据库相关
社区管理员
  • 数据库相关社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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