Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2006.03.12;
Скачать: [xml.tar.bz2];

Вниз

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 вся ветка

Форум: "Начинающим";
Текущий архив: 2006.03.12;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.011 c
15-1140068793
Ega23
2006-02-16 08:46
2006.03.12
С Днём рождения! 16 февраля


2-1140965267
WestBronx
2006-02-26 17:47
2006.03.12
Папка "Автозаргузка" и данные из ярлыка.


15-1140401512
Бугага
2006-02-20 05:11
2006.03.12
Не подскажете, что за музыка играет на фоне?


2-1140698392
macpm
2006-02-23 15:39
2006.03.12
Печать содержимого PaintBox


10-1114698193
vlad_ri
2005-04-28 18:23
2006.03.12
многопоточность и COM





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский