Turbo Pascal | Неверный идентификатор

[MPru]

Смотрел.....
Ты этот исходник откуда брал...
Слишком много ну просто глупых ошибок.
Если со сканировал тогда просмотри по тексту м сам исправляй ошибки, если же это какоето задание по програмированию тогда буду дальше думать над решением........

Ребята написал программку в турбо паскале
Ну ведь не ты написал признайся честно

[MPru]

gh6
Ладно пока тебя нет а меня роботы нет просмотрел до конца файлик и сделал некоторые исправления(в файле осталось пару строк которые ввели меня в заблуждение они взяты в {}). А именно

Строка 228 { MoveChar(p,'',Color,Size.x) ;}
Строка 264 {R.Assing(X+k+DX,6,X+k*DX+L,8); }
Строка 285 {D := copy(PStr^,1,LName);}
Строка 370: { p := p^;}
Строка 386: {FillChar (s[1] ,L, '');}
И Строка 574: {StatusLine :=New(PStatusLine,Init(R,NewStatusDef (0, $FFFF,NewStatusKey...........

Порограма скомпилироваласть и даж загрузиласть но не полностю работосрособна



Переименуй .rar на .pas

[gh6]

MPru> Привет!

Посмотрел твои исправления и скачал файлик все скомпилироваласть, но почему то не загрузилась!
Просто выходит окно что типа все нормально нажмити любою клавишу.
На счет того что ты спрасил, что я писал эту программу, скажу тебе сразу что некоторое я написал а некоторое брал из изходников.

[MPru]

gh6
Ты проско скомпилировал программу по Alt-F9;
Но после компиляции ее нужно запустить по Ctrl-F9

[gh6]

MPru Да все нормально енто сам прогнал. ну загрузилась она у меня че то нето, вродека минюшек должно быть больше и как то все в краткости

[MPru]

gh6
Менюшек действительно должно быть больше все дело в закоментированой строке 174:
Но у меня пока времени нет чтобы выяснить в чем причина того что она не компилируется.
Будет время напишу решение...м

[gh6]

MPru Привет!
Ага посмотри пожалуйста!

[gh6]

Привет> MPru
Ну че как у тебя со временим?