program kartinka;
uses wincrt,wingraph,BMP;
var a,b,gd,gm:integer;
x0,y0:integer;
begin
gd:=detect;
initgraph(gd,gm,'');
for a:=1 to 510 do
for b:=1 to 90 do
putpixel(a,b,a div 2);
delay(100);
SBMI('trava.bmp',100,100,0);
delay(1000);
closegraph;
end.
Качал модуль для вывода bmp с вашего форума. Может я что-то неправильно делаю? картинка в каталоге присутствует.
---------------
Когда дело доходит до вывода картинки, прога завершается и выдает exitcode = 2
Сообщение отредактировано: Anonimys -