     407

 DdeServerItem   CopyToClipboard.  
     Clipboard     -
    ,     -
:    .

,           -
,    ,       -
.       :

1.     DdeServerConv     Name
 Topicl.     .

2.     DdeServerItem     Name
 Itemsl,   ServerConv  Topicl.   
   .   Strings  -
, :

 1  Topicl  Server
 2  Topicl  Server

       ,   -
      .

3.     Edit   Editi    
Text      DdeServerItem->Strings. 
     ,  ,   -
       .   
  OnChange  Editi  

Itemsl->Text = Editl->Text;

       Itemsl.

4.   1  2,        Dde-
ServerConv  DdeServerItem   Topic2  Items2.   
  .      ,    
Itemsl,     Topicl  Topic2.

5.     Button,      


Itemsl->CopyToClipboard() ;

         Clipboard.
    .     , -
  . 6.8.

6.  ,    Server.  , 
  ,  ,    .

7.         Serverl.  ,  
     ,     
   .     Itemsl 
Items2    Server  Serverl.   -
  .

. 6.8

- DDE