Вывод записей и классов с помощью write: различия между версиями
Материал из Вики проекта PascalABC.NET
Перейти к навигацииПерейти к поиску
Mikst (обсуждение | вклад) Нет описания правки |
Mikst (обсуждение | вклад) Нет описания правки |
||
Строка 1: | Строка 1: | ||
Для вывода переменной класса в операторе writeln в классе следует | |||
переопределить виртуальный метод Object.ToString | |||
<source lang="Delphi">type | <source lang="Delphi">type | ||
Person = class | Person = class |
Текущая версия от 17:04, 14 января 2010
Для вывода переменной класса в операторе writeln в классе следует переопределить виртуальный метод Object.ToString
type
Person = class
private
name: string;
age: integer;
public
constructor (n: string; a: integer);
begin
name := n; age := a;
end;
function ToString: string; override;
begin
Result := Format('Имя: {0} Возраст: {1}',name,age);
end;
end;
var p: Person;
begin
p := new Person('Иванов',20); // Новый синтаксис вызова конструктора (рекомендуется)
writeln(p);
end.