Скачиваний:
18
Добавлен:
01.05.2014
Размер:
10.4 Кб
Скачать
я2ЏҐаҐ¤ з  ¤ ­­ле ®в Є«ЁҐ­в  бҐаўҐаг

Љ«ЁҐ­в Ї®бл« Ґв ¤ ­­лҐ бҐаўҐаг, ЁбЇ®«м§гп ва ­§ ЄжЁо
xtyp_Poke ў ўл§®ўҐ дг­ЄжЁЁ DDEClientTransaction. ‚ нвг дг­ЄжЁо
в Є¦Ґ ЇҐаҐ¤ овбп Ё¬п ⥬л, Ё¬п н«Ґ¬Ґ­в , д®а¬ в ¤ ­­ле Ё  ¤аҐб
¤ ­­ле.
DDEML ЇҐаҐ¤ Ґв ва ­§ ЄжЁо бҐаўҐаг, ўл§лў п ҐЈ® дг­ЄжЁо
®вЄ«ЁЄ  Ё гЄ §лў п Ё¬п ⥬л, Ё¬п н«Ґ¬Ґ­в , д®а¬ в ¤ ­­ле Ё  ¤аҐб
¤ ­­ле.
„ ­­лҐ Їа®зЁвлў овбп бҐаўҐа®¬ б Ї®¬®ймо дг­ЄжЁЁ DDEGetData.
‚ б«гз Ґ гбЇҐи­®Ј® § ўҐа襭Ёп ®ЇҐа жЁЁ бҐаўҐа ®Ўп§ ­ ў®§ўа вЁвм ў
DDEML Ї®¤вўҐа¦¤Ґ­ЁҐ, ў®§ўа й п ЇаЁ ўл室Ґ Ё§ дг­ЄжЁЁ ®вЄ«ЁЄ 
§­ зҐ­ЁҐ DDE_FAck.

я2ЏҐаҐ¤ з  ¤ ­­ле ®в бҐаўҐа  ЎҐ§ § Їа®б  ®в Є«ЁҐ­в 

…б«Ё Є«ЁҐ­вг ­Ґ®Ўе®¤Ё¬® Ї®бв®п­­® б«Ґ¤Ёвм §  Ё§¬Ґ­Ґ­Ёп¬Ё
¤ ­­ле, ®­ ¬®¦Ґв ᮧ¤ вм advise loop - Ё§ўҐй ойЁ© Є ­ «.
€§ўҐй ойЁ© Є ­ « ¬®¦Ґв Ўлвм ᮧ¤ ­ ¤ўге вЁЇ®ў:
- ⥯«л© Є ­ «, ў Є®в®а®¬ ЇаЁ Ё§¬Ґ­Ґ­ЁЁ ¤ ­­ле бҐаўҐа
Ї®бл« Ґв Є«ЁҐ­вг Ё§ўҐйҐ­ЁҐ ® ⮬, зв® ¤ ­­лҐ Ё§¬Ґ­Ё«Ёбм,  
Є«ЁҐ­в, ЇаЁ­пў Ё§ўҐйҐ­ЁҐ, Ї®бл« Ґв бҐаўҐаг § Їа®б ­  Ї®«г祭ЁҐ
¤ ­­ле. „ «ҐҐ Є«ЁҐ­в Ё бҐаўҐа дг­ЄжЁ®­Ёагов Ї®  «Ј®аЁв¬г ®Ў¬Ґ­ 
¤ ­­ле Ї® § Їа®бг ®в Є«ЁҐ­в .
- Ј®апзЁ© Є ­ «, Є®Ј¤  ЇаЁ Ё§¬Ґ­Ґ­Ёпе ¤ ­­ле бҐаўҐа ба §г ¦Ґ
ЇҐаҐ¤ Ґв Ёе Є«ЁҐ­вг ЎҐ§ ЇаҐ¤ў аЁвҐ«м­®Ј® Ё§ўҐйҐ­Ёп.

