    ______________411

 PokeData  PokeDataLines   , -
   DdeClientItem  .   ,  -
 DdeClientConv    .    -
:

bool PokeData(const System::AnsiString Item, char *Data);

bool PokeDataLines(const System::AnsiString Item,
\      Classes::TStrings* Data);

    Item    DdeServerItem
 ,    ,   Data   , -
     .     ,
  PokeData    Data     
 ,    PokeDataLines     TStrings.

  true,     .
        -
- , ,       PokeData
:

if ( ! DdeClientConvl->PokeDataLines(DdeClientIteml->DdeItem,

Memol->Lines))
ShowMessage("  ,    ");

    ,  ,   
  PokeData,      ,   -
.      DdeClientIteml->DdeItem   
DdeServerItem  ,  ,   .
   DdeServerItem  ,  
    Memol.

 ,      , -
    Memol     PokeData.  ,  -
   Editi .      -
  .     ,     (
 )        .

  PokeData  PokeDataLines  
OnPokeData   DdeServerItem  ,    -
.       , , , -
   .      -
: Label     OnPokeData   DdeServerItem
, 

Labell->Caption = " : '" +

((TDdeServerItem *)Sender)->Text +"'";

         DdeSer-
verItem,    .

       ExecuteMacro  Execute-
MacroLines  DdeClientConv.      
,         .  
        .  
   OnExecuteMacro  DdeServerConv -
.

 ExecuteMacro  ExecuteMacroLines  ,  -
 DdeClientConv    .    -
:

bool ExecuteMacro(char * Cmd, bool WaitFIg);

bool ExecuteMacroLines(Classes::TStrings* Cmd, bool WaitFIg);