字符串转换为字符串Ada

Question

我试图迭代字符并使用Put_Line()函数打印它们但它需要字符串参数,而不是字符.是否可以将char转换为String,就像我可以使用Integer一样'Image()？我的代码:

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;

这段代码可行.