Ergebnis der Suchanfrage

• Forum: Netzwerke

  AW: Indy HTTPClient Post umlaute

    Delphi
    by jaenicke, 21. Apr 2024, 12:01
  Nur dass du den Code offensichtlich nur unter einem neueren Delphi getestet hast. Der funktioniert mit Delphi 2007, um das es hier ging, nicht. Das wollte ich daher kurz ausprobieren, aber auch nicht per IFDEF die neue Funktionalität des TStringStreams verwenden, wenn es so in allen Versionen geht.
• Forum: Netzwerke

  AW: Indy HTTPClient Post umlaute

    Delphi
    by jaenicke, 21. Apr 2024, 01:30
  Nun habe ich doch kurz libretranslate in einer meiner Linux-VMs installiert. Es stimmt, die Variante mit TStrings funktioniert nicht so wie erwartet. Das bekommt man zwar hin, aber einfacher ist es so:function Translate(const AText, ASourceLang, ADestLang, AApiKey: string): string;
  var
  Http: TIdHTTP;
  Data: TStream;
  begin
  Http := TIdHTTP.Create(nil);
  try
  Data :=...
• Forum: Netzwerke

  AW: Indy HTTPClient Post umlaute

    Delphi
    by jaenicke, 17. Apr 2024
  Das stimmt, mit dem UTF8Encode kommt es falsch an. Es sei denn ich lese es auf dem Server auch wieder als UTF-8 ein:
  <?php
  print_r(mb_convert_encoding($_POST, 'ISO-8859-1', 'UTF-8'));
  ?>
  
  Der Grund ist simpel:
  Du kodierst es zwar als UTF-8, teilst das aber nicht mit. ICS wiederum verwendet UTF-8 Encoding als Standard, weshalb du das dort nicht explizit setzen musst.
  
  Korrekt mit Indy ist...
• Forum: Netzwerke

  AW: Indy HTTPClient Post umlaute

    Delphi
    by jaenicke, 17. Apr 2024
  Eben das ist der Punkt. Wenn man nicht weiß, wie der Quelltext aussieht, kann man nicht sagen, woran es liegt. Wenn ich ein konkretes Beispiel habe, kann ich sehen oder auch testen was raus geht.
• Forum: Netzwerke

  AW: Indy HTTPClient Post umlaute

    Delphi
    by jaenicke, 16. Apr 2024
  Ich habe es eben mit Delphi 2007 ausprobiert. Es ging ebenfalls sofort:
  var
  Http: TIdHTTP;
  Data: TStringList;
  begin
  Http := TIdHTTP.Create(Self);
  try
  Data := TStringList.Create;
  try
  Data.Add('{ "q": "Länge 8,5 cm","source": "de", "target": "en", "api_key": "#####"}');
• Forum: Netzwerke

  AW: Indy HTTPClient Post umlaute

    Delphi
    by jaenicke, 16. Apr 2024
  Ich kann das nicht reproduzieren. Wenn ich den Text als UTF-8 schicke, kommt der auch mit Umlauten an. Auf dem Server habe ich das print_r verwendet wie du es geschrieben hast.var
  Http: TIdHTTP;
  Data: TStringList;
  begin
  Http := TIdHTTP.Create(Self);
  try
  Data := TStringList.Create;
  try
  Data.Add('{ "q": "Länge 8,5 cm","source": "de", "target": "en", "api_key":...
• Forum: Netzwerke

  AW: Indy HTTPClient Post umlaute

    Delphi
    by jaenicke, 16. Apr 2024
  Welches Encoding verwendest du denn beim Senden? Üblich wäre UTF8.