Вниз
Скачать: CL | DM;

BitButon   Найти похожие ветки 

 
Adios ©   (2006-02-27 05:43) [0]

Можноли сделать так, чтобы при нажатии на эту кнопку на ней не появлялось выделение, которое при нажатии на ентер нажмет еёже?


 
Defunct ©   (2006-02-27 05:50) [1]

?!
А разве это выделение само по себе не появляется?

или вы имеете в виду это:

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
 TBitBtn( Sender ).Default := True;
end;


 
Adios ©   (2006-02-27 05:53) [2]

это выделение появляется при нажатии и убирается после того как нажмёшь на другую кнопку, и тогда выделиной становится другая кнопка, и мне надо убрать это выделение вообще, есть ли способ это сделать?


 
Defunct ©   (2006-02-27 05:59) [3]

ой, простите мою невнимательность.

> на ней не появлялось выделение

тогда последней строчкой в обработчике нажания на кнопку передавайте фокус (SetFocus) какой-нибудь другой кнопке или полю ввода. Если у вас есть кнопка с установленным Default := True, тогда достаточно в последней строчке обработчика снять с себя фокус, например так:

TBitBtn( Sender ).Perform( WM_KILLFOCUS, 0,0);


 
Adios ©   (2006-02-27 06:03) [4]

а можно фокус имиджу передать?
если да, то напиши строчку передачи.


 
Defunct ©   (2006-02-27 06:09) [5]

Adios ©   (27.02.06 06:03) [4]

Имейджу нельзя.. он не является WinControl"ом.
Разместите Image поверх Panel, установите свойство Align = alClient у Image"a и передавайте фокус панели:

Panel1.SetFocus;


 
Adios ©   (2006-02-27 06:13) [6]

Спасибо тебе ОГРОМНОЕ, брат, выручил!



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.023 c
3-1138016110
yaJohn
2006-01-23 14:35
2006.03.12
МSSQL server, загрузка процессора


15-1139869651
Piter
2006-02-14 01:27
2006.03.12
HDTV фильмы...


15-1139983253
Ega23
2006-02-15 09:00
2006.03.12
С Днём рождения! 15 февраля


2-1140427780
nap<>
2006-02-20 12:29
2006.03.12
TPageControl


1-1139405655
SiJack
2006-02-08 16:34
2006.03.12
аналог StrCopy для PWideChar




   Наверх