Следующая программа при расчете вычитает высоту (или ширину), занимаемую панелью задач. Если существует панель ярлыков, запускающая Microsoft Office, высота (или ширина), занимаемая панелью ярлыков, также будет вычтена.
PublicConstSM_CXFULLSCREEN=16
PublicConstSM_CYFULLSCREEN=17
#IfWin32Then
DeclareFunctionGetSystemMetricsLib"user32"(ByValnIndexAsLong)AsLong
#Еще
DeclareFunctionGetSystemMetricsLib "User"(ByValnIndexAsInteger)AsInteger
#КонецЕсли
PublicSubCenterForm(frmAsForm)
frm.Left=Screen.TwipsPerPixelX*GetSystemMetrics(SM_CXFULLSCREEN)/2-frm.Width/2
frm.Top=Screen.TwipsPerPixelY*GetSystemMetrics(SM_CYFULLSCREEN)/2-frm.Height/2
EndSub
Просто используйте CenterFormMe в Form_Load ->