Ascii arvon

palautus stringistä

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ä?

4

347

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • 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

    1. Minkähän takia ns. persuille ei tunnu työ maistuvan?

      Vaikuttavat olevan joutoväkeä syystä tai toisesta  – työttömiä tai työeläkeloisia. Muiden rahoilla pötköttelevää väkeä,
      Maailman menoa
      29
      2165
    2. Suomen veroaste 5 %-yks liian matala

      Palauttamalla kokonaisveroaste 1990-luvun tasolle saadaan hyvinvointivaltion palvelut rahoitettua ilman velan ottoa.
      Maailman menoa
      92
      1975
    3. Kolme neljästä suomalaisesta kannattaa miljonääriveroa

      Kertoo vasemmistoliiton teettämä kysely. Veron ulkopuolelle jätettäisiin asunto. "Puolet vastaajista oli sitä mieltä, e
      Maailman menoa
      88
      1941
    4. MTV: Harvinainen haastattelu! Vappu Pimiä kommentoi vihdoinkin uutta TTK-juontajaa

      TTK-juontajaspekuloinnit käyvät edelleen kuumana. Kenet sinä haluaisit uudeksi TTK-juontajaksi? Kommentoi alle! Lue,
      Suomalaiset julkkikset
      13
      1653
    5. Olit ihan

      Kiihkona silloin. Sen näki ja lähes tunsi. Ei tainnut olla kaukana et olisit vetänyt lähellesi jos siihen olisi hetki tu
      Ikävä
      24
      1557
    6. Evoluutioon ja alkuräjähdykseen uskominen vaatii todella vahvaa uskoa

      Että tyhjästä syntyi ja kehittyi kaikki se mitä näemme ympärillämme.
      Luterilaisuus
      491
      1517
    7. Yleveron tuotto siirrettävä S-ryhmälle

      Yleisradio on mukana kansanmurhassa. Tuollaista ei voi tukea verovaroin. S-ryhmä on ainoa selkärankainen iso toimija S
      Maailman menoa
      1
      1494
    8. Mikä ihme teitä lieksalaisia tuossa

      p*rs*reiässä niin kiinnostelee? Että siitä pitää päntönnään huutaa?
      Lieksa
      49
      1310
    9. Mistä juttelit viimeisen kerran

      Mistä juttelitte viimeisen kerran ikävöinnin kohteen kanssa? Irl tai viesteillä.
      Ikävä
      76
      1198
    10. Kemet lomautukset

      Onkohan tuo oikein lain mukaista toimintaa jatkaa jo lomautettuina olevien uudelleen lomautusta yhdenvertaisuuden ja tas
      Suomussalmi
      35
      1179
    Aihe