Siema,
Napisałem, tzn przerobiłem komponent TSpeedButton dodając mu jedna rubryke z tekstem typu String. Procedura jest przypisana do WM_LBUTTONDOWN. I tu się zaczynają schody... Kiedy wyskoczy MessageBox albo błąd po kliknięciu na ten przycisk to zostaje on wypukły [podczas gdy komunikat jest wyświetlony]. Czy da się to jakoś przypisać WM_LBUTTONDOWN do OnClicka albo zrobic tak że po kliknięciu TSpeedButton jest płaski? Jakby co to jest on ustawiony na Flat := True;
0
0
może zmień na WM_LBUTTONUP :>
0
Też nie działa - teraz się kompletnie wali... Wiem że można zastosować BN_CLICKED bo to w końcu jest Button, ale jak to zrobić?
procedure XOnClick(var Msg: TMessage); message <b>WM_LBUTTONDOWN</b>;
Jak do tego wstawić BN_CLICKED?