Char 到 String 转换 Ada

Question

我正在尝试遍历字符并使用 Put_Line() 函数打印它们，但它采用字符串参数，而不是字符。是否可以将 char 转换为 String，就像我可以使用 'Image() 将 Integer 转换成字符串一样？我的代码：

with Ada.Text_IO;
use Ada.Text_IO;

procedure Main is

begin
  for I in 'A' .. 'Z' loop
    Put_Line(I);
  end loop;
end Main;

Answer 1

您的问题不仅是字符转换，您还需要告知编译器您将使用哪种字符，是的，您可以使用 Image 属性来获取字符的字符串表示形式。

with Ada.Text_IO;
use Ada.Text_IO;

procedure Main is

begin
   for I in Character range 'A' .. 'Z' loop
      Put_Line(I'Image);
   end loop;
end Main;

这段代码可以工作。

Char 到 String 转换 Ada

Char to String conversion Ada

ada

type-conversion