Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.09.26;
Скачать: CL | DM;

Вниз

Возможно ли изменение состояния кнопки ?   Найти похожие ветки 

 
bloodman ©   (2004-09-12 23:13) [0]

Есть кнопка и лейбл , возможно ли при наведении на лейбл изменить состояние кнопки. т.е. чтобы онаа приняла такой вид как-будто указатель над ней а не над лейблом.??


 
panov ©   (2004-09-12 23:16) [1]

Возможно. Обрабатывай движение курсора мыши на форме.


 
bloodman ©   (2004-09-12 23:17) [2]

это понятно, вопрос в другом что написать в MouseEnter у лейбла , чтобы изменить состояние кнопки.


 
saNat ©   (2004-09-12 23:58) [3]

Возможно не понял чего, но можно отследить нахождение курсора над меткой и вызывать нужный метод кнопки. Например так:

Procedure TForm1.Label1MouseMove(Sender:TObject; Shift:TShiftState; X,Y:Integer);
Begin
Button1.Click;
End;

Procedure TForm1.Button1Click(Sender:TObject);
Begin
ShowMessage("Click button");
End;


С уважением...


 
QuasiLamo ©   (2004-09-13 00:01) [4]

bloodman ©   (12.09.04 23:17) [2]
что-то типа

procedure label1.mouseenter(sender...);
begin
but1.mouseenter(sender);
end;


 
bloodman ©   (2004-09-13 00:17) [5]

QuasiLamo ©   (13.09.04 00:01) [4]
Access Violation =)

saNat ©   (12.09.04 23:58) [3]
Ты не понял вопроса. Мне нужно изменить состояние кнопки, а не вызвать метод.


 
Gero ©   (2004-09-13 00:21) [6]

Button.Perform(CM_MOUSEENTER, 0, 0);


 
bloodman ©   (2004-09-13 00:25) [7]

Gero ©   (13.09.04 00:21) [6]
Спасибо огромное, совсем забыл про эту процедуру!!



Страницы: 1 вся ветка

Текущий архив: 2004.09.26;
Скачать: CL | DM;

Наверх




Память: 0.45 MB
Время: 0.039 c
4-1092397878
Сергей В. М.
2004-08-13 15:51
2004.09.26
Извенить текст StatusBar a в чужом приложении.


1-1094717450
prorok2
2004-09-09 12:10
2004.09.26
CheckListBox и перерисовка


1-1094643170
Snip
2004-09-08 15:32
2004.09.26
Кто разбираеться в DLL


3-1093954769
Stupid
2004-08-31 16:19
2004.09.26
Помогите составить SQL


14-1094536623
Леван
2004-09-07 09:57
2004.09.26
Лазерный принитер





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский