А подскажите ко мне как пакеты отправлять чтобы не по одному а при нажатии на кнопку он отправлял а пока не выйдешь из программы а то так получается что надо всё время на кнопку жать и ещё как после одного нажатия сделать кнопку больше неактивной

procedure TForm1.Button1Click(Sender: TObject);
begin
IdUDPClient1.Send('qwertyqwertyqwertyqwertyqwertq' ); //отправляем пакеты

end;

end.