看看这个小片段:
implementation
{$R *.dfm}
我是否将代码置于{$R *.dfm}
之上或之下?这有关系吗?
我在这个问题上找不到任何确认
是否有一套标准可以解决这个问题,还是仅仅是设计师?
答案 0 :(得分:5)
没关系。代码和资源不会相互影响(除非您尝试加载不存在的资源,但这是一个完全不同的问题)。话虽如此,我更倾向于将所有选项放在首位。
答案 1 :(得分:5)
没关系,但作为规则,我把我的代码放在下面,编译开关实际上将pas文件与dfm文件(pas + dfm = form!)相关联,这里有一些提示。
unit Unit1;
interface
uses
....
type
TForm1 = class(TForm)
private
{ Private declarations }
public
{ Public declarations }
local_var: String;
function myFormFunction:String;
end;
var
Form1: TForm1;
// global vars
superVar: integer;
const
// global constants
MY_CONST = 'TEXT!!!';
implementation
{$R *.dfm}
{ TForm1 }
// YOUR CODE!
procedure aCoolFunction;
Begin
// your code
inc(superVar);
End;
function TForm1.myFormFunction: String;
begin
// your code
local_var := 'some '+ MY_CONST;
inc(superVar);
end;
end.