type-conversion - 字符到字符串的转换 Ada

Question

我正在尝试遍历字符并使用 Put_Line() 打印它们函数，但它需要字符串参数，而不是字符。是否可以使用 'Image() 将 char 转换为 String ，就像我可以用 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;

此代码将起作用。