Головна сторінка
Top.Mail.Ru Яндекс.Метрика
Форум: "Основна";
Поточний архів: 2002.01.08;
Завантажити: [xml.tar.bz2];

Вниз

НУ ДУЖЕ ЦІКАВИЙ ВОПРОССС :)))) Знайти схожі гілки


Русский   (2001-12-18 17:03) [0]

// Є клас
TNetworkResource = class (TPersistent)
приватний
FdwScope: TResourceScope;
FdwType: TResourceType;
FdwDisplayType: TResourceDisplayType;
FdwUsage: TResourceUsage;
FlpLocalName: string;
FlpRemoteName: string;
FlpComment: string;
FlpProvider: string;
опублікований
property dwScope: TResourceScope read FdwScope write FdwScope;
property dwType: TResourceType read FdwType write FdwType;
property dwDisplayType: TResourceDisplayType read FdwDisplayType write FdwDisplayType;
property dwUsage: TResourceUsage read FdwUsage write FdwUsage;
property lpLocalName: string read FlpLocalName write FlpLocalName;
property lpRemoteName: string read FlpRemoteName write FlpRemoteName;
property lpComment: string read FlpComment write FlpComment;
property lpProvider: string read FlpProvider write FlpProvider;
end;

було
// Маємо змінну типу TNetWorkResource
NetworkResource: TNetworkResource;
// Маємо змінну типу TNetResource
NetResource: TNetResource;
Питання:
Як створити що - щось подібне NetResource: = NetworkResource?
Дуже не хочеться перекладати кожне поле, т. Е .:
NetworkResource.dwScope: = NetResource.dwScope;
...



Digitman   (2001-12-18 17:48) [1]

Ніяк. Тільки прямим присвоєнням значень окремих полів.
TNetResource - проста API-структура, а TNetworkResource - твій власний клас.



Русский   (2001-12-18 19:46) [2]

: - (((



Дремучий   (2001-12-18 20:36) [3]

пропиши для свого класу метод Assign, де і будеш робити
потрібні присвоєння, а програмі роби вже не привласнення, а викликай
Assign - стандартна процедура ....
;)



False_Delirium   (2001-12-19 00:27) [4]

"Operators" подивися в довідці "The @ operator" ...
В С ++ перевантаження операторів рівності ...



сторінки: 1 вся гілка

Форум: "Основна";
Поточний архів: 2002.01.08;
Завантажити: [xml.tar.bz2];

наверх









Пам'ять: 0.56 MB
Час: 0.039 c
1-22135
DerZky
2001-12-19 19:51
2002.01.08
Як перенести файл, що запускається в іншу папку?


1-22052
avr555
2001-12-17 19:54
2002.01.08
перетаскується компонент


1-22203
T2
2001-12-16 07:07
2002.01.08
Вилов помилки відсутності msWord


1-22227
Tosov
2001-12-15 10:43
2002.01.08
Як працювати з TInplaceEdit


1-22221
Кисле
2001-12-16 21:00
2002.01.08
ресурси





африкаанс албанський арабська вірменин азербайджанець баскський білоруський болгарська каталонський Китайська (спрощене письмо) Китайський традиційний) хорватський чеська данську мову нідерландський Ukranian естонець Філіппінська фінську мову французький
галісійська грузинський німецький грецький гаїтянський креольський давньоєврейську хінді угорський ісландський індонезієць ірландський італійський японський корейський латиська литовець македонець малайський мальтійський норвежець
перс полірування португальська румунський російська сербський словацький словенський іспанська суахілі шведську мову тайський турецька український урду в'єтнамський валлійський ідиш бенгальський боснійський
кебуано есперанто гуджараті хауса хмонг ігбо яванський каннада кхмерская Лао латинь маорі маратхі монгольський непальська панджабі сомалійський тамільська телугу йоруба
зулуський
Англійська Французький Німецький Італійський Португальська Русский Іспанська