TRect WinRect;

GetWindowRect( a,&WinRect); // address of structure for window coordinates

int c,d,e,f;

c=WinRect.left;
d=WinRect.right;
e=WinRect.top;
f=WinRect.bottom;

Form1->Caption=IntToStr©+" "+IntToStr(d)+" "+IntToStr(e)+" "+IntToStr(f)+" ";