2015-12-28 14:25:15 +03:00
|
|
|
// Преобразование целое <-> строка в новом стиле
|
2015-05-14 22:35:07 +03:00
|
|
|
var
|
|
|
|
|
s: string;
|
|
|
|
|
i: integer;
|
|
|
|
|
|
|
|
|
|
begin
|
2015-12-28 14:25:15 +03:00
|
|
|
// Преобразование целого в строку
|
2015-05-14 22:35:07 +03:00
|
|
|
i := 234;
|
|
|
|
|
s := i.ToString;
|
2015-12-28 14:25:15 +03:00
|
|
|
writelnFormat('Целое: {0}. После преобразования к строке: ''{1}''',i,s);
|
2015-05-14 22:35:07 +03:00
|
|
|
|
2015-12-28 14:25:15 +03:00
|
|
|
// Преобразование строки в целое
|
2015-05-14 22:35:07 +03:00
|
|
|
s := '567';
|
|
|
|
|
if integer.TryParse(s,i) then
|
2015-12-28 14:25:15 +03:00
|
|
|
writelnFormat('Строка: ''{0}''. После преобразования к целому: {1}',s,i);
|
2015-05-14 22:35:07 +03:00
|
|
|
end.
|