for example i want to run a bat file on botton1.click and works during
n seconds.
What I must use?

procedure TForm1.Button1Click(Sender: TObject);
begin
  WHAT I MUST WRITE HERE?
end;

please help me.