Задержать кнопку в зажатом состоянии

[FireF1y]

Добрый день, школьный вопрос.
Как задержать кнопку (TSpeedButton) в зажатом состоянии, т.е. чтобы после отпускания левой кнопкой мыши у кнопки была та же картинка, что и при зажатии?

[LearnMagic]

Не совсем понятен вопрос.
Возможные варианты ответов:
1. TspeedButton.NumGlyphs
2. TspeedButton.GroupIndex
3. Использовать TBitBtn
4. Если нужно более тёмное изображение, то см. исходники TSpeedButton, подготовьте нужную картинку и меняйте её в runtime

[wadman]

TSpeedButton.Down?

[Alex2013]

Добрый день, школьный вопрос.
Как задержать кнопку (TSpeedButton) в зажатом состоянии, т.е. чтобы после отпускания левой кнопкой мыши у кнопки была та же картинка, что и при зажатии?

А просто сменить картинку по нажатию "не судьба "

То бишь сделать что-то вроде этого ...
procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
SpeedButton1.Glyphs.Сlear;
end;

[tema]

SpeedButton1.GroupIndex поставить, например, 1 или 2, а SpeedButton1.Down:=true