Delphi Function 返回值忘记默认赋值的一些问题
2021-05-15 23:28
标签：应该 line ima load name begin 返回 问题 png Delphi function 函数的返回值，也就是Result，建议直接在函数开始就做一些初始化 例如下面的代码 function TForm1.GetindexName(index: integer): String; 我以为的结果是 事实上的结果是 正确的代码应该是在GetindexName函数的开始时做一个初始化 这个并不是什么漏洞，只是不好的代码习惯给自己挖的坑。这里只是记录一下。 Delphi Function 返回值忘记默认赋值的一些问题 标签：应该 line ima load name begin 返回 问题 png 原文地址：https://www.cnblogs.com/wuxi15/p/14642171.htmlprocedure TForm1.FormCreate(Sender: TObject);
var
i:Integer;
str:string;
begin
Memo1.Lines.Clear;
for I:=0 to 2 do
begin
str:=GetindexName(I);
Memo1.Lines.Add(IntToStr(I)+‘:‘+str);
end;
end;
begin
if index=0 then
Result:=‘传入了0‘
else if index=1 then
Result:=‘传入了1‘;
end;
function TForm1.GetindexName(index: integer): String;
begin
Result:=‘‘; //新增的代码
if index=0 then
Result:=‘传入了0‘
else if index=1 then
Result:=‘传入了1‘;
end;
上一篇：c#: 颜色选择控件之实现
下一篇：AcWing 175. 电路维修
文章标题：Delphi Function 返回值忘记默认赋值的一些问题
文章链接：http://soscw.com/essay/85999.html