Функция получения положения и размеров окна отображения текущего графического контейнера.
getformbounds(left, top, width, height);
left – левая граница окна,
top – верхняя граница окна,
width – ширина окна,
height – высота окна.
getformbounds(left, top, width, height) – функция получения положения (левая left и верхняя top граница) и размеров (ширина width и высота height) окна отображения текущего графического контейнера. Отсчёт координат по горизонтали начинается с левого края текущего монитора вправо, по вертикали - с верхнего края текущего монитора вниз. Параметры данной функции являются возвращаемыми и должны быть обязательно типа integer.
нет
var L:integer, T:integer, W:integer, H:integer; //Получаем координаты и размеры getformbounds(L,T,W,H); //Выводим сообщение seterrorstr("FormLeft="+floattostr(L) + " " + "FormTop=" + floattostr(T) + " " + "FormWidth=" + floattostr(W) + " " + "FormHeight=" + floattostr(H), 0);