![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
![]() Доброго времени суток.
1. Определяю разрешение экрана при создании формы. Результат в (Resolution_Size) 2. Создаю динамический объект. Код:
Label_Logo:= TLabel.Create(Sender as TForm); Label_Logo.Text:= 'LOGO '; Label_Logo.Position.X:= (Resolution_Size.x / 2 ) - ( Label_Logo.Width / 2); Label_Logo.Position.Y:= (Resolution_Size.y / 3 ) - ( Label_Logo.height / 2); Label_Logo.Parent:= Sender as TForm; Label_Logo.AutoSize:= true; Label_Logo.Visible:= true; Label_Logo.BringToFront; Label_Logo.Repaint; Объект рисуется где-то в центре, но немного правее чем должен. 3. При OnResize формы (поворот смартфона): Код:
Label_Logo.Position.X:= (Resolution_Size.x / 2 ) - ( Label_Logo.Width / 2); Label_Logo.Position.Y:= (Resolution_Size.y / 3 ) - ( Label_Logo.height / 2); Label_Logo.Repaint; Все начинает рисовать ровно в центре. Проверял через ShowMessage. И в первом случае, и во втором разрешение экрана такое же. Где косяк? |