Hallo,
ich möchte in einem kleinen Editierfeld ein Wort oder
auch nur einen Buchstaben eingeben und nach dem
ENTER den
ANSI oder
ASCII oder auch
Unicode-Wert
dieses Zeichens in einem anderen Editierfeld
ausgeben.
bisher habe ich folgenden Code:
[delphi]
var mZeich, mWort : string;
mAnsi : integer;
begin
if key = #13 then
begin
mWort := EingEdit.Text;
mZeich:=copy(mWort,1,1);
mAnsi := Ord(mZeich);
ErgEdit.Text := FloatToStr(mAnsi);
end;
end;
end.
Programm geht nicht!
In der mAnsi:=Ord(mZeich); fliege ich raus,
Variable wären nicht passend ...
Bei Ord('A') kommt korrekt 65 heraus, ist in Quote-Mode,
geht das mit einer Variable nicht?
Noch'n Problem: Wie kann man in einem
DELPHI-Programm den griechischen Buchstaben ALPHA oder BETA
oder PI eingeben, wo sind die denn?
Gruß Foxgrove