View WINDOWS\Desktop\Pascal\TextFileWriter\WRITE.PAS

TextFileWriter v1.0

Submitted By: Hacker651
Rating:

(Rate It)

File Details

ZIP File Browser

Program {TextFileWriter v1.0}
user_(input,output);
uses crt;
Var My_File:Text;
FileName, Some_Text: String;
Begin
clrscr;
Writeln ( 'TextFileWriter v1.0' );
Writeln ( 'Written by Steven Cothren' );
Writeln ( 'E-mail any questions or bug reports to [[Email Removed]]' );
Writeln ( 'This program is freeware so please share it with all of your friends' );
Writeln ( 'You may disassemble and modify the source code of this program as long as' );
Writeln ( 'you give me credit for the original program' );
readln;
Write('Type in the filename:');
Readln(FileName);
WriteLn;
Write('Write your information:');
readLn (Some_Text);
Assign(My_File,FileName);
Rewrite(My_File);{Create new file}

{Write some text to the file:}
WriteLn(My_File, 'This file was created with Pascal');
WriteLn(My_File,Some_Text);
Close(My_File);{And close the file when done!}
End.

Home About PH Privacy Statement Contact Us Advertise Here

© 1996-2008 CommunityHeaven LLC. All rights reserved. Reproduction in whole or in part, in any form or medium without express written permission is prohibited.
Violators of this policy may be subject to legal action. Please read our Terms Of Use and Privacy Statement for more information.
North American business development: Nicolai Wadstrom. Publisher: Lars Hagelin.