Pascal – str2int

[erdsiger]

bacsi2 wrote:

Van azon kívül épkézláb megoldás, hogy megvizsgálom a string hosszát, egy ciklussal belenyomom a karaktereit egy tömbbe, visszaszámolom az ascii kódjuk alapján, hogy mik akartak lenni valójában, és újra összerakom?

Ez nem ilyen bonyolult 🙂 Egyszerűen használd a length függvényt. Pl.

Code:

nev := Linux;
hossz := length(nev);

bacsi2 wrote:

Egy stringet kéne konvertálnom integer típusú változóba.

Jól írtad, erre a val függvény a megoldás.

Code:

Var
  Szam : Integer;
  SzamStr : String[10];
  Kod: Integer;

…

SzamStr := ’98’;
Val(SzamStr,Szam,Kod);

A fentiben a szám a ‘Szam’ változó, a karakterlánc amiből konvertálod pedig a SzamStr. A Kod nevű változónak mindeképpen integernek kell lennie. Ha az átalakítás után a Kod értéke 0, akkor sikeres volt az átalakítás, ha nem, akkor vmi gubanc van (pl. betűt akarsz számmá konvertálni). Ezt egy egyszerű if szerkezettel meg lehet vizsgálni.

[erdsiger]

bacsi2 wrote:

Van azon kívül épkézláb megoldás, hogy megvizsgálom a string hosszát, egy ciklussal belenyomom a karaktereit egy tömbbe, visszaszámolom az ascii kódjuk alapján, hogy mik akartak lenni valójában, és újra összerakom?

Ez nem ilyen bonyolult 🙂 Egyszerűen használd a length függvényt. Pl.

Code:

nev := Linux;
hossz := length(nev);

bacsi2 wrote:

Egy stringet kéne konvertálnom integer típusú változóba.

Jól írtad, erre a val függvény a megoldás.

Code:

Var
  Szam : Integer;
  SzamStr : String[10];
  Kod: Integer;

…

SzamStr := ’98’;
Val(SzamStr,Szam,Kod);

A fentiben a szám a ‘Szam’ változó, a karakterlánc amiből konvertálod pedig a SzamStr. A Kod nevű változónak mindeképpen integernek kell lennie. Ha az átalakítás után a Kod értéke 0, akkor sikeres volt az átalakítás, ha nem, akkor vmi gubanc van (pl. betűt akarsz számmá konvertálni). Ezt egy egyszerű if szerkezettel meg lehet vizsgálni.

[Névtelen]

Jaj, azt hiszem rosszul fejeztem ki magam.

Nem a string változó hossza kell nekem. Van egy sztringem, ami egy számot tartalmaz (pl. s:string; s:=’676′;), és ebből kéne nekem egy integerbe átkonvertálni az értékét (jelen esetben, pl., h az i:integer változóm felvegye a 676 értéket).

(abba ne menjünk bele, hogy ez elég sok hibaforráshoz vezethet, 100%, hogy az integer szélsőértékeinek megfelelő számot tartalmaz a sztring)

[Névtelen]

Jaj, azt hiszem rosszul fejeztem ki magam.

Nem a string változó hossza kell nekem. Van egy sztringem, ami egy számot tartalmaz (pl. s:string; s:=’676′;), és ebből kéne nekem egy integerbe átkonvertálni az értékét (jelen esetben, pl., h az i:integer változóm felvegye a 676 értéket).

(abba ne menjünk bele, hogy ez elég sok hibaforráshoz vezethet, 100%, hogy az integer szélsőértékeinek megfelelő számot tartalmaz a sztring)

[erdsiger]

bacsi2 wrote:

Van egy sztringem, ami egy számot tartalmaz (pl. s:string; s:=’676′;), és ebből kéne nekem egy integerbe átkonvertálni az értékét (jelen esetben, pl., h az i:integer változóm felvegye a 676 értéket).

(abba ne menjünk bele, hogy ez elég sok hibaforráshoz vezethet, 100%, hogy az integer szélsőértékeinek megfelelő számot tartalmaz a sztring)

Szerintem ezt írtam le neked, és leírtam azt is, hogy a hibát hogyan lehet kizárni. De ezek szerint én is rosszul fejeztem ki magam 🙂

[erdsiger]

bacsi2 wrote:

Van egy sztringem, ami egy számot tartalmaz (pl. s:string; s:=’676′;), és ebből kéne nekem egy integerbe átkonvertálni az értékét (jelen esetben, pl., h az i:integer változóm felvegye a 676 értéket).

(abba ne menjünk bele, hogy ez elég sok hibaforráshoz vezethet, 100%, hogy az integer szélsőértékeinek megfelelő számot tartalmaz a sztring)

Szerintem ezt írtam le neked, és leírtam azt is, hogy a hibát hogyan lehet kizárni. De ezek szerint én is rosszul fejeztem ki magam 🙂

[Névtelen]

Neharagudj, read-only-ban voltam, működik tökéletesen! Köszi szépen! 🙂

Szerk.: Csak ez zavart meg, rosszul írták le a használatát.

[Névtelen]

Neharagudj, read-only-ban voltam, működik tökéletesen! Köszi szépen! 🙂

Szerk.: Csak ez zavart meg, rosszul írták le a használatát.

[erdsiger]

bacsi2 wrote:

Szerk.: Csak ez zavart meg, rosszul írták le a használatát.

Jó kis tutorial 🙂

[erdsiger]

bacsi2 wrote:

Szerk.: Csak ez zavart meg, rosszul írták le a használatát.

Jó kis tutorial 🙂

[Szerző]

Bejegyzés