Автор: serge2k 2.06.2004 21:46
Народ, может подскажите, как подключить библитеку с функциями для работы с большими разрешениями и большим количеством цветов? Я пробовал в свое время и ничего не получилось. А может посоветуете какой-нить модуль неплохой? И вообще хорошо бы было если все процедуры из graph.tpu работали и в новом модуле. Есть Такие??
А насчет параллельных процессов(мой прошлый вопрос) Вам большое спаибо. Выручили...
Автор: virt 2.06.2004 22:38
Код
installuserdriver('svga256.bgi',nil);
Автор: Altair 3.06.2004 11:28
Только вместо svga советую использовать vesa.
Автор: serge2k 6.06.2004 20:49
Спасибки, но тока надо не installuserdriver('svga256.bgi',nil); аinstalluserdriver('svga256',nil);. Долго не мог врубиться в чем проблема, но потом нашел установил отлов ошибок и все прояснилось.
Автор: Altair 6.06.2004 20:56
Цитата
Спасибки, но тока надо не installuserdriver('svga256.bgi',nil); аinstalluserdriver('svga256',nil);.
У тебя какой комилер???????
Автор: Romtek 7.06.2004 2:31
Код
const
{ 256 colors }
v320x200 : byte = 0;
v640x480 : byte = 2;
v800x600 : byte = 3;
v1024x768 : byte = 4;
v1280x1024 : byte = 5;
Procedure SetVMode(Mode: byte);
Var Gd,Gm: integer;
Begin
Gd:= InstallUserDriver('SVGA256',nil);
if Gd= grError { Table full? } then
begin
writeln('Error of installing driver.');
Halt(1);
end;
if RegisterBGIdriver(@SVGA_DRV) < 0 then
begin
Writeln(GraphErrorMsg(GraphResult));
halt(2);
end;
Gm:=Mode;
InitGraph(Gd,Gm,'');
End;