miha, эм.. Какой компонент? Все реализовано стандартными средствами (про трей). TTrayIcon называется. Если то что по ссылке не оч, понятно могу скинуть пустую форму, которая сворачиваетя в трей, есть меню ПКМ и разворачивается при нажатии ЛКМ.
ZBEP, хз, я открывал этот проект (что ты давал выше) и он не работает на 100% из-за отсутствия у меня этого кмпонента. У меня Делфи 6. Мне поставить седьмую версию?
ZBEP, возможности и особого желания нет - через 2 недели в армию Вобщем, позже займусь треем А пока вот: как перевести из Byte в Integer и наоборот? А то мне нужно для изменения прозрачности формы. Данные берутся из этой самой... блин, забыл название Trackbar!
miha, эм.. или старые делфи еще корявей чем я думал, либо хз. Я прозрачность изменяю TTrackBar легко без перевода Byte в Integer. Пример: procedure TForm2.sTrackBar1MouseMove(Sender: TObject; Shift: TShiftState; X,Y: Integer); begin Form1.alphaBlendValue:=Form2.TrackBar1.position; end;
21 июн 2010 в 00:08
Но возможно может потребоваться регистрация.