Версия для печати темы

Автор: WereWolf 5.12.2004, 13:44

Предлагаю здесь выкладывать полезные модули, bgi файлы и тому подобное для Turbo Pascal! А для начала попросить хочу, может у кого есть, модуль для работы с мышой, лучше исходник?

Автор: Boris 7.12.2004, 8:06

Вот мой объект для работы и с мышью тоже. Делал по типу Turbo Vision
В архиве есть и описание


Прикрепленные файлы
 obj_show.rar ( 99.52 килобайт ) Кол-во скачиваний: 186

Автор: Boris 7.12.2004, 8:08

Вот еще (не мой) модель CRT для работы в Паскале на быстрых машинах


Прикрепленные файлы
 newcrt.zip ( 80.02 килобайт ) Кол-во скачиваний: 206

Автор: Kompil 19.2.2005, 16:52

А где можно достать модуль для переключения клавиатуры на кирилицу

Автор: Boris 21.2.2005, 7:21

смотри http://www.opeople.ru/topic389.html
Или Вас интересует реализация модуля, подключаемого к Вашей программе? Тогда создайте новую тему. Здесь место для "чужих" модулей

Автор: Kompil 24.2.2005, 19:43

Спасибо, нашёл.

Автор: TECHNOQUANT 20.3.2005, 12:57

В учебнике Фараонова ("Илюстрированный самоучитель по Туробо Паскалю") используется модуль APP из библиотеки turbo vision. У меня этого модуля почему-то нет. Где его можно найти? Или здесь какая-то ошибка?

Автор: TECHNOQUANT 21.3.2005, 15:49

Все. Уже разобрался.
У кого возникнут такие же проблемы:
borlpasc.narod.ru
Качайте полную версию.

Автор: ForceGuard 27.1.2008, 19:31

Скачал с borlpasc.narod.ru набор модулей gamepro, как их подключить и узнать имена новых функций?

Автор: PolPoll 28.1.2008, 18:15

ForceGuard, Открой эти pas-ы и увидишь список имен функциий и процедур...
(до слова Implementation)

а подключать как и другие модули
uses crt, <имя модуля>, <имя модуля>;

Автор: ForceGuard 28.1.2008, 18:40

С самого начала так и пробовал подключать модуль, но при компиляции Паскаль ругается на неправильное имя файла: Invalid filename (d:\prog\tp7\tpu\KB.tpu). На остальные модули (gamepro and pallete) матерится аналогично.

P.S.
В скаченном архиве tpu-файлов нет.

Автор: Denis 28.1.2008, 19:22

хоть бы ссылки дали что-ли
при компиляции имя модуля должно совпадать с именем pas файла (unit имя_модуля).
убедитесь, что во вкладке compile стоит disk

Автор: PolPoll 28.1.2008, 19:42

Значит, он присто не находит эти pas-ы
Где они сейчас лежат?

попробуй их либо в папку tp7, либо пути прописать в Options|Directories...

http://borlpasc.narod.ru/turbo_pacs.htm

Автор: ForceGuard 28.1.2008, 19:46

KB.pas, gamepro.pas, pallete.pas скинул в корневую папку TP7 (там, где валяется и exe-шник Паскаля). А при компиляции файлы вроде находятся, т.к. в новом окне они и открываются. Т.е. если я пишу какую-нибудь ерунду типа этой:

То при выполнении программы открывается KB.Pas вместе с упомянутой ошибкой.

P.S.
Паскаль брал по этому адресу (лежит на странице, которую указал PolPoll).

Автор: PolPoll 28.1.2008, 20:03

Раз находит, значит не согласованы папки, куда он кладет tpu и где его потом ищет

какие у тя пути в Options|Directories... ?

Exe & TPU
Unit

Автор: ForceGuard 28.1.2008, 20:32

У меня пути были неправильно прописаны. Теперь все работает. Сэнк.))

Автор: Мих 3.2.2008, 15:46

Если у меня программа нчинается со солв
uses crt, graph;
или немного по другому но со словом graph то мне вылазит ошибка "Файл graph.tup не найден".
В книге нашёл что нужно указать путь для директорий, но всё равно не рулит. Кто нибудь знает, что можно сделать?

Автор: PolPoll 3.2.2008, 16:26

Мих, А какие параметры у InitGraph? особенно третий?


Хотя... нет. Это уже при инициализации была бы ошибка.
Так есть ли у тебя вообще этот файл graph.tpu и где он лежит и как пути ты прописал? не использованы ли "длинные" пути?

Автор: Мих 4.2.2008, 5:09

