412

 Cmd    ( ExecuteMacro)   
( ExecuteMacroLines),     .  Wa-
itFIg ,        
.  WaitFIg = true,     ExecuteMacrn
ExecuteMacroLines, PokeData, PokeDataLines  RequestData   '
,        . , ;>;

     , ,    ;,,
WaitStat  DdeClientConv.  WaitStat = true,   Execu- |
teMacro, ExecuteMacroLines, PokeData, PokeDataLines  RequestData   |
,            .     |
  true     .
  OnExecuteMacro  TDdeServerConv, '
 ,   :

void ...(TObject *Sender, TStrings *Msg)

 Msg    .

       ,  .
 -        :

if(!DdeClientConvl->ExecuteMacro(EMacro->Text.c_str(),false))
ShowMessage("  ,    ");

        ,  -
    .

      OnExecuteMacro 
TDdeServerConv.        -
      Label 1.   
OnExecuteMacro   TDdeServerConv    :

void_fastcall TFServer::TopiclExecuteMacro(TObject *Sender,

TStrings *Msg)
{

if(Msg->Count == 0 )
ShowMessage(Application->ExeName + ":   ");

else
Labell->Caption = "  '" + Msg->Strings[0] + "'";

)

   C++Builder   ( ),  
 -         
  .