Thread View: pl.comp.lang.pascal
3 messages
3 total messages
Started by mm
Thu, 07 Jan 1999 16:13
Odczyt pliku tekstowego
Author: mm
Date: Thu, 07 Jan 1999 16:13
Date: Thu, 07 Jan 1999 16:13
23 lines
1570 bytes
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
Author: Tomasz 'Pilot' Minkiewicz
Date: Fri, 08 Jan 1999 02:19
Date: Fri, 08 Jan 1999 02:19
29 lines
1456 bytes
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
Author: GAD
Date: Fri, 08 Jan 1999 14:01
Date: Fri, 08 Jan 1999 14:01
9 lines
1158 bytes
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