’аЁ  «Ј®аЁв¬  ЇҐаҐ¤ зЁ ¤ ­­ле:
- ЇҐаҐ¤ з  ¤ ­­ле Ї® § Їа®бг ®в Є«ЁҐ­в ;
- ЇҐаҐ¤ з  Ї® ⥯«®¬г Є ­ «г;
- ЇҐаҐ¤ з  Ї® Ј®ап祬㠪 ­ «г,
а §«Ёз овбп Ї®ўл襭ЁҐ¬ ­ Јаг§ЄЁ ­  Є ­ «. ‘ нв®© в®зЄЁ §аҐ­Ёп
­ ЁЎ®«ҐҐ ЇаҐ¤Ї®звЁвҐ«м­л¬ б«Ґ¤гҐв бзЁв вм ЇҐаўл©  «Ј®аЁв¬,  
­ Ё¬Ґ­ҐҐ ЇаҐ¤Ї®звЁвҐ«м­л¬ - ваҐвЁ©.

ђ бᬮваЁ¬ ЇаЁ¬Ґа дг­ЄжЁ®­Ёа®ў ­Ёп Ј®ап祣® Ё§ўҐй о饣®
Є ­ « .
ѓ®апзЁ© Ё§ўҐй ойЁ© Є ­ « ᮧ¤ Ґвбп Ї® Ё­ЁжЁ вЁўҐ Є«ЁҐ­в 
Їг⥬ ЇҐаҐ¤ зЁ ва ­§ ЄжЁЁ xtyp_AdvStart ў ўл§®ўҐ дг­ЄжЁЁ
DDEClientTransaction.
ќв  ва ­§ ЄжЁп ЇҐаҐ¤ Ґвбп бҐаўҐаг Їг⥬ ўл§®ў  ҐЈ® дг­ЄжЁЁ
®вЄ«ЁЄ .
…б«Ё бҐаўҐа Ї®¤¤Ґа¦Ёў Ґв ᮧ¤ ­ЁҐ Ё§ўҐй о饣® Є ­ « , в® ЇаЁ
Є ¦¤ле Ё§¬Ґ­Ґ­Ёпе ¤ ­­ле ®­ ¤®«¦Ґ­ ⥯Ґам ўл§лў вм дг­ЄжЁо

DDEPostAdvise(...),

Є®в®а®© ЇҐаҐ¤ овбп Ё¬Ґ­  вҐ¬л Ё н«Ґ¬Ґ­в , ®ЇЁблў ойЁе
Ё§¬Ґ­ЁўиЁҐбп ¤ ­­лҐ.
‚맮ў дг­ЄжЁЁ DDEPostAdvise ЇаЁў®¤Ёв Є ⮬г, зв® DDEML
Ї®бл« Ґв ва ­§ ЄжЁо xtyp_AdvReq бҐаўҐаг. ”г­ЄжЁп ®вЄ«ЁЄ  бҐаўҐа 
ў®§ўа й Ґв ббл«Єг ­  Ё§¬Ґ­Ґ­­лҐ ¤ ­­лҐ в ЄЁ¬ ¦Ґ бЇ®б®Ў®¬, Є Є
бҐаўҐа ¤Ґ« « ЇаЁ ॠЄжЁЁ ­  ва ­§ ЄжЁо xtyp_Request, в.Ґ.,
ўл§лў п дг­ЄжЁо DDECreateDataHandle.
Џ®«гзЁў ббл«Єг ­  ¤ ­­лҐ, DDEML Ї®бл« Ґв ва ­§ ЄжЁо
xtyp_Advdata Є«ЁҐ­вг, ЇҐаҐ¤ ў п Ґ¬г нвг ббл«Єг. Љ«ЁҐ­в
Їа®зЁвлў Ґв ¤ ­­лҐ ў бў®Ґ© дг­ЄжЁЁ ®вЄ«ЁЄ  б Ї®¬®ймо дг­ЄжЁЁ
DDEGetData. ЏаЁ ўл室Ґ Ё§ дг­ЄжЁЁ ®вЄ«ЁЄ , ў б«гз Ґ гбЇҐи­®Ј®
Їа®з⥭Ёп ¤ ­­ле, Є«ЁҐ­в ¤®«¦Ґ­ ўҐа­гвм DDE_FAck ў DDEML.

