URLDownloadToFile und umlaute

[venice2]

mein Query String.
'https://api.themoviedb.org/3/search/movie?api_key=MyKey&language=de&query=Drachenzähme n leicht gemacht Die guten alten Zeiten'
funktioniert nicht
Hingegen
'https://api.themoviedb.org/3/search/movie?api_key=MyKey&language=de&query=Drachenzaehm en leicht gemacht Die guten alten Zeiten'
schon.

woran kann das liegen. Muss ich da irgendwas besonderes beachten?

Delphi-Quellcode:

function TTheMDB.BuildSearchMovieQuery(MovieTitle: string; UseQueryMode: BOOL): string;
begin

  Result := '';
  if not UseQueryMode then
    Result := 'https://api.themoviedb.org/3/search/movie?api_key='
  else
    Result := 'https://api.themoviedb.org/3/search/tv?api_key=';

  Result := Result + GetApiKey;
  Result := Result + '&language=';
  Result := Result + UseThisLanguage;
  Result := Result + '&query=';
  Result := Result + MovieTitle;
end;

Url := BuildSearchMovieQuery(MovieTitle, QueryMode);
Ist dann der Query String den ich sende.

Furchtbar das die immer an ihrer Webseite Rumschrauben.

[DeddyH]

https://www.urlencoder.org/ , probier die Möglichkeiten einmal durch, dann weißt Du, wie Du den QueryString kodieren musst.

[venice2]

Zitat von DeddyH:

https://www.urlencoder.org/ , probier die Möglichkeiten einmal durch, dann weißt Du, wie Du den QueryString kodieren musst.

Ich habe es schon Danke.. UTF8String!
Hatte vorher mit WideString versucht brachte aber auch nichts.

Delphi-Quellcode:

function TTheMDB.BuildSearchMovieQuery(MovieTitle: string; UseQueryMode: BOOL): UTF8String;
begin

  Result := '';
  if not UseQueryMode then
    Result := 'https://api.themoviedb.org/3/search/movie?api_key='
  else
    Result := 'https://api.themoviedb.org/3/search/tv?api_key=';

  Result := Result + GetApiKey;
  Result := Result + '&language=';
  Result := Result + UseThisLanguage;
  Result := Result + '&query=';
  Result := Result + MovieTitle;
end;

var
  Url: UTF8String;

[Michael II]

Ich sehe leider nicht, wie/womit du die Daten postest.

Hast du eventuell vergessen den String zu encodieren? Wenn Ja, dann liegt es am ä.

Zum Beispiel mit Indy:

Delphi-Quellcode:

uses IDURI;
...
TIdURI.URLEncode('https://api.themoviedb.org/3/search/movie?api_key=MyKey&language=de&query=Drachenzähme n leicht gemacht Die guten alten Zeiten');

[[ Wenn ein Zeichen z nicht im Bereich 'a'..'z', 'A'..'Z', '0'..'9' liegt (in deinem Beispiel ä), muss z so gesendet werden: ( '%' + IntToHex(ord(z), 2)). ]]

[venice2]

Zitat von Michael II:

Ich sehe leider nicht, wie/womit du die Daten postest.

Hast du eventuell vergessen den String zu encodieren? Wenn Ja, dann liegt es am ä.

Zum Beispiel mit Indy:

Delphi-Quellcode:

uses IDURI;
...
TIdURI.URLEncode('https://api.themoviedb.org/3/search/movie?api_key=MyKey&language=de&query=Drachenzähme n leicht gemacht Die guten alten Zeiten');

[[ Wenn ein Zeichen z nicht im Bereich 'a'..'z', 'A'..'Z', '0'..'9' liegt (in deinem Beispiel ä), muss z so gesendet werden: ( '%' + IntToHex(ord(z), 2)). ]]

Steht oben im Beitrag.
if (URLDownloadToFile(nil, PWideChar(Url), PWideChar(TxtFile), 0, nil) = S_OK) then

Danke für die Info mit Utf8String geht es.
Nope geht doch nicht.

Muß mich dann wohl mit dem enkodieren mal beschäftigen.

Sehe gerade du hast die Lösung ja schon gepostet..
Danke!

[generic]

Oh schön der Klassiker.

Du übermittelst ja die Daten in der URL. URL sind als ASCII spezifiziert.
D.h. alles was das 8te Bit gesetzt hat, muss URL-Encoded werden.

Dann kommen wir zu dem Encodig der Texte - also UTF-8, UTF-16, UCS oder vielleicht ISO-8859-1 ?



In dieser RFC findet man eine Antwort:
https://tools.ietf.org/html/rfc3986#section-2.5

[mytbo]

Wenn du mORMot SynCommons verwendest, mache folgendes:

Delphi-Quellcode:

const
  URL_TEMPLATE = 'https://api.themoviedb.org/3/search/movie?api_key=%&language=%&query=%'; 

var
  url: SockString;
begin  
  url := StringToAnsi7(FormatString(URL_TEMPLATE, [GetApiKey, UseThisLanguage, MovieTitle]))
...

Nicht vergessen, je nach verwendeten String-Typ, GetApiKey(), UseThisLanguage() und MovieTitle() notfalls in StringToUtf8() einpacken.

Bis bald...
Thomas

[venice2]

Zitat von mytbo:

Wenn du mORMot SynCommons verwendest, mache folgendes:

Delphi-Quellcode:

const
  URL_TEMPLATE = 'https://api.themoviedb.org/3/search/movie?api_key=%&language=%&query=%'; 

var
  url: SockString;
begin  
  url := StringToAnsi7(FormatString(URL_TEMPLATE, [GetApiKey, UseThisLanguage, MovieTitle]))
...

Nicht vergessen, je nach verwendeten String-Typ, GetApiKey(), UseThisLanguage() und MovieTitle() notfalls in StringToUtf8() einpacken.

Bis bald...
Thomas

Danke.. Ich habe meinen eigenen Parser für JSon für den TMDB Support. (Mit kleinen problemen)
Ich würde das gerne auf mORMot SynCommons portieren aber im Moment etwas zu hoch für mich.
Die Idee Ansicht ist aber

[mytbo]

Zitat von venice2:

Danke.. Ich habe meinen eigenen Parser für JSon für den TMDB Support.

Es geht nicht um die JSON Funktionen in SynCommons, sondern hier um die Funktion StringToAnsi7(). Damit passt die URL-Codierung. Probiere mein Beispiel einfach mal aus.

Bis bald...
Thomas

[venice2]

Zitat von mytbo:

Zitat von venice2:

Danke.. Ich habe meinen eigenen Parser für JSon für den TMDB Support.

Es geht nicht um die JSON Funktionen in SynCommons, sondern hier um die Funktion StringToAnsi7(). Damit passt die URL-Codierung. Probiere mein Beispiel einfach mal aus.

Bis bald...
Thomas

Ok werde es mal testen.