چگونه می توان لیستی از جداول یک دیتا بیس Sql Server را دریافت کرد؟

چگونه می توان لیستی از جداول یک دیتا بیس Sql Server را دریافت کرد؟
​

procedure TForm1.Button1Click(Sender: TObject);
begin
ADOQuery1.SQL.Add('Exec SP_Tables');
ADOQuery1.Active := True;
end;