Delphi中重载记录的隐式转换作为const数组中的参数

发布时间：2020-12-15 04:16:58 所属栏目：大数据来源：网络整理

导读：作为Delphi 7转换的一部分,我们摆脱了shorttring.我想让它尽可能轻松,所以我们认为我们可以将ShortString更改为一些以相同方式起作用的记录.这是它的声明方式(还有更多内容,但这是基本结构,概述了问题)： TShortStringRec = record private FStuff: array [0

作为Delphi 7转换的一部分,我们摆脱了shorttring.我想让它尽可能轻松,所以我们认为我们可以将ShortString更改为一些以相同方式起作用的记录.这是它的声明方式(还有更多内容,但这是基本结构,概述了问题)：

TShortStringRec = record 
private
  FStuff: array [0..49] of Char;
public
  class operator Implicit(AStuff: TShortStringRec): String;
  class operator Implicit(S1: String): TShortStringRec;
end;

这适用于将字符串设置为记录.但是那时的格式就像const的参数const数组那样.有没有办法对我们想要传递给const数组的内容进行隐含转换？

function FunkyFunc : string;
var
  ssr : TShortStringRec;
begin
  ssr := 'Wall'; 
  result := format('Hello %s',[ssr]);  //<---error here
end;

编译时出现语法错误,因为ssr不是可以在其中一个数组上使用的参数类型.

解决方法

简答：不. 答案很长：你要求的是编译器以某种方式知道你想要一个固有的无类型参数被强制转换成你想要的类型.编译器在调用站点上没有足够的信息来进行确定.如果添加“Explicit”运算符然后显式地将参数转换为字符串,那么它将起作用.

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!