Pascal: szövegfelbontásra (string, szóközök mentén) van valami egyszerűbb-praktikusabb mód? (bővebben lent)
Olyan megoldás van, ami az általam írtnál praktikusabban működik, figyel arra is, ha pl. adott sor szóközzel kezdődik, üres sorokat nem tesz be?
Az általam írt esetén utolsó szó kimarad, pedig a hátultesztelős ciklus miatt le kellene hogy fussson.
Fájlból szeretnék szöveget beolvasni és a szóközök mentén kinyerni a szavaka, amiket string tömbbe szeretnék tenni.
A tömbbe helyezést meg tudom csinálni, nem azért maradt ki mintha nem tudnám, nekem a legnagyobb kihívás inkább csak a "hibamentes felbontás".
program felbontas;
var
f : text;
s, s2 : string;
poz : byte;
begin
assign(f,'probalkozas');
reset(f);
while not eof (f) do
begin
ReadLn(f, s);
if length (s) > 0 then
begin
repeat
poz:=pos(' ',s);
s2 := copy(s, 1, poz);
delete(s, 1, poz);
WriteLn(s2);
until poz = 0;
end;
end;
close(f);
end.
válasza:"Mondtam, hogy nem érted"
Éppen ezért futsz már megint bele az érvelési hibába. ;(
válasza:Értsd már meg te tökéletlen, hogy tabaki-nak szólt az egész, mert 'megcélzott' a válaszában és az egész egy kis ellenkezés.
Pascal-ról, Delphi-ről meg a szép kódolásról mesélj még nekem, iszom a szavaidat :)
válasza:Ahogy a felaprított mesehősök szokták mondani a forrasztófüves műtétjük után:
„Be nagyot aludtam!”
Pedig ennél a szóváltásnál illett volna jelen lennem, ha már egyszer én kavartam. Elnézést kérek a kollégától, aki a védelmemre kelt, természetesen igaza van. Viszont SimkoL megjegyzése valóban egy hosszabb diskurzus része, amelyben meg őneki adok igazat abban, hogy a szigorúbb nyelvekre való gyúrás jegyében és az olvashatóbb kód érdekében nem árt az, ha néhány olyan szabályhoz is tartja magát az ember, amelyet a pascal egyébként nem követel meg. Szerintem ez hasznos játék, és SimkoL -- aki tudja, hogy igyekszem is tartani magam hozzá -- alappal pirított rám, amiért itt megfeledkeztem róla, amikor valami régi kódomból átemeltem egy részletet. Ha kérhetem, ennek az afférnak ne tulajdonítsatok a kelleténél nagyobb jelentőséget, és kivált ne morzsolgassátok egymást miatta(m).
Ehhez képest kissé elsikkadtak a C#-fan kolléga mókás állításai a „valódi nyelvről”, de ki tudja, lehet, hogy tényleg nem éri meg szót vesztegetni rá.
válasza:"Ehhez képest kissé elsikkadtak a C#-fan kolléga mókás állításai a „valódi nyelvről”, de ki tudja, lehet, hogy tényleg nem éri meg szót vesztegetni rá."
Nem sikkadtak el, csak már kiröhögtük magunkat az állításain, amúgy meg igazad van, tényleg nem érdemel szót egy ekkora marhaság.
válasza: válasza:Regex támogatás van benne, ami bőven elég is.
Ha ennél több kell (vagy nem tudod megírni a saját libedet), akkor használj mondjuk perlt.
Kapcsolódó kérdések:
Minden jog fenntartva © 2024, www.gyakorikerdesek.hu
GYIK | Szabályzat | Jogi nyilatkozat | Adatvédelem | Cookie beállítások | WebMinute Kft. | Facebook | Kapcsolat: info(kukac)gyakorikerdesek.hu
Ha kifogással szeretne élni valamely tartalommal kapcsolatban, kérjük jelezze e-mailes elérhetőségünkön!