FMBZ_ZSQLProcessor.Connection :=FMBZ_ZConnection;
FMBZ_ZSQLProcessor.Delimiter := ';';
FMBZ_ZSQLProcessor.DelimiterType := dtDelimiter;
FMBZ_ZSQLProcessor.Script.LoadFromFile('script.sql');
try
FMBZ_ZSQLProcessor.Execute;
ShowMessage('выполнен!');
except
ShowMessage('Ошибка!');
end;

Var
FMBZ_ZConnection : TZConnection;
FMBZ_ZSQLProcessor: TZSQLProcessor;
...
FMBZ_ZConnection.HostName := 'localhost';
FMBZ_ZConnection.Database := 'postgres';
FMBZ_ZConnection.User := 'postgres';
FMBZ_ZConnection.Password := 'bars1234';
FMBZ_ZConnection.Protocol := 'postgresql-9';
FMBZ_ZConnection.Port := 5432;
FMBZ_ZConnection.LoginPrompt := False;
FMBZ_ZConnection.Properties.Add('codepage=win1251');
FMBZ_ZConnection.Connect;
sleep(100);
FMBZ_ZSQLProcessor.Connection :=FMBZ_ZConnection;
FMBZ_ZSQLProcessor.Delimiter := ';';
FMBZ_ZSQLProcessor.DelimiterType := dtDelimiter;
FMBZ_ZSQLProcessor.Script.LoadFromFile('settings30.sql');
try
FMBZ_ZSQLProcessor.Execute;
ShowMessage('база данных создана!');
except
ShowMessage('база данных НЕ создана!');
end;

--Creating Role
SET client_encoding = 'UTF8';
DROP ROLE IF EXISTS FMBZ_userA;
CREATE ROLE FMBZ_userA WITH LOGIN PASSWORD 'FMBZ_userA' SUPERUSER CREATEDB CREATEROLE;
UPDATE pg_authid SET rolcatupdate=false WHERE rolname='FMBZ_userA';
COMMENT ON ROLE FMBZ_userA IS 'борисыч';

CREATE DATABASE "FMBZ_BaseA"
WITH OWNER=FMBZ_userA ENCODING='UTF8' TABLESPACE = DEFAULT;
COMMENT ON DATABASE "FMBZ_BaseA" IS 'database';

--Creating Role
SET client_encoding = 'UTF8';
CREATE SCHEMA FMBZ_userA AUTHORIZATION FMBZ_userA;
COMMENT ON SCHEMA FMBZ_userA IS 'contains таблицы';

CREATE TABLE FMBZ_userA.Table_AccountFIO (
id SERIAL NOT NULL,
id_AccountIdentifier numeric CONSTRAINT firstkey PRIMARY KEY,
id_LastName varchar(100),
id_FirstName varchar(100),
id_MiddleName varchar(100),
id_BirthDay varchar(10),
id_Center varchar(100),
id_State varchar(100),
id_Specialist varchar(100),
id_Manager varchar(100)
);
ALTER TABLE FMBZ_userA.Table_AccountFIO OWNER TO FMBZ_userA;

CREATE TABLE FMBZ_userA.Table_AccountMarried (
id SERIAL NOT NULL PRIMARY KEY,
id_AccountIdentifier numeric,
id_Married_LastName text,
id_Married_FirstName text,
id_Married_MiddleName text,
id_Married_Birthday text
);
ALTER TABLE FMBZ_userA.Table_AccountMarried OWNER TO FMBZ_userA;