Вставка картинок в Pascal Опции

[Katja]

Подскажите пожалуйста, как вставить bmp картинку в Borland Pascal

[murphy]

В том то и дело что убирал

вот прога

Код

program test;
uses bmp, graph, crt;
var gd,gm:integer;
begin
{gd:=detect;
initgraph(gd,gm,'D:\TP_71\TP\bgi');
{bar(0,0,20,20);}

gd:=installuserdriver('VESA256',nil);
initgraph(gd,gm,'');
if graphresult <> grok then halt;

SBMI('D:\P2s2.bmp', 0, 0, 0 );
readkey;
end.

помогите :p2:

Сообщение отредактировано: murphy - 28.12.2004 0:11