string - Delphi 相当于 VB "Space"

Question

Visual Basic“Space”函数返回由指定数量的空格组成的字符串。

Visual Basic 示例:

Property Get Sections() As String
Dim sBuf As String
Dim iSize As String
Dim iRetCode As Integer
    sBuf = Space$(8192)
    iSize = Len(sBuf)
    iRetCode = GetPrivateProfileString(0&, 0&, m_sDefault, sBuf, iSize, m_sPath)
    If (iSize > 0) Then
        Sections = Left$(sBuf, iRetCode)
    Else
        Sections = ""
    End If
End Property

Delphi 中“Space”的对应词是什么？谢谢。

Answer 1

要回答直接问题，最接近的等效项是 StringOfChar :

sBuf := StringOfChar(' ', 8192);

<小时/>

尽管如果您将问题中的代码翻译为 Delphi，则不会用空格填充字符串。 VB 代码在分配字符串时实际上并不关心字符串包含的内容，它只是使用 Space$ 作为分配特定长度字符串的简单方法。空格将被 API 调用返回的字符串覆盖。

在 Delphi 中，您可以通过以下方式分配长度为 8192 的字符串:

SetLength(sBuf, 8192);

事实上，在 Delphi 中，您可以使用 TIniFile 来读取 INI 文件。因此，如果您实际上正在尝试翻译问题中的代码，我建议您不要这样做，而是使用 Delphi 的内置库。