‡ ЄалвЁҐ Ё§ўҐй о饣® Є ­ «  Їа®Ё§ў®¤Ёвбп Ї® Ё­ЁжЁ вЁўҐ
Є«ЁҐ­в  ЇҐаҐ¤ зҐ© ва ­§ ЄжЁЁ xtyp_AdvStop ў DDEML.
‘ҐаўҐа, Ї®«гзЁў нвг ва ­§ ЄжЁо, ¤®«¦Ґ­ ЇаҐ¤гᬮваҐвм ®вЄ §
®в Ї®б«Ґ¤гойЁе ўл§®ў®ў дг­ЄжЁЁ DDEPostAdvise ЇаЁ Ё§¬Ґ­Ґ­Ёпе
¤ ­­ле.

я1ђ §алў б®Ґ¤Ё­Ґ­Ёп

ђ §алў б®Ґ¤Ё­Ґ­Ёп ¬®¦Ґв Ўлвм Їа®Ё§ўҐ¤Ґ­ Є Є Ї® Ё­ЁжЁ вЁўҐ
Є«ЁҐ­в , в Є Ё Ї® Ё­ЁжЁ вЁўҐ бҐаўҐа .
ђ §алў б®Ґ¤Ё­Ґ­Ёп Їа®Ё§ў®¤Ёвбп ўл§®ў®¬ дг­ЄжЁЁ

DDEDisconnect(...),

Є®в®а®© ЇҐаҐ¤ Ґвбп Ё¤Ґ­вЁдЁЄ в®а а §алў Ґ¬®Ј® Є ­ « .

‚ ®вўҐв ­  нв®в ўл§®ў DDEML ЇҐаҐ¤ Ґв ва ­§ ЄжЁо
xtyp_Disconnect Ї ав­Ґаг Ї® бўп§Ё.

„Ґ©бвўЁп Ї® § ўҐа襭Ёо ᮥ¤Ё­Ґ­Ёп ўЄ«оз ов ў ᥡп, Є Є
Їа ўЁ«®, ®бў®Ў®¦¤Ґ­ЁҐ ¤Ё­ ¬ЁзҐбЄ®© Ї ¬пвЁ, ўл¤Ґ«пҐ¬®© Ї®¤ ЎгдҐа 
¤ ­­ле Ё Ї®¤ бва®ЄЁ, ®ЇЁблў ойЁҐ Ё¬Ґ­  бҐаўЁб , вҐ¬л Ё н«Ґ¬Ґ­в®ў.

Ља®¬Ґ в®Ј®, ЇаЁ«®¦Ґ­Ёп - ЎлўиЁҐ Ї ав­Ґал Ї® бўп§Ё ¤®«¦­л
ўл§ў вм дг­ЄжЁо

DDEUninitialize,

®бў®Ў®¦¤ ойго аҐбгабл DDEML, бўп§ ­­лҐ б ᮮ⢥вбвўгойЁ¬Ё
ЇаЁ«®¦Ґ­Ёп¬Ё.

€, ­ Є®­Ґж, ўл§лў Ґвбп Їа®жҐ¤га 

FreeProcInstance,

а §аги ой п бўп§м дг­ЄжЁЁ ®вЄ«ЁЄ  ЇаЁ«®¦Ґ­Ёп б® б।®©, ў Є®в®а®©
®­® дг­ЄжЁ®­ЁагҐв.

ЏҐаҐзЁб«Ґ­­лҐ ¤Ґ©бвўЁп пў«повбп ¬Ё­Ё¬ «м­л¬ ­ Ў®а®¬
¤Ґ©бвўЁ©, ॠ«Ё§гойЁе Ї аг Є«ЁҐ­в-бҐаўҐа.

