---

Hej NG...

Jeg sidder og laver program (O_o), men har brug for en funktion der minder
om Visual Basics Asc() funktion.
For ikke Visual Basic-kendere, er syntaxen...
function Asc(Expression: Integer): Char
.... og f.eks. Asc(65) = 'A'.

Mvh og på forhånd tak,
Mathias.

---

"Mathias" <mathias@xyz.com> skrev i en meddelelse
news:Xns952ABF35A571Fmathiasxyzcom@212.54.64.134...
> Hej NG...
>
> Jeg sidder og laver program (O_o), men har brug for en funktion der minder
> om Visual Basics Asc() funktion.
> For ikke Visual Basic-kendere, er syntaxen...
> function Asc(Expression: Integer): Char
> ... og f.eks. Asc(65) = 'A'.

Chr(65)='A'

Mvh
HK

---

"Harald" <news10@-REMOVE-THIS-kroning.dk> wrote in
news:40faacc6$0$303$edfadb0f@dread14.news.tele.dk:

> "Mathias" <mathias@xyz.com> skrev i en meddelelse
> news:Xns952ABF35A571Fmathiasxyzcom@212.54.64.134...
>> ... og f.eks. Asc(65) = 'A'.
>
> Chr(65)='A'

Sorry... Forkert beskrivelse af Asc :$
Jeg mener en omvendt... Jeg definerede Asc() forkert - definitionen er...
function Asc(Expression: Char): Integer
.... og Asc('A') = 65

Findes der sådan en funktion?

Ellers tak for det hurtige svar :)

---

Hej Mathias !

Mathias wrote:

> Sorry... Forkert beskrivelse af Asc :$
> Jeg mener en omvendt... Jeg definerede Asc() forkert - definitionen er...
> function Asc(Expression: Char): Integer
> ... og Asc('A') = 65
>
> Findes der sådan en funktion?
>
> Ellers tak for det hurtige svar :)

Igen hvis du kigger i online hjælpen ville du, hvis du skriver chr i
IDE'et og stiller dig på chr med markøren og trykker ctrl+F1, så vil
online-hjælpen for chr fremkomme. I øverste hjørne finder du "See also"
og den præsenterer dig for Ord-funktionen.

Her er det du søger:
S := S + 'The ASCII code for "c" is ' + IntToStr(Ord('c')) + ' decimal';

-Kurt