Gravando dados em query

Question

Ol� pessoal,Estou trabalhando com o SQL 7.0  e Delphi 5. Tenho umas tabelas que s�o muito grandes e estou pensando em deixar de utilizar o TTable e passar a usar TQuery. Como fa�o para salvar as alter...

Wallace · Answer

Jos�,

Vc poderia comecar passando a propriedade RequestLive para True. Mas existem algumas restricoes no SQL, como:

* nao pode existir GROUP BY, HAVING.
* ORDER BY com uma coluna que nao possui indice
* nao pode usar distinct
* nao pode usar Join
* nao pode usar subquery

Bom... se isto nao for problema, tudo bem. D� para continuar. Bom... tem um probleminha com esta estrat�gica. Quando vc insere um registro, vc vai precisar fechar e abrir novamente a consulta. Infelizmente o conteudo do dataset � uma foto, e vc precisa atualiza-la. Na medida que vc for caminhando, vai descobrir que o recurso de CachedUpdates ser� muito interessante.

Bom... eu recomendo o seguinte: utilize o ClientDataSet. Lique ele num Provider e este �ltimo em uma Query. Utilize o providerflags dos fields da query e vc podera colocar join nesta �ltima. Utilize o cache do clientdataset e implementar interfaces sofisticadas.

Nao tem jeito. Se um dia vc tiver ue mudar para DBExpress, vai ter de dominar o ClientDataSet.

Anonymous · Answer

[quote:4200d4177f=�Jos�]Ol� pessoal,Estou trabalhando com o SQL 7.0 e Delphi 5. Tenho umas tabelas que s�o muito grandes e estou pensando em deixar de utilizar o TTable e passar a usar TQuery. Como fa�o para salvar as altera��es efetuadas na consulta direto no banco de dados ? Esta forma de trabalhar � segura ?Grato,Jos�[/quote:4200d4177f]Siga o exemplo que dara certo[color=blue:4200d4177f] SQL_Clientes.Close; SQL_Clientes.Sql.Clear; SQL_Clientes.SQL.ADD(� INSERT INTO Clientes �); SQL_Clientes.SQL.ADD(� (Cod_Cliente�); SQL_Clientes.SQL.ADD(� ,Cliente�); SQL_Clientes.SQL.ADD(� ,Endereco�); SQL_Clientes.SQL.ADD(� ,Municipio�); SQL_Clientes.SQL.ADD(� ,Bairro�); If ME_DataCad.Text <> (� / / �) Then SQL_Clientes.SQL.ADD(� ,DataCad�); SQL_Clientes.SQL.ADD(� ,Cep�); SQL_Clientes.SQL.ADD(� ,UF�); If ME_Fone.Text <> � ( XX ) - � Then SQL_Clientes.SQL.ADD(� ,Fone�); If ME_Celular.Text <> �( ) - � Then SQL_Clientes.SQL.ADD(� ,Celular�); SQL_Clientes.SQL.ADD(� ,InsEst�); If ME_CNPJ.Text <> � . . / - � Then SQL_Clientes.SQL.ADD(� ,CNPJ�); IF ME_CPF.Text <> � . . - � Then SQL_Clientes.SQL.ADD(� ,CPF�); SQL_Clientes.SQL.ADD(� ,Obs) �); SQL_Clientes.SQL.ADD(� VALUES (��+IntToStr(CodigoCliente)+�� ); SQL_Clientes.SQL.ADD(� ,��+Edit_Cliente.Text+�� ); SQL_Clientes.SQL.ADD(� ,��+Edit_Ender...

Anonymous · Answer

[quote:96e49a7e58=�Anonymous�][quote:96e49a7e58=�Jos�]Ol� pessoal,Estou trabalhando com o SQL 7.0 e Delphi 5. Tenho umas tabelas que s�o muito grandes e estou pensando em deixar de utilizar o TTable e passar a usar TQuery. Como fa�o para salvar as altera��es efetuadas na consulta direto no banco de dados ? Esta forma de trabalhar � segura ?Grato,Jos�[/quote:96e49a7e58]Siga o exemplo que dara certo[color=blue:96e49a7e58] SQL_Clientes.Close; SQL_Clientes.Sql.Clear; SQL_Clientes.SQL.ADD(� INSERT INTO Clientes �); SQL_Clientes.SQL.ADD(� (Cod_Cliente�); SQL_Clientes.SQL.ADD(� ,Cliente�); SQL_Clientes.SQL.ADD(� ,Endereco�); SQL_Clientes.SQL.ADD(� ,Municipio�); SQL_Clientes.SQL.ADD(� ,Bairro�); If ME_DataCad.Text <> (� / / �) Then SQL_Clientes.SQL.ADD(� ,DataCad�); SQL_Clientes.SQL.ADD(� ,Cep�); SQL_Clientes.SQL.ADD(� ,UF�); If ME_Fone.Text <> � ( XX ) - � Then SQL_Clientes.SQL.ADD(� ,Fone�); If ME_Celular.Text <> �( ) - � Then SQL_Clientes.SQL.ADD(� ,Celular�); SQL_Clientes.SQL.ADD(� ,InsEst�); If ME_CNPJ.Text <> � . . / - � Then SQL_Clientes.SQL.ADD(� ,CNPJ�); IF ME_CPF.Text <> � . . - � Then SQL_Clientes.SQL.ADD(� ,CPF�); SQL_Clientes.SQL.ADD(� ,Obs) �); SQL_Clientes.SQL.ADD(� VALUES (��+IntToStr(CodigoCliente)+�� ); SQL_Clientes.SQL.ADD(� ,��+Edit_Cliente.Text+�� ); SQL_Cli...

F�rum Gravando dados em query #151487