Љ Є ўЁ¤­®, ¤ ¦Ґ нв®в ¬Ё­Ё¬ «м­л© ­ Ў®а ¤Ґ©бвўЁ© пў«пҐвбп
¤®бв в®з­® б«®¦­л¬. Џ®н⮬г ᮢ६Ґ­­лҐ б।л а §а Ў®вЄЁ Їа®Ја ¬¬
бв६пвбп ®Ў«ҐЈзЁвм Їа®ҐЄвЁа®ў ­ЁҐ DDE-ЇаЁ«®¦Ґ­Ё©. ‚ Є зҐб⢥
ЇаЁ¬Ґа  в Є®Ј® бв६«Ґ­Ёп а бᬮваЁ¬ ЇаЁ­жЁЇл ᮧ¤ ­Ёп
DDE-ЇаЁ«®¦Ґ­Ё© ў б।Ґ Delphi.

я2ЋаЈ ­Ё§ жЁп ®Ў¬Ґ­  ¤ ­­л¬Ё Ї® Їа®в®Є®«г DDE
я2¬Ґ¦¤г Delphi-ЇаЁ«®¦Ґ­Ёп¬Ё

‚ Delphi-б।Ґ ЇаЁ«®¦Ґ­Ёп DDE-бҐаўҐа Ё DDE-Є«ЁҐ­в ᮧ¤ овбп
Їг⥬ ўЄ«о祭Ёп ў д®а¬г бЇҐжЁ «Ё§Ёа®ў ­­ле ­ҐўЁ§г «м­ле
Є®¬Ї®­Ґ­в®ў:
- Є®¬Ї®­Ґ­вл TDDEServerConv Ё TDDEServerItem ўЄ«оз овбп ў
ЇаЁ«®¦Ґ­ЁҐ-бҐаўҐа;
- Є®¬Ї®­Ґ­вл TDDEClientConv Ё TDDEClientItem ўЄ«оз овбп ў
ЇаЁ«®¦Ґ­ЁҐ-Є«ЁҐ­в.
‘®®вўҐвбвўгой п ­ бва®©Є  бў®©бвў Є®¬Ї®­Ґ­в®ў ­  нв ЇҐ
Їа®ҐЄвЁа®ў ­Ёп ЇаЁ«®¦Ґ­Ё© ®ЎҐбЇҐзЁў Ґв ў§ Ё¬®¤Ґ©бвўЁҐ ЇаЁ«®¦Ґ­Ё©
ЇаЁ Ёе ўлЇ®«­Ґ­ЁЁ.
ђ бᬮваЁ¬ Ї®б«Ґ¤®ў вҐ«м­® нв Їл ᮧ¤ ­Ёп DDE-бҐаўҐа  Ё
DDE-Є«ЁҐ­в  ў б।Ґ Delphi.

я_я1‘®§¤ ­ЁҐ DDE-бҐаўҐа 

1. Љ®¬Ї®­Ґ­вл DDEServerConv Ё TDDEServerItem Ї®¬Ґй овбп ў
д®а¬г. ‘।  Їа®ҐЄвЁа®ў ­Ёп  ўв®¬ вЁзҐбЄЁ ЇаЁбў Ёў Ґв Є®¬Ї®­Ґ­в ¬
Ё¬Ґ­ :
DDEServerConv1 Ё DDEServerItem1.

2. Џа®Ё§ў®¤Ёвбп бўп§лў ­ЁҐ Є®¬Ї®­Ґ­в®ў DDEServerConv1 Ё
DDEServerItem1 Їг⥬ ЇаЁбў Ёў ­Ёп бў®©бвўг ServerConv Є®¬Ї®­Ґ­в 
TDDEServerItem §­ зҐ­Ёп, а ў­®Ј® Ё¬Ґ­Ё Є®¬Ї®­Ґ­в  TDDEServerConv
- DDEServerConv1.
„ ­­®Ґ ЇаЁбў Ёў ­ЁҐ Ї®§ў®«пҐв бўп§ вм Є®¬Ї®­Ґ­вл в®«мЄ® ў®
ўаҐ¬п Їа®ҐЄвЁа®ў ­Ёп ЇаЁ«®¦Ґ­Ёп, ­® ¤«п в®Ј®, зв®Ўл ®­Ё ®Є § «Ёбм
бўп§ ­­л¬Ё Ё ў® ўаҐ¬п ўлЇ®«­Ґ­Ёп, ­Ґ®Ўе®¤Ё¬® ў Ё­ЁжЁ «Ё§ жЁ®­­®©
з бвЁ ЇаЁ«®¦Ґ­Ёп ᤥ« вм пў­®Ґ ЇаЁбў Ёў ­ЁҐ:

