字符串转换为字符串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;

此代码可以使用。