💾 Archived View for bbs.geminispace.org › u › norayr › 17041 captured on 2024-12-17 at 13:33:59. Gemini links have been rewritten to link to archived content
⬅️ Previous capture (2024-08-18)
-=-=-=-=-=-=-
some links:
— https://wiki.freepascal.org/Assign
— https://wiki.freepascal.org/Rewrite
— https://wiki.freepascal.org/Category:File_Handling
— https://wiki.freepascal.org/File_Handling_In_Pascal
May 17 · 7 months ago
🐙 norayr [mod] · 2024-05-17 at 11:39:
new, oop way of doing things is via streams:
program InOutStream;
{$mode objfpc}
uses
Classes, SysUtils;
var
InStream, OutStream: TFileStream;
begin
if (ParamCount = 2) and
FileExists(ParamStr(1)) and
FileExists(ParamStr(2)) then
begin
InStream := TFileStream.Create(ParamStr(1), fmOpenRead);
try
OutStream := TFileStream.Create(Paramstr(2), fmOpenWrite);
try
OutStream.Position := OutStream.size;
OutStream.CopyFrom(InStream, 0); // appends
finally
OutStream.Free;
end;
finally
InStream.Free;
end;
end else
Writeln('Usage: inoutstream <infile> <outfile>');
end.
🐙 norayr [mod] · 2024-05-17 at 11:41:
in first old style example you can use read() to read only one character, to create a parser.
🐙 norayr [mod] · 2024-05-17 at 11:42:
— i found a markdown parser for freepascal.
🐙 norayr [mod] · 2024-05-17 at 11:43:
wow, it also generates html from markdown!
🐙 norayr [mod] · 2024-05-17 at 11:45:
in the demos i see .lpi file, that's a file for a lazarus ide. you can work without the ide, you would need to change the demos to not require graphics at all, and instead of showing graphically, to use input and output files.
🚂 MrSVCD [OP] · 2024-05-17 at 13:23:
Thank you.
If I can make it compatible with Hispeed Pascal for amiga would be a bonus. Hispeed say that they are almost fully TP 5 compatible.
🐙 norayr [mod] · 2024-05-17 at 14:37:
then the first way should work. yes, it would be very cool to have the same source for both amiga and pc. btw, freepascal also can compile for amiga.
contains lots of freepascal amiga demos.
🐙 norayr [mod] · Aug 08 at 00:28:
i just noticed that the litk to the channel is broken.
Pascal and files. — I am looking for a guide to use text files in freepascal. I am looking to make a gemtext to html tool because it sounds like a good project. The link conversation is going to be a challenge but I am looking forward to it.