Kak rabotaet GetImage, PutImage?

[uavso]

Dorogie kollegi,
kak zastavit' rabotat v FPC/Win32 GetImage i PutImage?
V DOS versii
p:pointer;
i
GetImage(200,200,220,220,p^);

Zdes' vrodeby v Manual napisano, chto dolzhen byt' BitMap.
No on daet 2 oshibki:
Identifier not found
i
Error in type definition.
Testovuju "Super-programmu" prilagaju


uses graph,crt;
var
e:char;
gd,gm:smallint;
p :bitmap;
begin
gd:=detect;gm:=0;
initgraph(gd,gm,'');
line(0,0,300,300);
GetImage(200,200,220,220,p);
PutImage(300,200,p,copyput);
end.


Zaranee spasibo!

[uavso]

Sam sebe otvechaju:
nado bylo
p:pointer;

a ne
p:bitmap;

Neuzheli nelzja bylo eto v Manual napisat?

Teper' drugaja problema - chtoby obrabatyvalo nazhatija klavish, nado ih nazhimat' v DOS okne, togda Win risunok chto-to otobrazhaet.
A, kogda fokus v nem, to ne reagiruet na klavisy. Uvy.