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
331
Vastaukset
- 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
Hengenvaaralliset kiihdytysajot päättyivät karmealla tavalla, kilpailija kuoli
Onnettomuudesta on aloitettu selvitys. Tapahtuma keskeytettiin onnettomuuteen. Tapahtumaa tutkitaan paikan päällä yhtei1986908- 1592036
- 1131688
- 511390
Suureksi onneksesi on myönnettävä
Että olen nyt sitten mennyt rakastumaan sinuun. Ei tässä mitään, olen kärsivällinen ❤️551238Möykkähulluus vaati kuolonuhrin
Nuori elämä menettiin täysin turhaan tällä järjettömyydellä! Toivottavasti näitä ei enää koskaan nähdä Kauhavalla! 😢501098Älä mies pidä mua pettäjänä
En petä ketään. Älä mies ajattele niin. Anteeksi että ihastuin suhun varattuna. Pettänyt en ole koskaan ketään vaikka hu1001074Reeniähororeeniä
Helvetillisen vaikeaa työskennellä hoitajana,kun ei kestä silmissään yhtään läskiä. Saati hoitaa sellaista. Mitä tehdä?7996Tarvitsemme lisää maahanmuuttoa.
Väestö eläköityy, eli tarvitsemme lisää tekeviä käsiä ja veronmaksajia. Ainut ratkaisu löytyy maahanmuutosta. Nimenomaan251954- 41929