function SelfPath: string;
begin
SetLength(Result, 500);
SetLength(Result, GetModuleFileName(HInstance, PChar(Result), 500));
Result := ExtractFilePath(Result);
end;
这其中的 Result 是什么 ?
begin
SetLength(Result, 500);
SetLength(Result, GetModuleFileName(HInstance, PChar(Result), 500));
Result := ExtractFilePath(Result);
end;
这其中的 Result 是什么 ?
Result就是返回值变量,类型就是String