Сделал запрос на получение всех табличек в базе,
но на оба запроса отлуп. А sqlexplorer и pgadmin все положенное выдают.
Где я мог напортачить?

procedure TDM.GetAllTable;
const
skey = '''public'' ';

sqlGetTableName =
'select table_name ' +
'from information_schema.tables ' +
'where table_schema=' + skey +
' order by table_name';

{sqlGetTableName =
'select tablename ' +
'from pg_catalog.pg_tables ' +
'where schemaname=' + skey +
' order by tablename';
}
begin
if not APgConnect.Connected
then
if not InitPg
then exit;
With APgQ, SQL do
begin
Clear;
add(sqlGetTableName);
try
open;
except
infoMsg('Error for open table');
exit;
end;

infoText := '';
while not eof do
begin
infoText := infoText + Fields[0].AsString + #13#10;
next;
end;
end;
end;

Ролг Хупин,

на исключении