mirror of
https://github.com/vapaamies/KolibriOS.git
synced 2025-09-21 22:53:51 +02:00
Examples grouped by GUI and console
This commit is contained in:
17
Examples/Console/LoadFile/LoadFile.dpr
Normal file
17
Examples/Console/LoadFile/LoadFile.dpr
Normal file
@@ -0,0 +1,17 @@
|
||||
program LoadFileApp;
|
||||
|
||||
uses
|
||||
KolibriOS, CRT;
|
||||
|
||||
var
|
||||
FileSize: LongWord;
|
||||
Buffer: Pointer;
|
||||
|
||||
begin
|
||||
ConsoleInit('Load File');
|
||||
|
||||
Buffer := LoadFile('/sys/example.asm', FileSize);
|
||||
WriteText(Buffer, FileSize);
|
||||
|
||||
ConsoleExit(False);
|
||||
end.
|
Reference in New Issue
Block a user