Delphi插入字符串時出現問題，類型不兼容錯誤

Question

procedure TTelephoneNumberConverter.btnConvertClick(Sender: TObject);
var
  number: string;
  dupe: string;
  converted: string;
begin
  number := edtInput.Text ;
  dupe := Copy(number, 4, 1) ;
  converted := Insert(dupe , number , 4 ) ;
  pnlOutput.Caption := converted;
end;

好的，我只是對Delphi 2010以及將字符串插入其他字符串有一個簡單的問題。 這小段代碼的目的是將第四個字符放在特定字符串中，並將其復制並添加到該特定字符旁邊，例如12345-> 123445

唯一的問題是我不斷收到錯誤消息：

不兼容的類型“字符串”和“過程，無類型的指針或無類型的參數”。

我可能缺少一些小而愚蠢的東西，但是如果有人可以回答我的問題，我將不勝感激。

Answer 1

Insert是修改其第二個參數的過程。

它的簽名是：

procedure Insert(Source: string; var Dest: string; Index: Integer);

您看到的編譯器錯誤是因為Insert不返回任何內容，因此不能是賦值的rhs。

因此，您的代碼應為：

converted := number;
Insert(dupe, converted, 4);

Copy對於單個角色來說是多余的。 使用[]代替：

dupe := number[4];