Mit Unicode-Zeichenfolgen in Delphi 7 arbeiten

Question

Ich muss ein Programm schreiben, das Strings verschiedener Länge durchsucht und nur diejenigen auswählt, die mit Symbolen aus dem von mir definierten Satz geschrieben sind (insbesondere japanische Buchstaben). Strings enthalten Wörter in verschiedenen Sprachen (Deutsch, Französisch, Arabisch, Russisch, Englisch usw.). Offensichtlich gibt es eine große Anzahl von möglichen Zeichen. Ich weiß nicht, welche Struktur dafür zu verwenden ist? Ich verwende gerade Delphi 7. Kann jemand vorschlagen, wie man solches Programm schreibt?

Answer 1

Offensichtlich wären Sie mit Delphi 2010 besser dran, da die VCL in Delphi 7 keine Unicode-Strings kennt. Sie können WideString-Typen und WideChar-Typen in Delphi 7 verwenden und Sie können einen Komponentensatz wie die TNT-Unicode-Komponenten installieren, um Ihnen beim Erstellen einer Benutzeroberfläche zu helfen, die Ihre Ergebnisse anzeigen kann.

Verwenden Sie für einen sehr großen Typ ein Bit-Array wie TBits. Ein Bit-Array der Länge 65536 würde ausreichen, um jeden UTF-16-Codepunkt zu enthalten. Prüfen, ob Char X in Y definieren, wäre im Grunde:

function WideCharsInSet(wcstr:WideString; wcset:TBits):Boolean; 
var 
n:Integer; 
wc:WideChar; 
begin 
result := false; 
for n := 1 to Length(wcstr) do begin 
    wc := wcstr[n]; 
    if wcset[Ord(wc)] then 
     result := true; 
end; 
end; 

procedure Demo; 
var 
wcset1:TBits; 
s:WideString; 
begin 
wcset1 := TBits.Create; 
try 
    // 1157 - Hangul Korean codepoint I found with Char Map 
    wcset1[1157] := true;   
    // go get a string value s: 
    s := WideChar(1157); 
// return true if at least one element in set wcset is found in string s: 
    if WideCharsInSet(s,wcset1) then begin 
     Application.MessageBox('Found it','found it',MB_OK); 
    end; 

finally 
    wcset1.Free; 
end; 

end; 

Answer 2

ich nach Delphi 2010 wechseln auch empfehlen (warum mit 2009 Mühe mehr?)!

Wenn im unwahrscheinlichen Fall, dass Sie mit Delphi 7 stecken bleiben, kann die Unicode Library von Mike Lischke etwas hilfreich sein.

Answer 3

Für die einfache Verarbeitung von Zeichenfolgen in der Art und Weise, die Sie beschreiben, lassen Sie sich nicht von Vorschlägen abschrecken, dass Sie auf den neuesten Compiler und das Unicode-aktivierte Framework aktualisieren sollten. Die Unicode-Unterstützung selbst wird natürlich durch die zugrunde liegende Windows-API bereitgestellt, die natürlich (direkt) von "Nicht-Unicode" -Versionen von Delphi ebenso wie von "Unicode-Versionen" zugänglich ist.

Ich vermute, dass die meisten, wenn nicht alle Unicode-Unterstützung, die Sie für die in Ihrer Frage beschriebenen Zwecke benötigen, von der Unicode-Unterstützung in the JEDI JCL erhalten werden können.

Für jede visuelle Komponente Unterstützung benötigen Sie möglicherweise die TNT control set hat den Reiz, frei zu sein.