Здравейте, в тази статия бих искал да ви кажа как се изпълнява изскачащ прозорец в една от проекта му. Да знам, че има достатъчно компоненти, които правят изскачащия прозорец, както и за възстановяване на красотата на това, но аз не трябва да насочи красота, нормален прозорец, който ще информира потребителя за нещо. Може би това е метод, който не съм съвсем прав, но аз някак си разбра, че. I използва предимно TTimer. добре, а останалите само на таймера аз размърда прозореца, разбира се, вместо на таймера може да се използва една линия или нещо друго, но по някаква причина това ми хареса. От форма I
И, разбира се, че е необходимо да се коригира повече или по-малко красива нашата форма, която прилича на красива прозорец веднъж, вие със сигурност може да подпомогне дизайна му да излезе с, рисуват и украсяват, но като същевременно леко прозрачна и лесно да промените стила на нашата форма, В допълнение, ние сме на нашия TLabel пиши нещо, например, «Hello World» =).
Нека да поставим AlphBlend собственост на формата на True. AlphaValue и 180 се установи. В Надпис собственост на етикета се премахне и да зададете BorderStyle имота bsToolWindow. установяване на правилния размер на нашата форма в дясно и след това на събитието OnShow ние трябва да напишете първоначалното установяване на външния вид на прозореца, на теория всички изскачащи прозорци се появяват до Трей. Но ние трябва да направим нашия прозорец първоначално се появява под лентата на задачите, защото на лентата на задачите, а след това ще трябва да се появи в нашия прозорец - плувка, така да се OnShow събитие пише следния код
По този начин ние имаме един прозорец се появи под лентата със задачи и само от дясната страна на екрана, и по този начин ще се появи в горната част. Сега ние трябва да се направи предполагаемото движение на прозореца, че е ефектът от външния си вид. За да направите това, TTimer имот - Интервал 1, както и OnTimer събитие пише следния код
Свързани статии