GOOSE
Advanced Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Petro
В штатных инструментах этого нет...
Делаешь так (пример страницы-браузера):
1. Свойства страницы --> вкладка "On Show"
вставляешь код
Код:
--получаем системную ширину и высоту окна.
display = System.GetDisplayInfo();
--устанавливаем величину отступов
--(нужно будет для позиционирования объектов на фуллскрине).
spacer = 15;
--устанавливаем размеры кнопок...
Button_Size = Button.GetSize("Back");
Exit_Button_Size = Button.GetSize("Exit");
Go_Button_Size = Button.GetSize("Go");
--присваиваем переменной системный размер окна
Window_Size = Window.GetSize(Application.GetWndHandle());
--все, что ниже изменяет размеры объектов,
--основываясь на значениях, полученных выше.
--устанавливаем размер объекта "Input"
Input.SetSize("Address Bar", (Window_Size.Width - (spacer * 3) - Go_Button_Size.Width), Go_Button_Size.Height);
Input.SetPos("Address Bar", spacer, spacer);
Input_Pos = Input.GetPos("Address Bar");
Input_Size = Input.GetSize("Address Bar");
--устанавливаем размер объекта "web"
Web.SetSize("Web Browser Object", (Window_Size.Width - (spacer * 2)), (Window_Size.Height - (spacer + Go_Button_Size.Height + spacer) - (spacer + Button_Size.Height + spacer)));
Web.SetPos("Web Browser Object", spacer, (spacer + Go_Button_Size.Height + spacer));
Web_Pos = Web.GetPos("Web Browser Object");
Web_Size = Web.GetSize("Web Browser Object");
--размер кнопок уже определен выше
--устанавливаем позицию каждой кнопки
Button.SetPos("Back", spacer, (Web_Pos.Y + Web_Size.Height + spacer)); --кнопка back
Button.SetPos("Forward", (spacer + Button.GetPos("Back").X + Button_Size.Width), (Web_Pos.Y + Web_Size.Height + spacer)); --кнопка forward
Button.SetPos("Print", (spacer + Button.GetPos("Forward").X + Button_Size.Width), (Web_Pos.Y + Web_Size.Height + spacer)); --кнопка print
Button.SetPos("Refresh", (spacer + Button.GetPos("Print").X + Button_Size.Width), (Web_Pos.Y + Web_Size.Height + spacer)); --кнопка refresh
Button.SetPos("Stop", (spacer + Button.GetPos("Refresh").X + Button_Size.Width), (Web_Pos.Y + Web_Size.Height + spacer)); --кнопка stop
Button.SetPos("Go", (Input_Pos.X + Input_Size.Width + spacer), spacer); --кнопка go
Button.SetPos("Exit", display.Width - (Exit_Button_Size.Width + spacer), display.Height - (Exit_Button_Size.Height + spacer)); --кнопка exit
|
Должно работать...
Учти, тут ширина экрана не позволила, кое-где есть переносы... Ну, разберешься сам, что должно идти в одну строчку.
Добавлено
Petro
Торможу, блин, сорри. У тебя же есть мыло, вот я на него кинул файл примера, откроешь в проге - все поймешь! 
|
Всего записей: 903 | Зарегистр. 17-10-2001 | Отправлено: 23:59 18-10-2004 | Исправлено: GOOSE, 00:03 19-10-2004 |
|
Пасибки 
