[Piligrim]

var res : resource;
byte : integer;
line : string;
index : integer;
begin
res := OpenResource('/data.txt');

if (resourceAvailable(res)) then
begin
byte := ReadByte(res);
line := ReadLine(res);

CloseResource(res);
end;

ShowForm;
index := FormAddString('Byte is: ' + chr(byte));
index := FormAddString('Line is: ' + line);
Delay(1000);
end.