const EOF = -1;

vl@volk (19.07.2014/20:06)
const EOF = -1;thanks vl@volk i didnt thought of that...

skyezeno, Thank you very much

as suggested by vl@volk use "const", so your code will be

program testing;
const EOF = -1;
var
res: resource;
byte: integer;
text: string;
begin
text:='';
res := openResource('/myresource.txt');
while (resourceAvailable(res)) do
begin
byte = readByte(res);
if (byte = EOF) then
begin
closeresource(res);
break;
end;
text:=text+chr(byte);
end;
// rest code..
end.

vl@volk (19.07.2014/20:06)
const EOF = -1;my question is

IS MOBPASCAL STILL UNDER DEVELOPMENT?

Cause i cant wait

skyezeno, yes, i optimize mobpascal to generate very small code and fixing compiler.
in mobpascal support http conection.

vl@volk (19.07.2014/22:19)
skyezeno, yes, i optimize mobpascal to generate very small code and fixing compiler.
in mobpascal support http conection.ok, that relief me

Я один читаю название темы как МобПасцал?

Virus-ON, Да

в моб. паскале случайно нет оператора Goto?