Delphi: wait until bat-script runs to the end
I have bat-file, that make some operations. How to run this file from Delphi and wait, until it stops. 
Something like that:

    procedure TForm1.Button1Click(Sender: TObject);
    begin
    //Starting bat-file
    bla-bla-bla
    showmessage('Done');
    end;
Delphi: wait until bat-script runs to the end
===

I have bat-file, that make some operations. How to run this file from Delphi and wait, until it stops. 
Something like that:

    procedure TForm1.Button1Click(Sender: TObject);
    begin
    //Starting bat-file
    bla-bla-bla
    showmessage('Done');
    end;