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

Вниз

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

 
ИванН   (2008-12-02 23:24) [0]

У меня есть на форме два TSpeedButton, как сделать так что бы при нажатии и фиксировании одного (у меня назначено GroupIndex) второй так же принимал это же положение. Соответственно при разфиксировании кнопки, вторая кнопка делала тоже самое.

?


 
{RASkov} ©   (2008-12-02 23:27) [1]

не понятно.... нужно синхронизировать нажатия(состояния) двух кнопок?


 
ИванН   (2008-12-02 23:27) [2]

Да.


 
{RASkov} ©   (2008-12-02 23:41) [3]

Как самый простой вариант, назначить кнопкам разный GroupIndex обоим выставить AllowAllUp в True и в едином для обоих обработчике OnClick написать нечто такое:
 if Sender=SpeedButton1 then SpeedButton2.Down:=SpeedButton1.Down
  else SpeedButton1.Down:=SpeedButton2.Down;

Можно и более на низком уровне позаморачиваться, но думаю хватит этого....

А зачем такое нужно? :)


 
KilkennyCat ©   (2008-12-02 23:52) [4]


> then SpeedButton2.Down:=SpeedButton1.Down
>   else SpeedButton1.Down:=SpeedButton2.Down;

это ты неплохо загнул :)


 
{RASkov} ©   (2008-12-02 23:55) [5]

> [4] KilkennyCat ©   (02.12.08 23:52)

старался :)


 
KilkennyCat ©   (2008-12-03 00:04) [6]

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

тогда достаточно только в зависимой кнопке сдаунить-раздаунить независимую.
Иначе логика двух кнопок странновата...


 
Anatoly Podgoretsky ©   (2008-12-03 00:04) [7]

> ИванН  (02.12.2008 23:27:02)  [2]

Тогда вопрос, а для чего вторая кнопка?


 
Leonid Troyanovsky ©   (2008-12-03 09:16) [8]


> Anatoly Podgoretsky ©   (03.12.08 00:04) [7]

> Тогда вопрос, а для чего вторая кнопка?

Для работы под водой.

--
Regards, LVT.


 
AIK ©   (2008-12-03 09:33) [9]


> Тогда вопрос, а для чего вторая кнопка?


если вдруг первая несработает


 
clickmaker ©   (2008-12-03 13:15) [10]

что-то типа
[ ] удалять файлы
  [ ] удалять совсем?


 
{RASkov} ©   (2008-12-03 13:25) [11]

> [ ] удалять файлы
>  [ ] удалять совсем?

Мало кнопок...
[ ] переместить в корзину?
 [ ] может вы передумаете
   [ ] значит все таки удалить?
     [ ] а у вас был шанс спасити, вы все еще уверены?



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

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

Наверх




Память: 0.46 MB
Время: 0.006 c
15-1227425906
Solnce
2008-11-23 10:38
2009.01.18
форум загнивает


15-1227005376
Knight
2008-11-18 13:49
2009.01.18
Откуда это TKGSFormEdge?


2-1228249482
ИванН
2008-12-02 23:24
2009.01.18
TSpeedButton


2-1228735691
ekto
2008-12-08 14:28
2009.01.18
Получение сообщения, когда компонент не в фокусе...


2-1228229287
Marixa
2008-12-02 17:48
2009.01.18
Календарь нв Delphi





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