простой вопрос

[Анастасия123456789]

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

[AngelOfDeath]

Вроде такого метода нет...
Но можно использовать например параметр Tag или завести переменную Boolean
Tag=1 //На кнопку нажимали
Tag=0 //На кнопку не нажимали

procedure TForm2.Button1MouseUp(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
Button1.Tag:=1;
end;

procedure TForm2.FormCreate(Sender: TObject);
begin
if Button1.Tag=0 then
begin
  Button1.Caption:='Не была нажата';
end;
end;


procedure TForm2.Button1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
if Button1.Tag=1 then
begin
  Button1.Caption:='Была нажата';
end;
end;

Так подойдёт?

[Stilet]

Настя, OnClick подойдет?