Get List of Tables in Sql Server

Delphi/Pascal

<span style="color: black; font-family: Courier New; font-size: x-small;"><b>procedure </b>TForm1.Button1Click(Sender: TObject); <b>begin   </b>ADOQuery1.SQL.Add('Exec SP_Tables');   ADOQuery1.Active := True; <b>end</b>;</span>

1 2 3 4 5

<span style="color: black; font-family: Courier New; font-size: x-small;"><b>procedure </b>TForm1.Button1Click(Sender: TObject); <b>begin   </b>ADOQuery1.SQL.Add('Exec SP_Tables');   ADOQuery1.Active := True; <b>end</b>;</span>