Вторник, 26.09.2017, 19:14
Приветствую Вас Гость | RSS

DELPHI Report

Каталог статей Delphi Report

Главная » Статьи » Внешний вид программы

Масштабирование форм
Что сделать, что бы ваша программа корректно масштабировалась при любом разрешении экрана.

Необходимо добавить для всех окон в событие OnСreate Form. Вместо 640 используйте разрешение при разработке приложения

procedure AdjustResolution(oForm:TForm);

var

iPercentage:integer;

begin

if Screen.Width > 640 then

begin

   iPercentage:=Round(((Screen.Width-640)/640)*100)+100;

   oForm.ScaleBy(iPercentage,100);

end;

end;





Категория: Внешний вид программы | Добавил: delphi (05.02.2009)
Просмотров: 4332 | Рейтинг: 3.0/2
Всего комментариев: 0
Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]
Меню сайта
Google
Форма входа
Категории раздела
Общие вопросы [3]Среда Delphi [1]
Создание отчетов. Rave Reports [6]- Delphi DLL [9]
- Работа с реестром [5]Внешний вид программы [9]
Прикладные программы [1]
Здесь будут размещаться программы, файлы и по возможности описание программ прикладного характера
MS Office (MS Word, MS Excel ) [40]
Aвтоматизация отчетов с помощью средств MS Office (Word, Excel)
Построение графиков TChart, TDBChar [10]Matlab [3]
Здесь будут представлены примеры и статьи решения математических задач в среде матричных вычислений Matlab
Поиск
Друзья сайта
Статистика
Copyright MyCorp © 2017