Картинки, Как вывести через паскаль рисунок Опции

[Антон]

Объясните, пожалуста, как вставлять картинки gif, если можно по подробнее. Это очень сложно? Заранее спасибо.

[Антон]

Program gr;
uses bmp, graph, crt;
var gd,gm, err:integer;
begin

gd:=installuserdriver('vesa256',nil);
initgraph(gd,gm,'');
err := graphresult;
if err <> grok then
  begin
    writeln('error: ', grapherrormsg(err));
    readln; halt;
  end;

SBMI('budda.bmp', 0, 0, 0);
readkey;
end.

Скачал файл Vesa.bgi и поместил в одну папку вместе с этой программой и bmp файлом. Пишет file not found (bmp.tru).

Сообщение отредактировано: volvo - 27.08.2005 0:20