Поик URL в паралельном потоке [D5, WinXP]
Yus54 © (2010-05-20 05:57:00)
Мастера помогите с паралельными потоками. Этой функцией ищу
активное 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:00) [1]
> Yus54 (20.05.10 05:57)
> function Get_URL(Servicio: string): String;
О.. по гишпански что-ли?
А где ж DDEInitialize?
--
Regards, LVT.
Наверх 
ЧАТ |
Орешник |
|
