Buton1Clik

[IVANSour]

Каким образом на один бутон клик записать несколько действий.

[_Engine_]

Описать их в теле процедуры

[Sm1Le]

Не вошел в тему ... что тут такого сложного или не понятного ?

[IVANSour]

Сообщение от _Engine_

Описать их в теле процедуры

У тебя есть небольшой иисходник или это компонент
тело процедур.Подскажите

[Stilet]

У меня есть:

procedure TForm1.Button1Click(Sender: TObject);
begin
MessageBeep(0); // Раз действие
ShowMessage('sadsda'); // Два действие
end;