Якщо двічі клацнути елемент Button1,створюється процедура із заголовком
А-procedure TForm1.FormCreate(Sender:TObject);< br /> Б-procedure TForm1.Button1MouseDown(Sender:TObj ect;Button:TMouseButton;Shift:TShif tState;X, Y:Integer);
В-procedure TForm1.FormClick(Sender:TObject); Г-procedure TForm1.Button1Click(Sender:TObject) ;