Einzelnen Beitrag anzeigen

marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge
 
#2

Re: ANSI-Zahl eines Zeichens auslesen

  Alt 4. Feb 2006, 21:07
Hallo Foxgrove,

ein String ist vergleichbar mit einem array of char, allerdings beginnt der Index nicht bei 0, sondern bei 1:

Delphi-Quellcode:
var
  i: Integer;
  s: String;
begin
  s := 'Foxgrove';
  for i := 1 to Length(s) do
    ShowMessage(Format('Zeichen %d ist "%s" und hat den Code %d', [i, s[i], Ord(s[i])]));
end;
Die Sonderzeichen findest du, indem du dir bei deinem TEdit-Control im Object Inspector die Eigenschaft Font anschaust und dann mit dem Windows-Tool "Zeichentabelle" diesen Font anschaust. Fahre mit der Maus auf das Zeichen, welches du brauchst, klicke es an und übernehme es in die Zwischenablage. In der Text-Eigenschaft deines Controls kannst du dann die ausgewählten Zeichen aus der Zwischenablage übernehmen. Wenn die gewünschten Zeichen nicht im Standard-Zeichensatz enthalten sind, dann kannst du auch im TEdit den für dich richtigen Font einstellen.

Freundliche Grüße vom marabu
  Mit Zitat antworten Zitat