DDEServerItem1.ServerConv := DDEServerConv1;

3. ‘Ёб⥬  ваҐега®ў­Ґў®©  ¤аҐб жЁЁ ¤ ­­ле ўлЈ«п¤Ёв б«Ґ¤гойЁ¬
®Ўа §®¬:
- Ё¬п бҐаўЁб  - Ё¬п ЁбЇ®«­пҐ¬®Ј® д ©«  ЇаЁ«®¦Ґ­Ёп-бҐаўҐа ,
Ё«Ё Ё¬п Їа®ҐЄв  ЎҐ§ а биЁаҐ­Ёп;
- Ё¬п ⥬л - Ё¬п Є®¬Ї®­Ґ­в  TDDEServerConv - DDEServerConv1.
- Ё¬п н«Ґ¬Ґ­в  - Ё¬п Є®¬Ї®­Ґ­в  TDDEServerItem -
DDEServerItem1.

4. „ ­­лҐ ᮤҐа¦ вбп ў бў®©б⢥ Text Є®¬Ї®­Ґ­в 
TDDEServerItem.
—в®Ўл ЇҐаҐ¤ вм ¤ ­­лҐ, ЇаҐ¤­ §­ зҐ­­лҐ ¤«п Є«ЁҐ­в®ў,
­ ЇаЁ¬Ґа, Ё§ Є®¬Ї®­Ґ­в  TEdit - бва®ЄЁ ўў®¤  - ў Є®¬Ї®­Ґ­в
TDDEServerItem, ­Ґ®Ўе®¤Ё¬® ўлЇ®«­Ёвм ЇаЁбў Ёў ­ЁҐ:

DDEServerItem1.Text := Edit1.Text;

Ј¤Ґ Edit1 - Ё¬п Є®¬Ї®­Ґ­в  TEdit, ўЄ«о祭­®Ј® ў д®а¬г
ЇаЁ«®¦Ґ­Ёп-бҐаўҐа  ¤«п ®в®Ўа ¦Ґ­Ёп ¤ ­­ле.
„ ­­л© ⥪бв ¤®«¦Ґ­ Ўлвм ўЄ«о祭 ў ®Ўа Ў®взЁЄ б®ЎлвЁп
OnChange Є®¬Ї®­Ґ­в  TEdit.

…б«Ё Є«ЁҐ­в ЇҐаҐ¤ « ¤ ­­лҐ бҐаўҐаг б Ї®¬®ймо ¬Ґв®¤ 
PokeData, в® ЇаЁ­пвлҐ бҐаўҐа®¬ ¤ ­­лҐ ¬®Јгв Ўлвм ®в®Ўа ¦Ґ­л,
­ ЇаЁ¬Ґа, ў бва®ЄҐ । ЄвЁа®ў ­Ёп б«Ґ¤гойЁ¬ ®Ўа §®¬:

Edit1.Text := DDEServerItem1.Text,
„ ­­л© ⥪бв ¤®«¦Ґ­ Ўлвм ­ ЇЁб ­ ў ®Ўа Ў®взЁЄҐ б®ЎлвЁп
OnPokeData Є®¬Ї®­Ґ­в  TDDEServerItem.

я_я1‘®§¤ ­ЁҐ DDE-Є«ЁҐ­в 

1. Љ®¬Ї®­Ґ­вл TDDEClientConv Ё TDDEClienItem Ї®¬Ґй овбп ў
д®а¬г. ‘।  Їа®ҐЄвЁа®ў ­Ёп  ўв®¬ вЁзҐбЄЁ ЇаЁбў Ёў Ґв Ё¬ Ё¬Ґ­ :

