Como criar uma tabela a partir de uma procedure?

vc quer dizer, em um procedimento do DELPHI (não do IB) ... bom, tem várias maneiras, uma delas::

coloque e configure no form ou dataModule os componentes IBDatabase, IBTransaction e IBSQL e faça, no seu procedimento::


with IBSQL1 do
try
SQL.Text := ´CREATE TABLE {...bla,bla,bla...}´;
Transaction.StartTransaction;
ExecQuery;
finally
Transaction.Commit;
end;


se desejar executar vários comandos SQL de uma só vez use o componente IBScript.

T+

como eu faço para usar uma string para dar o nome da tabela?

grato pela ajuda,

o meu problema e que o valor de um campo anterior tem de ser concatenado e depois ser usado como nome da tabela recem criada

concatene a string no TEXTO do comando SQL q está montando. minha forma preferida é usando o comando format!

ex:;

const
SQL1 = ´create table ¬s ( ....bla,bla,bla... )´;

begin

{...}

IBSQL1.SQL.Text := Format(SQL1, [Edit1.Text]);

{...}


mas vc tb pode fazer algo como::

IBSQL1.SQL.Text := ´CREATE TABLE ´ + Edit1.Text + ´ (...bla,bla,bla...)´;



T+