[Comedia-hackers] Re: some questions
Status: Alpha
Brought to you by:
seroukhov
|
From: Sergey S. <ser...@ma...> - 2002-10-22 20:39:10
|
=F0=D2=CF=C2=CC=C5=CD=C1 =D7 =D4=CF=CD, =DE=D4=CF =D0=D2=C9 =
=D3=CF=DA=C4=C1=CE=C9=C9 ModuleNode _=D7=D3=C5=C7=C4=C1_ =
=C4=CF=CC=D6=C5=CE =DA=C1=C4=C1=D7=C1=D4=D8=D3=D1 =C2=C1=DA=CF=D7=D9=CA
ModuleDef. =FC=D4=CF =D3=C4=C5=CC=C1=CE=CF =C4=CC=D1 =D4=CF=C7=CF, =
=DE=D4=CF =D0=D2=CF=C7=D2=C1=CD=CD=C9=D3=D4 =CE=C5 =D3=CD=CF=C7 =D7 =
RunTime =D3=CF=DA=C4=C1=D7=C1=D4=D8
=CE=CF=D7=D9=C5 =DC=CB=DA=C5=CD=D0=CC=D1=D2=D9 ModuleDef, =C1 =
=D7=D9=CE=D5=D6=C4=C5=CE =CF=D0=C9=D3=D9=D7=C1=D4=D8 =C9=C8 =D7 =
=C2=C9=C2=CC=C9=CF=D4=C5=CB=C1=C8. =EE=CF =D5=D6 =C5=D3=CC=C9
=CF=D0=C9=D3=C1=CC, =D4=CF =CF=C2=D1=DA=C1=CE =DA=C1=C4=C1=D7=C1=D4=D8 =
=C9=C8 =D0=D2=C9 =D3=CF=DA=C4=C1=CE=C9=C9 =CE=CF=D7=D9=C8 =
=CD=CF=C4=D5=CC=C5=CA. =E9=CD=C5=CE=CE=CF ModuleDef
=CF=D0=D2=C5=C4=C5=CC=D1=C5=D4 =D4=C9=D0 =CD=CF=C4=D5=CC=D1, =
=C9=D3=D0=CF=CC=CE=D1=C5=CD=D9=C5 =C6=C1=CA=CC=D9 =C9 =
=C9=CE=D4=C5=D2=C6=C5=CA=D3=D9.=20
=E4=D5=CD=C1=C0 =DC=D4=CF =D0=D2=C1=D7=C9=CC=D8=CE=CF=C5 =
=D0=CF=D7=C5=C4=C5=CE=C9=C5, =DE=D4=CF=C2=D9 =
=DA=C1=D3=D4=C1=D7=CC=D1=D4=D8 =D0=D2=CF=C7=D2=C1=CD=CD=C9=D3=D4=CF=D7 =
=CF=D0=C9=D3=D9=D7=C1=D4=D8
=D7=D3=C5 =D3=D7=CF=C9 =CD=CF=C4=D5=CC=C9 =D7 =
=C2=C9=C2=CC=C9=CF=D4=C5=CB=C1=C8. =E9=CE=C1=DE=C5 =
=D2=D5=DB=C1=D4=D8=D3=D1 =D7=D3=C5 =CF=D3=CE=CF=D7=D9 =
=CB=D2=CF=D3=D3=D0=CC=C1=D4=C6=CF=D2=CD=C5=CE=CE=CF=D3=D4=C9,
=D0=CF=D4=CF=CD=D5 =CB=C1=CB =CE=D5=D6=CE=CF =
=C4=C5=CB=CC=C1=D2=C1=D4=C9=D7=CE=CF =CF=D0=C9=D3=D9=D7=C1=D4=D8 =
=D7=C1=D2=C9=C1=CE=D4=D9 =DA=C1=C7=D2=D5=DA=CB=C9 =
=C9=D3=D0=CF=CC=CE=D1=C5=CD=D9=C8 =CD=CF=C4=D5=CC=C5=CA,
=C9=CE=D4=C5=D2=C6=C5=CA=D3=CF=D7 =C9 =C1=C4=C1=D0=D4=C5=D2=D9 =CB =
=CE=C9=CD.
Regards, Sergey Seroukhov
----- Original Message -----=20
From: Sergey Merkuriev=20
To: Sergey Seroukhov=20
Sent: Tuesday, October 22, 2002 1:27 PM
Subject: Re: some questions
Hello!
=20
> =EE=D5 =D4=C1=CB =CF=CE=C9 =D3=CF=DA=C4=C1=C0=D4=D3=D1. =F7 =
=DE=C5=CD =D0=D2=CF=C2=CC=C5=CD=C1?
var
AbsoluteId: integer;
ModuleDef: IModuleDef;
ModuleNode: IModuleNode;
ParentModuleNode: IModuleNode;
ChildModuleNodes: ICollection;
Properties: ICollection;
begin
ParentModuleNode :=3D TModuleNode.CreateRootNode;
{create ModuleNode with nil parameters}
try
ModuleNode :=3D TModuleNode.Create(nil, nil, nil, nil); =
//=D0=D2=CF=C9=D3=C8=CF=C4=C9=D4 =CF=DB=C9=C2=CB=C1 =D0=D2=C9 =
=D7=D9=C8=CF=C4=C5 =C9=DA =CB=CF=CE=D3=D4=D2=D5=CB=D4=CF=D2=C1
finally
Fail('Error');=20
end;
> constructor TModuleNode.CreateRootNode;
> begin
> FAbsoluteId :=3D 0;
> FChildren :=3D TCollection.Create;
> end;
=F5=D6=C5 =D5=D7=C9=C4=C5=CC, =DE=D4=CF =D7=D9=DA=D9=D7=C1=C5=D4=D3=D1 =
=D0=C5=D2=D7=D9=CA =CB=CF=CE=D3=D4=D2=D5=CB=D4=CF=D2. =
=E9=CE=D4=C5=D2=C5=D3=CE=CF =C2=D9 =D5=DA=CE=C1=D4=D8 =D0=D2=C9 =
=DC=D4=CF=CD _AddRef =CE=C5 =D3=D2=C1=C2=C1=D4=D9=D7=C1=C5=D4 =C4=D7=C1 =
=D2=C1=DA=C1?
~ Sergey Merkuriev
|