Прозорість в delphi, клуб для програмістів

У Delphi 6 розробникам Windows-додатків доступна одна з чудових можливостей створювати (підлозі) прозорі форми (вікна). У Delphi 6 клас TForm підтримує форми з шарами, які мають властивості AlphaBlend, AlphaBlendValue, TransparentColor, і TransparentColorValue.

Прозорість у формі означає те, що користувач може видить те, що знаходиться позатим форми.

Щоб підготувати форму до прозорості, Вам потрібно встановити властивість AlphaBlend в True. Якщо AlphaBlend встановлено в True, то властивість AlphaBlendValue вказує ступінь прозорості. Це властивість дозволяє задати значення від 0 до 255. 0 вказує на повну прозорість вікна, в той час як 255 вказує на непрозоре вікно.

Так само можливо встановлювати властивості AlphaBlend і AlphaBlendValue під час розробки (або під час виконання додатка) за допомогою Object Inspector.

Наступна форма діалогового вікна About має значення AlphaBlendValue встановлений в 210.

Можливо, Ви подумаєте, що така можливість у Delphi, може Вам знадобитися досить рідко, проте прозорістю можна досить ефективно привертати увагу користувачів Вашої програми:

Вищенаведений код, в подія OnClose для форми about, створює плавно змінюється ефект. Коли користувач спробує закрити діалогове віконце, то форма плавно зникне. Робиться це шляхом циклічного зменшення AlphaBlendValue до нуля.

Інші два новий властивості форми в Delphi 6, це TransparentColor і TransparentColorValue. TransparentColor, це булева властивість, яке вказує, буде певний колір, зазначений в TransparentColorValue прозорим. Тобто ми можемо поставити прозорість тільки певного кольору.

Як приклад, встановимо TransparentColor для форми About в True. Тепер задамо властивості TransparentColorValue значення clWhite - що відповідає білому. Компонент Memo має білий фон, тому віконце About буде виглядати наступним чином:

Схожі статті