我打印出下面的过程时 -
procedure put (Date:Date_Type) is
begin
Put(Integer'Image(Date.Day)); --'
Put("-");
Put(Integer'Image(Date.Month)); --'
Put("-");
Put(Integer'Image(Date.Year)); --'
end;
结果是(例如):1- 1- 2010我的问题是如何防止每个日期值之前有一个字符的间隔。 (日/月/年)当然,我正在使用带记录的日期过程,其中包含日/月/年。
提前致谢。