В: Может ли Borland Pascal использовать статические переменные с размером более чем 64 килобайта?
О: Нет!
В: Вы говорите *статические* переменные. Неужели есть что-то еще, с чем можно работать?
О: Да, смотри ниже одно из решений проблемы. Можете не тратить время на чтение следующего текста, все равно это не работает, можете смело скроллировать вниз.
В: Поможет разделение большого массива на несколько маленьких (все элементы меньше чем 64k, но в сумме больше чем 64k)?
О: Нет!
В: Поможет объявление нескольких переменных в модуле?
О: Нет!
В: Поможет объявление чего-либо в секции реализации модуля?
О: Нет!
В: Поможет использование защищенного режима Borland Pascal 7?
A: Нет!
В: Вы уверены??
О: Да!!
В: Почему??
О: Во-первых, все программы, созданные на Borland Pascal, для любых переменных используют только один сегмент данных, во-вторых, процессоры Intel 80xxx ограничивают размер сегмена 64 килобайтами.
В: Это глупо!!
О: Скажите это Borland!! (Или Intel, ...или обоим).
В: Есть ли выход из тупика?
О: Да! Возможны два решения:
1) не используйте *СТАТИЧЕСКИЕ* переменные для хранения данных большого размера. В итоге это позволит разместить более чем 64k данных, но весь массив данных в 64k не поместится, таким образом вы его поделите на несколько частей, что не является решением проблемы. Сделайте переменные динамическими.
2) используйте другой компилятор: есть несколько доступных компиляторов языка Pascal, которые более-менее Borland-совместимые и не имеют таких ограничений (они 32-битные).
В: Почему Borland Pascal не имеет 32-битного компилятора?
О: Да, он весьма древний. Сообщите Borland, что вы хотите новую версию.
В: Что такое не-статическая память?
О: Для примера Куча, XMS, EMS, ... Куча доступна непосредственно, для XMS необходим драйвер (himem.sys), для EMS тоже (HIMEM.SYS + EMM386.EXE) и он обычно доступен не на всех компьютерах, так что лучше использовать XMS вместо EMS.
В: Что такое Куча?
О: Куча - вся свободная память ниже 640-килобайтной границы в режиме реального времени, в защищенном режиме (доступном только в Borland Pascal 7) - вся свободная память ниже 16-мегабайт (обычно *ВСЯ* свободная память, но мы здесь говорим о Borland Pascal).
В: Каким образом можно воспользоваться Кучей?
О: Доступ к памяти Кучи возможен только с помощью указателей. Посмотрите на этот пример, вы можете использовать эту технологию в ваших программах:
type
arr = array [1..30000] of longint; { это ваши данные }
arrptr = ^arr; { это указатель на данные }
var
data : arrptr; { это переменная, содержащая указатель }
begin
if memavail < sizeof(arr) then halt; { проверяем наличие доступной памяти }
new (data); { распределяем память }
for i := 1 to 30000 do data^[i]:=0; { используем ее, обратите здесь внимание на символ ^ !! }
dispose (data); { освобождаем память }
end.
Примечание: данные можно описать и таким способом:
var
data : array [1..10000] of arrptr;
В: Есть ли недостатки у данного решения?
О: Да! Это медленно и немного опасно.
В: Опасность заключается в использовании Кучи?
О: Да!
Всегда распределяйте память Кучи прежде, чем вы решитесь ее использовать. В противном случае вы можете получить одну из следующих ошибок системы: при использовании программ, разработанных на C - "General Protection Violation" (Общее нарушение защиты), разработанных с использованием других инструментов и языков - "Protected Mode Exception #13" (Исключительная ситуация защищенного режима) или иные. В режиме реального времени программа обычно не вызывает такую ошибку, она просто молча перезапишет другие данные, или то, что попадется под руку - саму себя, другие программы, DOS, все, что может оказаться в памяти.
Это может повлечь за собой все что угодно, вплоть до холодной перезагрузки с выключением PC от сети, но может и не иметь никакого эффекта. В особо крайнем случае возможна перезапись данных на жестком диске. Но это в теории и вряд ли возможно.
В: Как я могу использовать XMS память?
О: По адресу http://www.brain.uni-freiburg.de/~klaus/pascal/sources/ расположен модуль, который позволяет использовать XMS.
В: Как насчет других компиляторов Pascal?
О: Проверьте FPK-Pascal и GNU-Pascal. Они оба являются свободно распространяемыми 32-битными компиляторами Pascal для DOS и более-менее Borland-совместимые. Если вам необходим компилятор Pascal для Linux или OS/2, то два вышеупомянутых компилятора доступны также и для этих операционных систем, плюс некоторые другие, смотри http://www.brain.uni-freiburg.de/~klaus/pascal/web-list.html.
В: Это звучит так, будто автор не любит Borland Pascal, не правда ли?
О: Неправда, я *люблю* их и пользуюсь ими все время, но я *не люблю*, когда Borland не предлагает их новые версии.
В: Как насчет Delphi?
О: Не доступен для DOS,
Не доступен для Linux,
Не доступен для OS/2.
[000147]