Кнопка с неподвижным caption

[Icabod]

Привет, нельзя ли сделать кнопку с неподвижным текстом? Когда нажимаешь обычную кнопку, rect смещается и caption тоже двигается. А мне нужно, чтобы не двигался. Где включить в скине или каие сообщения нужно перехватить?

[FaTaL]

Используй TPanel вместо кнопки.

[Аватар]

TPanel неподвижен в принципе

???

procedure TForm1.Panel1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
  Panel1.BevelInner:=bvLowered;
  Panel1.BevelOuter:=bvNone;
end;

procedure TForm1.Panel1MouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
  Panel1.BevelInner:=bvRaised;
  Panel1.BevelOuter:=bvRaised;
  {такие же и начальные значения}
end;