Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Netzwerke (https://www.delphipraxis.net/14-netzwerke/)
-   -   Delphi Wort und Umlaute etc... (https://www.delphipraxis.net/106765-wort-und-umlaute-etc.html)

Bauer007 16. Jan 2008 11:41


Wort und Umlaute etc...
 
Ich habe zb ein Wort Mühe das soll zu M%C3%BChe werden - nur wie codiere ich sowas?!

Irgendwie finde ich dazu nichts passendes zumal ich auch D5 STD nutze!

Christian Seehase 16. Jan 2008 11:44

Re: Wort und Umlaute etc...
 
Moin Sebastian,

dafür könntest Du MSDN-Library durchsuchenUrlEscape nehmen.
Diese befindet sich in der shlwapi.dll.
Du müsstest die Funktion nur selber importieren.

dominikkv 16. Jan 2008 11:45

Re: Wort und Umlaute etc...
 
Such mal nach Hier im Forum suchenStringReplace
Delphi-Quellcode:
StringReplace(myText, 'ü', '%C3%BC', [rfReplaceAll]);

Bauer007 16. Jan 2008 11:46

Re: Wort und Umlaute etc...
 
Zitat:

Zitat von dominikkv
Such mal nach Hier im Forum suchenStringReplace
Delphi-Quellcode:
StringReplace(myText, 'ü', '%C3%BC', [rfReplaceAll]);


Na ja das war nur ein beispiel! Es geht um ALLES Buchstaben die NICHT in einer URL angeben werden!

ÜÖÄß etc....

dominikkv 16. Jan 2008 11:52

Re: Wort und Umlaute etc...
 
Zitat:

Zitat von Bauer007
Zitat:

Zitat von dominikkv
Such mal nach Hier im Forum suchenStringReplace
Delphi-Quellcode:
StringReplace(myText, 'ü', '%C3%BC', [rfReplaceAll]);


Na ja das war nur ein beispiel! Es geht um ALLES Buchstaben die NICHT in einer URL angeben werden!

ÜÖÄß etc....

Du kannst diese Prozedur auch mehrmals mit verschiedenen Buchstaben anwenden :zwinker:

uligerhardt 16. Jan 2008 12:05

Re: Wort und Umlaute etc...
 
Zitat:

Zitat von Christian Seehase
dafür könntest Du MSDN-Library durchsuchenUrlEscape nehmen.
Diese befindet sich in der shlwapi.dll.
Du müsstest die Funktion nur selber importieren.

Delphi-Quellcode:
uses
  ShLwApi;
:mrgreen:

Bauer007 16. Jan 2008 12:07

Re: Wort und Umlaute etc...
 
Schon klar :-) habe ich auch so gemacht das UrlEscape nicht das ist was ich suche da es den IE5 mindestens benötigt! Mlchte mich nicht so beschränken...


habe dann dieses versucht:

Delphi-Quellcode:
  NEW_SEARCH_STRING_TEMP := '';
  for i := 1 to Length(NEW_SEARCH_STRING) do
    if NEW_SEARCH_STRING[i] in ['0'..'9', 'A'..'Z', '[', ']', '_', 'a'..'z'] then NEW_SEARCH_STRING_TEMP := NEW_SEARCH_STRING_TEMP + NEW_SEARCH_STRING[i]
    else NEW_SEARCH_STRING_TEMP := NEW_SEARCH_STRING_TEMP + '%' + IntToHex(Ord(NEW_SEARCH_STRING[i]), 2);

daraus wird Mühe zu M%FChe STATT wie es sein sollte M%C3%BChe

Bauer007 16. Jan 2008 12:07

Re: Wort und Umlaute etc...
 
Zitat:

Zitat von Bauer007
Schon klar :-) habe ich auch so gemacht das UrlEscape nicht das ist was ich suche da es den IE5 mindestens benötigt! Mlchte mich nicht so beschränken...


habe dann dieses versucht:

Delphi-Quellcode:
  NEW_SEARCH_STRING_TEMP := '';
  for i := 1 to Length(NEW_SEARCH_STRING) do
    if NEW_SEARCH_STRING[i] in ['0'..'9', 'A'..'Z', '[', ']', '_', 'a'..'z'] then NEW_SEARCH_STRING_TEMP := NEW_SEARCH_STRING_TEMP + NEW_SEARCH_STRING[i]
    else NEW_SEARCH_STRING_TEMP := NEW_SEARCH_STRING_TEMP + '%' + IntToHex(Ord(NEW_SEARCH_STRING[i]), 2);

daraus wird Mühe zu M%FChe STATT wie es sein sollte M%C3%BChe




ps.: ShLwApi habe ich nicht ;-)

Christian Seehase 16. Jan 2008 12:08

Re: Wort und Umlaute etc...
 
Zitat:

Zitat von uligerhardt
Zitat:

Zitat von Christian Seehase
dafür könntest Du MSDN-Library durchsuchenUrlEscape nehmen.
Diese befindet sich in der shlwapi.dll.
Du müsstest die Funktion nur selber importieren.

Delphi-Quellcode:
uses
  ShLwApi;
:mrgreen:

Die kennt allerdings noch nicht mal D7, geschweige denn D5 ;-)

marabu 16. Jan 2008 12:11

Re: Wort und Umlaute etc...
 
Hallo Sebastian,

wenn du die Indy Komponenten installiert hast, dann kannst du auch die Klassenmethode UrlEncode() von TIdURI verwenden. Beachte auch, dass %C3%BC die UTF-8 Kodierung des ü ist.

Grüße vom marabu


Alle Zeitangaben in WEZ +1. Es ist jetzt 17:41 Uhr.
Seite 1 von 2  1 2      

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz