Miten kummassa palautan stringin kirjainten ASCII-numeroarvot taulukkoon?
ORD() pätee vain char/byte-muuttujan kanssa, mutta copy-funktiolla ei voi palauttaa stringistä charia.
VB:ssähän oli tuo ASC ja VB:ss tämä olisi helppo juttu. Mutta - miten teet saman Delphissä?
Ascii arvon
palautus stringistä
4
370
Vastaukset 4
- hemmoit
[]operaatorilla tietystä indeksistä, for loopissa (indeksi alkaa 1 ei 0:lsta) omaan taulukoon.
En tidä miten unicode vaikutaa asiaan- nyt kässäsin
Manuaalistakin selvisi lopulta...
String-muuttujahan on itseasiassa merkkijonotaulu, josta voidaan palauttaa osia indeksin avulla char-muuttujaan tyyliin chK := strSana[3], ja charistahan saatiin sitten tuo ascii iArvo := mod(chK). - korjaus
nyt kässäsin kirjoitti:
Manuaalistakin selvisi lopulta...
String-muuttujahan on itseasiassa merkkijonotaulu, josta voidaan palauttaa osia indeksin avulla char-muuttujaan tyyliin chK := strSana[3], ja charistahan saatiin sitten tuo ascii iArvo := mod(chK).Ei tietenkään mod vaan ord.
Sorry kirjoitusvirhe:
...charistahan saatiin sitten tuo ascii iArvo := mod(chK)...pitää olla ORD(chK)
"ORD Routine
Returns the ordinal value of an ordinal-type expression.
[Delphi] function Ord(X: Char): Byte;
Description
X is a Delphi ordinal-type expression. The result is the ordinal position of X; its type is the smallest standard integer type that can hold all values of X's type.
Ord cannot operate on Int64 values(!)." - _jotain_
korjaus kirjoitti:
Ei tietenkään mod vaan ord.
Sorry kirjoitusvirhe:
...charistahan saatiin sitten tuo ascii iArvo := mod(chK)...pitää olla ORD(chK)
"ORD Routine
Returns the ordinal value of an ordinal-type expression.
[Delphi] function Ord(X: Char): Byte;
Description
X is a Delphi ordinal-type expression. The result is the ordinal position of X; its type is the smallest standard integer type that can hold all values of X's type.
Ord cannot operate on Int64 values(!)."Tässä on jotain ord-linkkejä:
http://edu.pyhaselka.fi/~tuorie/delphi/delphi01.htm
http://www.tuug.fi/~f/pascal/luku16.html
http://www.tuug.utu.fi/~f/pascal/luku17.html
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
- 1121394
- 45921
Myönnetään, tunnen lämpimiä tunteita kohtaasi
Vaikutat tosin liian hyvältä ollaksesi totta. Komeita miehiä on maailma pullollaan mutta sinussa on jotain.....50746Perhoseni (miehelle)
Miksi et usko, että mun rakkaus sinuun on aitoa ja vilpitöntä? Tai että se oli jo silloin? Miksi ajattelet, ettet ole r133704- 70676
- 67626
- 53607
- 55565
Onko Sofia jälleen jätetty?
Moni asia viittaisi siihen, että hän on jälleen sinkku.107519Mies, näetkö minut myös
Seksuaalisena ihmisenä ja naisena? Haluatko minua seksuaalisesti? Vai olenko mielestäsi tyttönen?20500Rekat seisovat dieselin hinnan takia . Ala ei kestä tällaista hintatasoa, sanoo yrittäjä .
EU:n kallein diesel on kova paikka kuljetusalalle. Ajoja on jätetty ajamatta kannattavuusongelmien vuoksi, sanoo alan e100482Voiko se ikinä toimia
Voiko meistä ikinä tulla mitään? Näin kauan aikaa on kulunut ja mitään ei tapahdu... En usko, että sinä mietit minua het32478- 34477
- 5468
Nainen, mitä mieltä olet kodittomista?
Ja heistä jotka eivät kykene huolehtimaan asioistaan, itsestään eikä terveydestään? Miten heidän kanssaan tulisi toimia?118466- 52462
Mitä jos...
Susta tykätään poikana enemmän, kun tyttönä? Miten asian käsittelet tai otat tiedon vastaan? T nainen gubetellija herät142453- 49447
- 52413
- 42410