Получение данных из Program Manager через DDE

Материал из DRKB


Установите соединение DDEClientConv с сервером и установите обоим DdeTopic в 'ProgMan'. Вызовите RequestData и передайте 'Groups' как элемент (item); обратно вы получите список имен групп. Вызовите RequestData с одним из имен групп и вы получите детальную информацию о группе. Вероятно дальше вы захотите передать полученные данные в ListBox, т.к. сразу можно увидеть что мы имеем и как затем это можно обработать, например:

var P: PChar;
begin
  P := DdeClientConv1.RequestData('Groups');
  ListBox1.Items.SetText(P);
  StrDispose(P);
 
  with ListBox1 do
    P := DdeClientConv1.RequestData(Items[ItemIndex]);
  ListBox2.Items.SetText(P);
  StrDispose(P);
end;


Source: http://delphiworld.narod.ru/
ID: 04503