Скачать: CL | DM;

Поик URL в паралельном потоке   Найти похожие ветки 

← →
Yus54   (2010-05-20 05:57) [0]

Мастера помогите с паралельными потоками. Этой функцией ищу активное URL, но она не работает в паралельном потоке. Паралельный поток создается и в нем все отрабатывает кроме этой фукции. Подскажите почему?

s:=Get_URL("IExplore");

function Get_URL(Servicio: string): String;
var
 Cliente_DDE: TDDEClientConv;
 temp:PChar;      //<<-------------------------This is new
begin
  Result := "";
  Cliente_DDE:= TDDEClientConv.Create( nil );
   with Cliente_DDE do
      begin
         SetLink( Servicio,"WWW_GetWindowInfo");
         temp := RequestData("0xFFFFFFFF");
         Result := StrPas(temp);
         StrDispose(temp);  //
         CloseLink;
      end;
    Cliente_DDE.Free;
end;

---

← →
Leonid Troyanovsky ©   (2010-05-20 07:57) [1]

> Yus54   (20.05.10 05:57)  

> function Get_URL(Servicio: string): String;

О.. по гишпански что-ли?
А где ж DDEInitialize?

--
Regards, LVT.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.004 c