maison

Forum: "Main";
Archive actuelle: 2002.01.08;
Télécharger: [xml.tar.bz2];
vers le bas

НУ ОЧЕНЬ ИНТЕРЕСНЫЙ ВОПРОССС :)))) Trouver des branches similaires


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

// Имеется класс
TNetworkResource = class(TPersistent)
Privée
FdwScope: TResourceScope;
FdwType: TResourceType;
FdwDisplayType: TResourceDisplayType;
FdwUsage: TResourceUsage;
FlpLocalName: string;
FlpRemoteName: string;
FlpComment: string;
FlpProvider: string;
publié
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;
fin;

var
// Имеем переменную типа TNetWorkResource
NetworkResource: TNetworkResource;
// Имеем переменную типа TNetResource
NetResource: TNetResource;
question:
Как сотворить что - то подобное NetResource := NetworkResource ?
Очень не хочется переводить каждое поле, т. е.:
NetworkResource.dwScope := NetResource.dwScope;
...



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

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



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

: - (((



Dense (2001-12-18 20:36) 3

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



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

"Operators" посмотри в справке "The @ operator" ...
В С++ перегрузка операторов равенства...





Pages: 1 branche entière

Forum: "Main";
Archive actuelle: 2002.01.08;
Télécharger: [xml.tar.bz2];

à l'étage

Top.Mail.Ru Yandeks.Metrika













Mémoire: 0.8 MB
Heure: 0.033 c
6-22271
vainqueur
2001-10-04 20:15
2002.01.08
при конекте не появлялось удаленное соединение????


1-22067
DNT
2001-12-15 16:20
2002.01.08
Dialogue et dll


14-22347
roman001
2001-11-06 18:09
2002.01.08
Hébergement


1-22061
Колеся
2001-12-18 19:44
2002.01.08
почему MDI форма не отображает MDIChild в меню ???


1-22097
Serzhik
2001-12-19 15:45
2002.01.08
Quels sont les deux boutons à attacher, de sorte qu'ils sont en bas au centre?





afrikaans albanais Arabic arménien azerbaïdjanais basque Biélorusse Bulgare catalan Chinois simplifié) Chinois (traditionnel) croate Tchèque Danois Néerlandais English estonien Filipino Finlandais Français
galicien géorgien Allemand Grecque Créole haïtien hébreu Hindi Hongrois Islandais Indonesian irlandais Italien Japonais Coréen letton lituanien macédonien Malay maltais Norvégien
persan Polonais Portugais roumain Russe serbe Slovaque Slovène Espagnol Swahili Suédois Thai turc ukrainien Urdu vietnamien gallois yiddish bengali bosniaque
Cebuano espéranto gujarati Hause hmong Igbo Javanais Kannada Khmer lao latin maori Marathi mongol népalais punjabi somali tamil telugu yoruba
zoulou
Английский Français Allemand Italien Португальский Русский Espagnol