Присвоение всяких данных

← →
Гег (2003-11-15 19:04) [0]

есть класс Tdoc:
type
TDoc=record
id:integer;
name:string;
end;

procedure xxx;
var a,b:TDoc;
begin
a:=TDoc.create;
b:=TDoc.create;

a.id:=1;
a.name:="паспорт";
---//---
Как написать вместо нижеследующего:
b.id:=a.id;
b.name:=a.name;
---//---
что-то типа
"Все значения из b:=все значения из a:"
end.

← →
Palladin (2003-11-15 19:09) [1]

Класс? Класс пишется не record, а class

a:=b;

← →
default (2003-11-15 19:11) [2]

"TDoc.create" - крюто
что книг совсем в интернете нет?

← →
Anatoly Podgoretsky (2003-11-15 19:15) [3]

Создай метод Assign и выбери более подъодящего предка.

← →
Гег (2003-11-15 19:23) [4]

Ошибся:
TDoc=class

Присвоение всяких данных Найти похожие ветки