Developing.ru

Он ВООБЩЕ НЕ КОМПИЛИРУЕТСЯ ПО ВИНДОЙ!!!!!
компилятор глючит: Error 122 Invalid variable referense

{Эта конструкция следует синтаксису переменной
ссылки, но не указывает на область памяти.

Вы, вероятно, вызываете указательную функцию,
но забываете разыменовывать результат.}

&quot писал(а):Вы, вероятно, вызываете указательную функцию

Посмотри на функцию changebyte! A:BOOLEAN, когда я пытаюсь байт ему втулить!

А так? Я заметил, что там слишком много повторяющихся переменных.

C_O_D_E писал(а):Error 122 Invalid variable referense

{Эта конструкция следует синтаксису переменной
ссылки, но не указывает на область памяти.

Вы, вероятно, вызываете указательную функцию,
но забываете разыменовывать результат.}

опять в том же месте ругается некрасиво!!

Я изменил файл, это было учтено?#95

ДА конечно! Я же не совсем дура!

&quot писал(а):Я же не совсем дура!

та кто ж тебя знает? а я пока допираю потихоньку...

Хм... Была бы я дурой, я бы тебе вопросы не задавала, а просто сказала
"Оно не запускается! Там сообщения красненькие вылазят! И написано не по-русски"

Кста, чтобы откомпилировать, я культурненько закомментировала всё что не нравилось компилятору (это в основном процедуры вывода в BMP'шку и при декодировании в TXT) и запустила, зацикливания не призошло, т.к. после 40 секунд раздумья прога вернула меня в окно кодера и выдала на втором считывании(первое она прошла): disc read error

Я честно говоря в суть алгоритма кодирования не вникал, но так писать нельзя, вот вам и "Invalid variable reference"
Процедура write в качестве второго параметра требует именно переменную, а не число или результат функции.
Т.Е. можно делать только так:
[syntax='Delphi']
var
BB:byte;
....

BB:=ChangeByte(....);
write(FileOutBmp,BB);
[/syntax]

То же самое и с чтением.

Кстати, раз уж прога пишется на Delphi, советую не использовать допотопные методы типа "File of byte" и т.д., а пользоваться классом TFileStream.