🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Thread View: pl.comp.lang.pascal
3 messages
3 total messages Started by mm Thu, 07 Jan 1999 16:13
Odczyt pliku tekstowego
#1223
Author: mm
Date: Thu, 07 Jan 1999 16:13
23 lines
1570 bytes
Czesc
Podsylam wam kod zrudlowy programu, ktory
zapisuje jakis tekst do pliku tetstowego ....

Mozecie go przeksztalcic, tak by wykonywal odwrotna operacje, tzn.
odczytywal tekst z podanego przezemnie pliku ?
Bardzo bym was prosil......

Pozdrawiam



begin 666 Am2.pas
M>R!!=71O<B Z('-K;W)P:6]N('T-"@T*#0H-"G!R;V=R86T@=W!I<SL-"G5S
M97,@8W)T.PT*=F%R#0IT>'0@.B!S=')I;F<[#0IT(#H@=&5X=#L-"F$@.B!S
M=')I;F<[#0IB96=I;@T*(&-L<G-C<CL-"B!W<FET96QN.PT*('=R:71E*"=0
M;V1A:B!S8VEE>FME.B G*3L-"B!R96%D;&XH82D[#0H@07-S:6=N*'0L(&$I
M.PT*(%)E=W)I=&4H="D[#0H@=W)I=&5L;CL-"B!W<FET96QN*"=7<&ES>B!T
M96MS=#H@)RD[#0H@(')E<&5A= T*(" @<F5A9&QN*'1X="D[#0H@("!I9B!T
M>'0\/B<J)PT*(" @('1H96X@=W)I=&5L;BAT+"!T>'0I.PT*(" @=6YT:6P@
>='AT/2<J)SL-"B @($-L;W-E*'0I.PT*96YD+@T*
`
end
Re: Odczyt pliku tekstowego
#1224
Author: Tomasz 'Pilot' Minkiewicz
Date: Fri, 08 Jan 1999 02:19
29 lines
1456 bytes
mm napisał(a) w wiadomości: ...
>Czesc
>Podsylam wam kod zrudlowy programu, ktory
>zapisuje jakis tekst do pliku tetstowego ....
>
>Mozecie go przeksztalcic, tak by wykonywal odwrotna operacje, tzn.
>odczytywal tekst z podanego przezemnie pliku ?
>Bardzo bym was prosil......

No skoro bardzo prosisz... ;-)

program txt2scr;
var t: text;
    s: string;
begin
assign(t,'');
reset(t);
repeat
readln(t,s);
writeln(s);
until EOF(t);
close(t);
end.

A na koniec ciekawostka: istnieje help!

--
Tomasz 'Pilot' Minkiewicz
adres w nagłówku jest dla picu, mailto:pilot@vc.pl
Re: Odczyt pliku tekstowego
#1225
Author: GAD
Date: Fri, 08 Jan 1999 14:01
9 lines
1158 bytes
>A na koniec ciekawostka: istnieje help!


Dokladnie! Chcialbym zauwazyc, ze mm zadaje stale jakies strasznie proste
pytania, ktore denerwuja pewnie nie tylko mnie. Moze by sie tak zastanowil,
zanim zapyta, bo to na prawde mozna znalezc w helpie pascala!!!!!!!!!!!!!!

pozdrawiam,
GAD
Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads