Article View: pl.comp.lang.pascal
Article #92443Re: eoln w FP
From: darekm
Date: Mon, 04 Feb 2008 11:17
Date: Mon, 04 Feb 2008 11:17
17 lines
1595 bytes
1595 bytes
> nie wiem czemu ten eoln nie dziala jak trzeba, gdzieć przeczytalem
> googlując, że w FP ma problemy z "buforem" ale nie wiem czy dobrze to
> zakumalem.
To nie jest problem bufora. Po prostu read(c) czyta znak po znaku bez
względu na to czy są to zwykłe litery czy znaki sterujące, a koniec
linii jest takim znakiem (a czasami dwoma). To znaczy (w Twoim
programie) jeżeli natrafisz na koniec linii (eol = true) to następnie
wysyłasz wykrzyknik na wyjście i potem jeden lub dwa znaki końca linii.
Jak juz to powinieneś wykonać sekwencję
readln - odczyt końca linii
writeln - zapis nowej linii
write('!')
Darek
Technical Details
Message-ID:
<fo6sad$55u$1@atlantis.news.tpi.pl>Path:
mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.gazeta.pl!newsfeed.pionier.net.pl!news.internetia.pl!newsfeed.tpinternet.pl!atlantis.news.tpi.pl!news.tpi.pl!not-for-mailReferences:
<fo5fts$7qb$1@nemesis.news.tpi.pl> <fo5qu0$vp3$1@news.dialog.net.pl> <fo6hh6$t3p$1@atlantis.news.tpi.pl>Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.gazeta.pl!newsfeed.pionier.net.pl!news.internetia.pl!newsfeed.tpinternet.pl!atlantis.news.tpi.pl!news.tpi.pl!not-for-mail From: darekm <darekm@emadar.com> Newsgroups: pl.comp.lang.pascal Subject: Re: eoln w FP Date: Mon, 04 Feb 2008 12:17:32 +0100 Organization: tp.internet - http://www.tpi.pl/ Lines: 17 Message-ID: <fo6sad$55u$1@atlantis.news.tpi.pl> References: <fo5fts$7qb$1@nemesis.news.tpi.pl> <fo5qu0$vp3$1@news.dialog.net.pl> <fo6hh6$t3p$1@atlantis.news.tpi.pl> NNTP-Posting-Host: gsi122.internetdsl.tpnet.pl Mime-Version: 1.0 X-Trace: atlantis.news.tpi.pl 1202123917 5310 83.3.216.122 (4 Feb 2008 11:18:37 GMT) X-Complaints-To: usenet@tpi.pl NNTP-Posting-Date: Mon, 4 Feb 2008 11:18:37 +0000 (UTC) User-Agent: Thunderbird 2.0.0.9 (Windows/20071031) In-Reply-To: <fo6hh6$t3p$1@atlantis.news.tpi.pl> Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit