![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Свойство объекта [D6, WinXP]
Goga © (2005-02-25 17:44:00)Помогите советом каким образом оформить свойство объекта состоящее из нескольких полей?
Пробовал record ругается. :(
Goga (2005-02-25 18:07:00) [1]Извиняюсь туплю.
Digitman (2005-02-25 18:00:00) [2]
> Пробовал record ругается
"казнить нельзя помиловать" (с)
свойство объекта должнг иметь строго определенный тип данных, тобой объявленный ... причем здесь какие-то там "поля" ?
объяви ТИП (неважно, record там или что-то иное) и НИЖЕ ПО ТЕКСТУ объяви поле данного ТИПа - НИКТО тебя не за сие не отругает)
begin...end (2005-02-25 17:56:00) [3]> Goga (25.02.05 17:44)
type
TMyField = record
IntField: Integer;
StrField: string
end;
TMyClass = class
FMyField: TMyField;
public
property MyProperty: TMyField read FMyField write FMyField;
end;
var
MyObject: TMyClass;
F: TMyField;
I: Integer;
begin
MyObject := TMyClass.Create;
// Запись в свойство
F.StrField := 'текст';
F.IntField := 12345;
MyObject.MyProperty := F;
// Чтение свойства
I := MyObject.IntField;
MyObject.Free
end.