sql create table modo de executação

10/12/2003

1

Caros colegas estou precisando criar tabelas no banco interbase em tempo de execução em um aplicativo em delphi 7, alguém sabe que componente do ibx usar e como fazer isto? tentei colocar o código ´create table...´ dentro da propriedade SQL do componente IBSQL da paleta InterBase do delphi 7, só que quando peso para executar o SQL dá o erro dominio não existente, alguém sabe tbm oque pode ser isto?

Agradeço qualquer ajuda!

André :?:


Responder

Posts

13/12/2003

Fabio.hc

Tente assim:

procedure TForm1.Button1Click(Sender: TObject);
begin
   IBQuery1.SQL.Text:=´CREATE TABLE ITENS1 ( ´+
                      ´ITE_CODIGO SMALLINT NOT NULL, ´+
                      ´ITE_MATERIAL VARCHAR(30));´;
   IBQuery1.SQL.Add(´ALTER TABLE ITENS1 ADD PRIMARY KEY (ITE_CODIGO); ´);
   IBQuery1.ExecSQL;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
   IBQuery1.SQL.Text:=´DROP TABLE ITENS1; ´;
   IBQuery1.ExecSQL;
end;





Responder
×
+1 DevUP
Acesso diário, +1 DevUP
Parabéns, você está investindo na sua carreira