DDEClientConv1 Ё DDEClientItem1.

2. Џа®Ё§ў®¤Ёвбп бўп§лў ­ЁҐ Є®¬Ї®­Ґ­в®ў DDEClientConv1 Ё
DDEClientItem1 Їг⥬ ЇаЁбў Ёў ­Ёп бў®©бвўг DDEConv Є®¬Ї®­Ґ­в 
TDDEClientItem §­ зҐ­Ёп, а ў­®Ј® Ё¬Ґ­Ё Є®¬Ї®­Ґ­в  TDDEClientConv
- DDEClientConv1.
„ ­­®Ґ ЇаЁбў Ёў ­ЁҐ Ї®§ў®«пҐв бўп§ вм Є®¬Ї®­Ґ­вл в®«мЄ® ў®
ўаҐ¬п Їа®ҐЄвЁа®ў ­Ёп ЇаЁ«®¦Ґ­Ёп, ­® ¤«п в®Ј®, зв®Ўл ®­Ё ®Є § «Ёбм
бўп§ ­­л¬Ё Ё ў® ўаҐ¬п ўлЇ®«­Ґ­Ёп, ­Ґ®Ўе®¤Ё¬® ў Ё­ЁжЁ «Ё§ жЁ®­­®©
з бвЁ ЇаЁ«®¦Ґ­Ёп ᤥ« вм пў­®Ґ ЇаЁбў Ёў ­ЁҐ:

DDEClientItem1.DDEConv := DDEClientConv1;

3. Џа®Ё§ў®¤Ёвбп ЇаЁбў®Ґ­ЁҐ Ё¬Ґ­ бҐаўЁб , вҐ¬л Ё н«Ґ¬Ґ­в 
ᮮ⢥вбвўгойЁ¬ бў®©бвў ¬ Є®¬Ї®­Ґ­в®ў Є«ЁҐ­в :
- бў®©бвўг DDEService Є®¬Ї®­Ґ­в  TDDEClientConv
ЇаЁбў Ёў Ґвбп §­ зҐ­ЁҐ, а ў­®Ґ Ё¬Ґ­Ё Їа®ҐЄв  бҐаўҐа ;
- бў®©бвўг DDETopic Є®¬Ї®­Ґ­в  TDDEClientConv ЇаЁбў Ёў Ґвбп
§­ зҐ­ЁҐ, а ў­®Ґ Ё¬Ґ­Ё Є®¬Ї®­Ґ­в  TDDEServerConv бҐаўҐа ;
- бў®©бвўг DDEItem Є®¬Ї®­Ґ­в  TDDEClientItem ЇаЁбў Ёў Ґвбп
§­ зҐ­ЁҐ, а ў­®Ґ Ё¬Ґ­Ё Є®¬Ї®­Ґ­в  TDDEServerItem бҐаўҐа .

4. …б«Ё бў®©бвўг ConnectMode Є®¬Ї®­Ґ­в  TDDEClientConv
ЇаЁбў®Ёвм §­ зҐ­ЁҐ ddeAutomatic,   бў®©бвўг ServiceApplication
Є®¬Ї®­Ґ­в  TDDEClientConv ЇаЁбў®Ёвм §­ зҐ­ЁҐ, а ў­®Ґ Ї®«­®¬г (б
гзҐв®¬ ЇгвЁ) Ё¬Ґ­Ё Їа®Ја ¬¬л бҐаўҐа , в® ЇаЁ«®¦Ґ­ЁҐ бҐаўҐа Ўг¤Ґв
§ Јаг¦ вмбп Ё гбв ­ ў«Ёў вм ᮥ¤Ё­Ґ­ЁҐ б Є«ЁҐ­в®¬  ўв®¬ вЁзҐбЄЁ
ЇаЁ § Јаг§ЄҐ Ї®б«Ґ¤­ҐЈ®.
‘® бв®а®­л Є«ЁҐ­в  ᮥ¤Ё­Ґ­ЁҐ гбв ­ ў«Ёў Ґвбп ўл§®ў®¬ ¬Ґв®¤ 

SetLink,

