inkompatible Typen Widechar und Char

[Lyan]

Hallo,

wie muss ich das denn /'Conventieren/', dass die fehlermeldung den Geist aufgibt?

Delphi-Quellcode:

function LoadURL(URL: String): String;
var
  IOpen, IURL: HINTERNET;
  Read: Cardinal;
  Msg: string;
begin
  Result := '';
  try
   IOpen := InternetOpen('Okay!',INTERNET_OPEN_TYPE_PRECONFIG, '', '',INTERNET_FLAG_NEED_FILE);
    if IOpen <> nil then
    try
      [U]IURL := InternetOpenUrl(IOpen, PWideChar(URL), nil, 0,INTERNET_FLAG_DONT_CACHE, 0);[/U]
      if IURL <> nil then
      try
        SetLength(Msg, 4096);
        repeat
           if InternetReadFile(IURL, @Msg[1], 4096, Read) then
            Result := Result + Copy(Msg, 1, Read)
          else
            Break;
        until Read = 0;
      finally
        InternetCloseHandle(IURL);
      end;
    finally
      InternetCloseHandle(IOpen);
    end;
  except
  end;
end;

// EDIT: Hab PwideChar durch PAnsiChar ersetzt... aber hab nur geraten Gibts da trotzdem Probleme, bzw. kann es zu Problemen kommen?