файл есть. Ещё есть graph3.tup и 4 но их я не прописывал.
Длинные пути? Я прописывал полный путь C:\Program Files\ и т.д. а как написать короткий?
InitGraph а это где?(извините за нескромный вопрос)

Автор: Denis 4.2.2008, 6:26

кинь папку с паскалем непосредственно на диск С:
C:\TP7
а там уже подредактируй свои пути к файлам

Автор: afterstep 4.2.2008, 6:28

какой паскаль - и где лежит graph
если бьіть совершенно точньім - если crt работает, то найди семь отличий (кроме названия) между graph и crt

Автор: PolPoll 4.2.2008, 6:54

Из Паскаля перейди на диск C: и посмотри как эта папка называется. Скорее всего PROGRA~1

В самой программе перед использованием графики из graph.tpu

Автор: Мих 4.2.2008, 7:09

afterstep>
Turbo Pascal 7.1(под дос)

PolPoll>
Короче прога тут

uses graph,crt;
const t=100; d=15;
var p:pointer;
gd,gm,x,size:integer;
procedure vagon;
begin
bar(x,100,x+70,130);
circle(x+15,140,10);Circle(x+55,140,10);
end;
begin
gd:=detect; initgraph(gd,gm,''); x:=0
vagon; size:=imagesize(0,100,70,150);
getmem(p,size);
getimage(0,100,70,150,p^); x:=0;
repeat
delay(t);
putimage(x,100,p^,xorput);
x:=x+d;
putimage(x,100,p^,xorput);
until x>639;
freemem(p,size);
end.
Устанавливаться граф у меня ни как не хочет

Автор: PolPoll 4.2.2008, 7:14

Прога тут не при чем. Пути!

Или модуль уже нашелся, графика не инициализируется??

Автор: Мих 4.2.2008, 14:22

Модуль есть он в Units но в ОПШНС\ДИРЕКТОРЕС н ставится!! прописываю\ОК\ошибка
уже и краткий в полный путь я там прописыавл\

Автор: PolPoll 5.2.2008, 14:09

Так полность пути напиши сюда, как ты их пишешь.

А то C:\Program Files\
то вообще просто Units...

Автор: Мих 6.2.2008, 3:55

C:\PROGRA~1\TURBOP~1\UNITS\GRAPH.TUP
Ну в общем не срослось у меня с графикой!

Автор: PolPoll 6.2.2008, 7:16

Во-первых, TPU а не TUP
Во-вторых, в путях сам файл не пишется. Только папки

Автор: Мих 6.2.2008, 15:45

нет... как уже только не прописывал... всё...THE END

Автор: Мих 7.2.2008, 3:28

НЕ ЭНД!!! Скачал ДРУГОЙ паскалевский компил: вообще не устанавливается все пути авто прописаны,НО! при выполнении проги я оказывается заставляю делить его на ноль!
Прогресс! Что дальше?

Автор: afterstep 7.2.2008, 8:07

скачай freepascal - и не вьіпендривайся. Или стьірь где-нить дельфи - в консольном режиме - чем тебе не паскаль?

Автор: Мих 7.2.2008, 9:08

afterstep>
Где-ж ты раньше такой умный был? Пасибса тебе огромное. Но 2 круга прошедшие по экрану меня не особо впечатлили, может знаешь что ещё интересного тут есть?

Автор: Denis 7.2.2008, 19:09

мда... может я конечно и ошибаюсь, но разве зависят правильно прописанные пути от компилятора. ИМХО, нужно добивать тему с путями. а именно: создай на диске C папку tp7, кинь в нее три папки BGI, BIN, UNITS, зайди в папку BIN, найди файл TURBO.EXE и запусти паскаль двойным щелчком левой кнопки мыши на указанный файл. в открывшемся окне на вкладке Options выбери пункт Directories. напротив Unit directories введи C:\tp7\units сохрани среду, зайдя на вкладку Options и выбрав пункт SAVE TURBO.TP. копируй свой файл-программу с графикой на диск C. жмешь F3, в поле Name вводишь C:\_имя_файла_программы_с_графикой, пытаешься компилить, запустить прграмму. получается - радуешься, нет - отписываешься сюда

Автор: Мих 8.2.2008, 4:56

В том паскале у мя был прописан d диск. Переписал их на c, сохранил, папок накидал, теперь: он не компилит, не находит ошибки, графа не рулит.........................................

Автор: Мих 11.2.2008, 13:49

Короче чёрт с путями... Графа есть и ладно

Автор: PolPoll 3.3.2008, 17:44

Про использование kb.pas в отдельной теме http://www.opeople.ru/topic9073.html