free pascal自定义单元怎么错了？（尚未完成）

2025-03-24 01:57:54

推荐回答（4个）

回答1：

unit djd;
interface
procedure jia(a,s:string; var d:string);
procedure jian(a,s:string; var d:string);
procedure chen(a,s:string; var d:string);
procedure chu(a,s:string; var d,f:string);
implementation
procedure jia(a,s:string; var d:string);
begin
end;
procedure jian(a,s:string; var d:string);
begin end;
procedure chen(a,s:string; var d:string);
begin end;
procedure chu(a,s:string; var d:string);
begin end;
end.

// jia, jian, chen, chu 改成 function 为好。

回答2：

最后一个end前加一个begin

回答3：

做任务的

回答4：

额

free pascal自定义单元 怎么错了？ （尚未完成）

free pascal自定义单元怎么错了？（尚未完成）