Pegar url Firefox

[michel kafury 1]

Esta função está dando erro no meu delphi 2010 e não entendo porque:

 

function GetURL(Service: string): String;
var
ClDDE: TDDEClientConv;
temp:PChar;
begin
Result := '';
//create a new DDE Client object
ClDDE:= TDDEClientConv.Create( nil );
with ClDDE do
begin
SetLink(Service,'WWW_GetWindowInfo');
temp := RequestData('0xFFFFFFFF');//[DCC Error] monmain.pas(138): E2010 Incompatible types: 'AnsiChar' and 'Char'
Result := StrPas(temp);
StrDispose(temp);
CloseLink;
end;
ClDDE.Free;
end;

[Renanbg 1]

Onde tem Char, mude para AnsiChar

[michel kafury 1]

Valeu deu certo!