Є®в®а®¬г ЇҐаҐ¤ овбп бва®ЄЁ б Ё¬Ґ­ ¬Ё бҐаўЁб  Ё ⥬л.

5. ‡ Їа®б ¤ ­­ле ®в бҐаўҐа  ўлЇ®«­пҐвбп Їг⥬ ўл§®ў  ¬Ґв®¤ 

DDEClientConv1.RequestData(DDEClientItem1.DDEItem)

Є®¬Ї®­Ґ­в  TDDEClientConv, ЇҐаҐ¤ ў п ЇаЁ н⮬ ¤ ­­®¬г ¬Ґв®¤г Ё¬п
§ Їа иЁў Ґ¬®Ј® н«Ґ¬Ґ­в  ¤ ­­ле. „ ­­л© ¬Ґв®¤ ў®§ўа й Ґв гЄ § вҐ«м
­  ASCIIZ-бва®Єг, ᮤҐа¦ йго ¤ ­­лҐ.

6. ЏҐаҐ¤ з  ¤ ­­ле ®в Є«ЁҐ­в  бҐаўҐаг ўлЇ®«­пҐвбп Їг⥬
ўл§®ў  ¬Ґв®¤ 

DDEClientConv1.PokeData(...),

Є®в®а®¬г ЇҐаҐ¤ овбп Ё¬п н«Ґ¬Ґ­в  ¤ ­­ле Ё гЄ § вҐ«м ­ 
ASCIIZ-бва®Єe, ᮤҐа¦ йго ЇҐаҐ¤ ў Ґ¬лҐ ¤ ­­лҐ.

7. ‘ ¬Ё ¤ ­­лҐ ᮤҐа¦ вбп ў бў®©б⢥ Text Є®¬Ї®­Ґ­в 
TDDEClientItem Ё ®Ў­®ў«повбп ў¬ҐбвҐ б ¤ ­­л¬Ё бҐаўҐа .
„ ­­лҐ ¬®Јгв ўлў®¤Ёвмбп ў бва®Єг । ЄвЁа®ў ­Ёп Edit1 вЁЇ 
TEdit б Ї®¬®ймо ЇаЁбў Ёў ­Ёп:

Edit1.Text := DDEClientItem1.Text;

“Є § ­­ п бва®Є  ¤®«¦­  Ўлвм ўЄ«о祭  ў ®Ўа Ў®взЁЄ б®ЎлвЁп
OnChange Є®¬Ї®­Ґ­в  TDDClientItem.

8. ђ §алў б®Ґ¤Ё­Ґ­Ёп ўлЇ®«­пҐвбп Ї® Ё­ЁжЁ вЁўҐ Є«ЁҐ­в 
¬Ґв®¤®¬ CloseLink Є®¬Ї®­Ґ­в  TDDEClientConv.

Љ Є ўЁ¤­® Ё§ ЇаЁўҐ¤Ґ­­®Ј® ®ЇЁб ­Ёп, ўЁ§г «м­ п б। 
Їа®ҐЄвЁа®ў ­Ёп Ё§Ў ў«пҐв а §а Ў®взЁЄ  ®в ¬ ббл агвЁ­­ле Їа®жҐ¤га
Ї® гбв ­®ў«Ґ­Ёо ў§ Ё¬®¤Ґ©бвўЁп ¬Ґ¦¤г DDE-ЇаЁ«®¦Ґ­Ёп¬Ё, бў®¤п Ёе Є
ўлЎ®аг Ї®¤е®¤пйЁе бў®©бвў бЇҐжЁ «Ё§Ёа®ў ­­ле Є®¬Ї®­Ґв®ў Ё
­ ЇЁб ­Ёо Є®¤®ў, ®ЇЁблў ойЁе ॠЄжЁЁ Є®¬Ї®­Ґ­в®ў ­  Ё§¬Ґ­Ґ­Ёп
нвЁе бў®©бвў ў® ўаҐ¬п ўлЇ®«­Ґ­Ёп Їа®Ја ¬¬л.

Соседние файлы в папке Операционные среды АСОИУ