Re: [delphi-br] Duvida iniciante

2009-02-05 Por tôpico Mario Rodrigues
Daniel,

Sobre o tratamento, não tive como pois importei os dados dai vieram todos
malukos hehehe
agora cara nao funcionou o UpperCase ele so alterou os registros q estão em
caixa alta...o q eu gostaria mesmo era de alterar tanto em maiusculo quando
em minusculo...o update so afeta o q eu digito..se na clausula digito MARIO
so afeta o MARIO seu eu digitar Mario so afeta o Mario...

Mas cara...ta muito bem explicado e eu como iniciante consegui entender
bacana tudo...

no aguardo

2009/2/4 Daniel Sobrinho Laporte daniel.lapo...@gmail.com

   Bom vamos la em caso de minusculas ou maiusculas você trata no seu campo
 dbedit, edit ou qualquer coisa fazendo com que ele seja gravado maiusculo
 ou
 minsculo usando a propriedade CharCase e caso voce não queira tratar isso
 dessa maneira ainda há a possibilidade de forçar ser maiusculo na própria
 select.. dessa maneira :

 DataModule2.cds.CommandText := UpperCase('update tblCadastrado Set nome
 ='+QuotedStr('MARIO TESTE')+' Where nome = '+QuotedStr('MARIO'));

 Resultado vai ser :

 UPDATE TBLCADASTRADO SET NOME = MARIO TESTE WHERE NOME = MARIO

 Independente se está escrito com maiúsculo ou minúsculo..

 Em relação aos registros quando você faz do tipo DML( INSERT/ UPDATE /
 DELETE) você pode obter através do método se não me falha a memória é
 MeuDataSet.RowsAffected algo assim rs..quando é uma consulta normal você
 pode utilizar o MeuDataSet.RecordCount


 Abraços,
 Daniel

 2009/2/4 Mario Rodrigues 
 marioirodrig...@gmail.commarioirodrigues%40gmail.com
 

  Pooow galera..voltei de novo...
  são duas bronquinhas..uma é como fazer a pesquisa independente se é
  maiuscula ou miniscula
 
  DataModule2.cds.CommandText := 'update tblCadastrado Set nome
  ='+QuotedStr('MARIO TESTE')+' Where nome = '+QuotedStr('MARIO');
  independente se é MARIO ou Mario OU maRIO etc etc etc...
 
  e a outra é como fazer um count dos registros afetados...
  tenho assim
  DataModule2.cds.CommandText := 'update tblCadastrado Set nome
  ='+QuotedStr('MARIO TESTE')+' Where nome = '+QuotedStr('MARIO');
  DataModule2.cds.CommandText := 'update tblCadastrado Set nome
  ='+QuotedStr('MARIO TESTE')+' Where nome = '+QuotedStr('JOSE');
  DataModule2.cds.CommandText := 'update tblCadastrado Set nome
  ='+QuotedStr('MARIO TESTE')+' Where nome = '+QuotedStr('JOAO');
 
  dai quantos foram afetados?
 
  dei uma pesquisada e achei o comando ExecuteNonQuery() porem ele nao
 funfou
  nao...onde no exemplo ele retorno a quantidade de uma exclusao
 simples
 
  de novo novamente mais uma vez...valeu
 
  2009/2/4 Daniel Sobrinho Laporte 
  daniel.lapo...@gmail.comdaniel.laporte%40gmail.com
 daniel.laporte%40gmail.com
  
 
   Beleza então Mario precisando estamos ai !
  
   Abraços,
   Daniel
  
   2009/2/4 Mario Rodrigues 
   marioirodrig...@gmail.commarioirodrigues%40gmail.com
 marioirodrigues%40gmail.com
  marioirodrigues%40gmail.com
   
  
  
Daniel,
   
Valeu ajudou muito...
poAllowComandText = False..dai dei umas arrumadas no docigo e resolvi
sim...valeu
   
Andrei...era aquilo mesmo...flw tb cara...
   
2009/2/4 Daniel Sobrinho Laporte 
daniel.lapo...@gmail.comdaniel.laporte%40gmail.com
 daniel.laporte%40gmail.com
  daniel.laporte%40gmail.com

   daniel.laporte%40gmail.com

   
   
 Command Text change are not allowed é porque o seu datasetprovider
  que
 está
 ligado ao seu clientdataset não está com a opção poAllowComandText
 =
True.
 O
 ClientDataSet não possui um engine próprio de pesquisa, por isso
necessita
 de um dataset que faça esta função. Por isso você encontra

 SqlConnection (Ou componente qualquer de conexão)
 |
 SqlDataset(Ligado no sql connection)
 |
 DataSetProvider(Recebe o dataset)
 |
 ClientDataSet(Recebe o provider)

 Existem N modos de se fazer consultas via delphi embora eu não
   utilize
o
 commandtext do clientdataset, o funcionamento é este descrito.

 Espero poder ter te ajudado.

 Abraços,
 Daniel.


 2009/2/3 Mario Rodrigues 
 marioirodrig...@gmail.commarioirodrigues%40gmail.com
 marioirodrigues%40gmail.com
  marioirodrigues%40gmail.com
   marioirodrigues%40gmail.com
marioirodrigues%40gmail.com
 

  Andrei,
 
  deu o seguinte erro:
  Command text change are not allowed
  Diz q o comando nao é permitido...tirei o edit e alterei de post
  para
  execute...
 
  Bom dai o q eu fiz...ao inves de usar o client data set usei o
 TSQLQuery...
  Dai funcionou...
  valeu pela ajuda e paciencia Andrei
 
 
  2009/2/3 Andrei Luís 
  compuvale.softw...@gmail.comcompuvale.software%40gmail.com
 compuvale.software%40gmail.com
  compuvale.software%40gmail.com
   compuvale.software%40gmail.com
compuvale.software%40gmail.com
 compuvale.software%40gmail.com
  
 
   Mario,
  
   Não, tem coisa errada no seu código. Edit e Post estão
 sobrando.
   

Re: [delphi-br] Duvida iniciante

2009-02-04 Por tôpico Daniel Sobrinho Laporte
Command Text change are not allowed é porque o seu datasetprovider que está
ligado ao seu clientdataset não está com a opção poAllowComandText = True. O
ClientDataSet não possui um engine próprio de pesquisa, por isso necessita
de um dataset que faça esta função. Por isso você encontra

SqlConnection (Ou componente qualquer de conexão)
|
SqlDataset(Ligado no sql connection)
|
DataSetProvider(Recebe o dataset)
|
ClientDataSet(Recebe o provider)

Existem N modos de se fazer consultas via delphi embora eu não utilize o
commandtext do clientdataset, o funcionamento é este descrito.

Espero poder ter te ajudado.

Abraços,
Daniel.


2009/2/3 Mario Rodrigues marioirodrig...@gmail.com

   Andrei,

 deu o seguinte erro:
 Command text change are not allowed
 Diz q o comando nao é permitido...tirei o edit e alterei de post para
 execute...

 Bom dai o q eu fiz...ao inves de usar o client data set usei o TSQLQuery...
 Dai funcionou...
 valeu pela ajuda e paciencia Andrei


 2009/2/3 Andrei Luís 
 compuvale.softw...@gmail.comcompuvale.software%40gmail.com
 

  Mario,
 
  Não, tem coisa errada no seu código. Edit e Post estão sobrando. Tire o
  Edit, e troque o Post por Execute que deve funcionar.
 
  O Edit é pra você colocar o cds em modo de edição, mas não é o caso. O
 que
  você quer fazer é executar um comando sql.
 
 
  []
  Andrei
 
  2009/2/3 Mario Rodrigues 
  marioirodrig...@gmail.commarioirodrigues%40gmail.com
 marioirodrigues%40gmail.com
  
 
   Andrei,
  
   Pooow besteira nao acho q foi nao...pelo menos ja me deu uma luz...fiz
   assim:
  
   DataModule2.cds.Edit; //Coloquei isso pq estava dando erro de q nao
  estava
   em modo de edit ou insert..pode ser??
   DataModule2.cds.CommandText := 'update tblCadastrado Set nome
   ='+QuotedStr('MARIO TESTE')
   + ' Where nome = '+QuotedStr('MARIO');
   DataModule2.cds.Post;
   DataModule2.cds.ApplyUpdates(-1);
   DataModule2.cds.Refresh;
  
   Compila...sem erros..porem nao altera nada...algum motivo?...
   De pouco em pouco a gente chega la hehehe
  
   2009/2/3 Andrei Luís 
   compuvale.softw...@gmail.comcompuvale.software%40gmail.com
 compuvale.software%40gmail.com

  
  
Mário,
   
Basicamente você vai ter que colocar a mesma sql pra rodar.
   
Não utilizo dbExpress, vou te mostrar como eu faço no IBO:
   
Utilizando parâmetros: (fica mais organizado e limpo)
   
qrTMP.SQL.Text := 'update tblCadastrado Set nome = :wnomeNovo Where
  nome=
:wnomeAntigo';
qrTMP.ParamByName('wnomeNovo').asString := 'MARIO TESTE';
qrTMP.ParamByName('wnomeAntigo').asString := 'MARIO';
qrTMP.Execute;
qrTmp.ib_transaction.commitRetaining;
   
Sem utilizar parâmetros:
   
qrTMP.SQL.Text := 'update tblCadastrado Set nome ='+QuotedStr('MARIO
TESTE')
+ ' Where nome = '+QuotedStr('MARIO');
qrTMP.Execute;
qrTmp.ib_transaction.commitRetaining;
   
Creio que você possa jogar isso num TSQLQuery ou num TClientDataSet
(desculpe se falei besteira, mas é que realmente não manjo nada de
dbExpress).
   
   
[]
Andrei
   
2009/2/3 Mario Rodrigues 
marioirodrig...@gmail.commarioirodrigues%40gmail.com
 marioirodrigues%40gmail.com
  marioirodrigues%
   40gmail.com

   
 Andrei,

 Valeu...eu ja tinha visto em outro email q acho q foi o sr mesmo q
 enviou...
 procurei..mas nao consegui achar nada q fale disso...

 caso alguem ai possa me ajudar...
 vlw

 2009/2/3 Andrei Luís 
 compuvale.softw...@gmail.comcompuvale.software%40gmail.com
 compuvale.software%40gmail.com
  compuvale.software%
   40gmail.com
 


  Olá Mário,
 
  Veja se esse material te ajuda:
 
 

   
  
 
 http://www.4shared.com/file/72527475/4358aabb/curso_professor_pedro_souza.html
 
  São vídeo aulas de Delphi + Firebird + dbExpress, estão
 compactadas
   com
o
  7Zip.
 
  []
  Andrei
 
  2009/2/3 Mario Rodrigues 
  marioirodrig...@gmail.commarioirodrigues%40gmail.com
 marioirodrigues%40gmail.com
  marioirodrigues%
   40gmail.com
marioirodrigues%
 40gmail.com
  
 
 
   Salve a todos,
  
   Uso FB 2.1
   Delphi 7 + dbExpress
  
   Bom o q eu queria fazer é o seguinte...ao clicar no botao fazer
 alteração
   na
   base...
  
   Por exemplo:
  
   num update seria
  
   update tblCadastrado Set nome = 'MARIO TESTE'
   Where nome 'MARIO'
  
   so isso...
  
   pelo banco so isso resolveria...mas como estou aprendendo como
poderia
   fazer
   isso via delphi...
   num to pedindo o peixe pescado...se alguem ai tiver um
 *material/site/Ex
  de
   codig*o agradeceria...
  
   flwww
  
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 
 

 [As partes desta mensagem que não continham texto foram removidas]

  




-- 
Abraços,

Daniel.

Sempre que a vida lhe apresentar um desafio, 

Re: [delphi-br] Duvida iniciante

2009-02-04 Por tôpico Mario Rodrigues
Daniel,

Valeu ajudou muito...
poAllowComandText = False..dai dei umas arrumadas no docigo e resolvi
sim...valeu

Andrei...era aquilo mesmo...flw tb cara...

2009/2/4 Daniel Sobrinho Laporte daniel.lapo...@gmail.com

   Command Text change are not allowed é porque o seu datasetprovider que
 está
 ligado ao seu clientdataset não está com a opção poAllowComandText = True.
 O
 ClientDataSet não possui um engine próprio de pesquisa, por isso necessita
 de um dataset que faça esta função. Por isso você encontra

 SqlConnection (Ou componente qualquer de conexão)
 |
 SqlDataset(Ligado no sql connection)
 |
 DataSetProvider(Recebe o dataset)
 |
 ClientDataSet(Recebe o provider)

 Existem N modos de se fazer consultas via delphi embora eu não utilize o
 commandtext do clientdataset, o funcionamento é este descrito.

 Espero poder ter te ajudado.

 Abraços,
 Daniel.


 2009/2/3 Mario Rodrigues 
 marioirodrig...@gmail.commarioirodrigues%40gmail.com
 

  Andrei,
 
  deu o seguinte erro:
  Command text change are not allowed
  Diz q o comando nao é permitido...tirei o edit e alterei de post para
  execute...
 
  Bom dai o q eu fiz...ao inves de usar o client data set usei o
 TSQLQuery...
  Dai funcionou...
  valeu pela ajuda e paciencia Andrei
 
 
  2009/2/3 Andrei Luís 
  compuvale.softw...@gmail.comcompuvale.software%40gmail.com
 compuvale.software%40gmail.com
  
 
   Mario,
  
   Não, tem coisa errada no seu código. Edit e Post estão sobrando. Tire o
   Edit, e troque o Post por Execute que deve funcionar.
  
   O Edit é pra você colocar o cds em modo de edição, mas não é o caso. O
  que
   você quer fazer é executar um comando sql.
  
  
   []
   Andrei
  
   2009/2/3 Mario Rodrigues 
   marioirodrig...@gmail.commarioirodrigues%40gmail.com
 marioirodrigues%40gmail.com
  marioirodrigues%40gmail.com
   
  
Andrei,
   
Pooow besteira nao acho q foi nao...pelo menos ja me deu uma
 luz...fiz
assim:
   
DataModule2.cds.Edit; //Coloquei isso pq estava dando erro de q nao
   estava
em modo de edit ou insert..pode ser??
DataModule2.cds.CommandText := 'update tblCadastrado Set nome
='+QuotedStr('MARIO TESTE')
+ ' Where nome = '+QuotedStr('MARIO');
DataModule2.cds.Post;
DataModule2.cds.ApplyUpdates(-1);
DataModule2.cds.Refresh;
   
Compila...sem erros..porem nao altera nada...algum motivo?...
De pouco em pouco a gente chega la hehehe
   
2009/2/3 Andrei Luís 
compuvale.softw...@gmail.comcompuvale.software%40gmail.com
 compuvale.software%40gmail.com
  compuvale.software%40gmail.com
 
   
   
 Mário,

 Basicamente você vai ter que colocar a mesma sql pra rodar.

 Não utilizo dbExpress, vou te mostrar como eu faço no IBO:

 Utilizando parâmetros: (fica mais organizado e limpo)

 qrTMP.SQL.Text := 'update tblCadastrado Set nome = :wnomeNovo Where
   nome=
 :wnomeAntigo';
 qrTMP.ParamByName('wnomeNovo').asString := 'MARIO TESTE';
 qrTMP.ParamByName('wnomeAntigo').asString := 'MARIO';
 qrTMP.Execute;
 qrTmp.ib_transaction.commitRetaining;

 Sem utilizar parâmetros:

 qrTMP.SQL.Text := 'update tblCadastrado Set nome
 ='+QuotedStr('MARIO
 TESTE')
 + ' Where nome = '+QuotedStr('MARIO');
 qrTMP.Execute;
 qrTmp.ib_transaction.commitRetaining;

 Creio que você possa jogar isso num TSQLQuery ou num TClientDataSet
 (desculpe se falei besteira, mas é que realmente não manjo nada de
 dbExpress).


 []
 Andrei

 2009/2/3 Mario Rodrigues 
 marioirodrig...@gmail.commarioirodrigues%40gmail.com
 marioirodrigues%40gmail.com
  marioirodrigues%40gmail.com
   marioirodrigues%
40gmail.com
 

  Andrei,
 
  Valeu...eu ja tinha visto em outro email q acho q foi o sr mesmo
 q
  enviou...
  procurei..mas nao consegui achar nada q fale disso...
 
  caso alguem ai possa me ajudar...
  vlw
 
  2009/2/3 Andrei Luís 
  compuvale.softw...@gmail.comcompuvale.software%40gmail.com
 compuvale.software%40gmail.com
  compuvale.software%40gmail.com

   compuvale.software%
40gmail.com
  
 
 
   Olá Mário,
  
   Veja se esse material te ajuda:
  
  
 

   
  
 
 http://www.4shared.com/file/72527475/4358aabb/curso_professor_pedro_souza.html
  
   São vídeo aulas de Delphi + Firebird + dbExpress, estão
  compactadas
com
 o
   7Zip.
  
   []
   Andrei
  
   2009/2/3 Mario Rodrigues 
   marioirodrig...@gmail.commarioirodrigues%40gmail.com
 marioirodrigues%40gmail.com
  marioirodrigues%40gmail.com
   marioirodrigues%
40gmail.com
 marioirodrigues%
  40gmail.com
   
  
  
Salve a todos,
   
Uso FB 2.1
Delphi 7 + dbExpress
   
Bom o q eu queria fazer é o seguinte...ao clicar no botao
 fazer
  alteração
na
base...
   
Por exemplo:
   
num update 

Re: [delphi-br] Duvida iniciante

2009-02-04 Por tôpico Daniel Sobrinho Laporte
Beleza então Mario precisando estamos ai !

Abraços,
Daniel

2009/2/4 Mario Rodrigues marioirodrig...@gmail.com

   Daniel,

 Valeu ajudou muito...
 poAllowComandText = False..dai dei umas arrumadas no docigo e resolvi
 sim...valeu

 Andrei...era aquilo mesmo...flw tb cara...

 2009/2/4 Daniel Sobrinho Laporte 
 daniel.lapo...@gmail.comdaniel.laporte%40gmail.com
 


  Command Text change are not allowed é porque o seu datasetprovider que
  está
  ligado ao seu clientdataset não está com a opção poAllowComandText =
 True.
  O
  ClientDataSet não possui um engine próprio de pesquisa, por isso
 necessita
  de um dataset que faça esta função. Por isso você encontra
 
  SqlConnection (Ou componente qualquer de conexão)
  |
  SqlDataset(Ligado no sql connection)
  |
  DataSetProvider(Recebe o dataset)
  |
  ClientDataSet(Recebe o provider)
 
  Existem N modos de se fazer consultas via delphi embora eu não utilize
 o
  commandtext do clientdataset, o funcionamento é este descrito.
 
  Espero poder ter te ajudado.
 
  Abraços,
  Daniel.
 
 
  2009/2/3 Mario Rodrigues 
  marioirodrig...@gmail.commarioirodrigues%40gmail.com
 marioirodrigues%40gmail.com
  
 
   Andrei,
  
   deu o seguinte erro:
   Command text change are not allowed
   Diz q o comando nao é permitido...tirei o edit e alterei de post para
   execute...
  
   Bom dai o q eu fiz...ao inves de usar o client data set usei o
  TSQLQuery...
   Dai funcionou...
   valeu pela ajuda e paciencia Andrei
  
  
   2009/2/3 Andrei Luís 
   compuvale.softw...@gmail.comcompuvale.software%40gmail.com
 compuvale.software%40gmail.com
  compuvale.software%40gmail.com
   
  
Mario,
   
Não, tem coisa errada no seu código. Edit e Post estão sobrando. Tire
 o
Edit, e troque o Post por Execute que deve funcionar.
   
O Edit é pra você colocar o cds em modo de edição, mas não é o caso.
 O
   que
você quer fazer é executar um comando sql.
   
   
[]
Andrei
   
2009/2/3 Mario Rodrigues 
marioirodrig...@gmail.commarioirodrigues%40gmail.com
 marioirodrigues%40gmail.com
  marioirodrigues%40gmail.com
   marioirodrigues%40gmail.com

   
 Andrei,

 Pooow besteira nao acho q foi nao...pelo menos ja me deu uma
  luz...fiz
 assim:

 DataModule2.cds.Edit; //Coloquei isso pq estava dando erro de q nao
estava
 em modo de edit ou insert..pode ser??
 DataModule2.cds.CommandText := 'update tblCadastrado Set nome
 ='+QuotedStr('MARIO TESTE')
 + ' Where nome = '+QuotedStr('MARIO');
 DataModule2.cds.Post;
 DataModule2.cds.ApplyUpdates(-1);
 DataModule2.cds.Refresh;

 Compila...sem erros..porem nao altera nada...algum motivo?...
 De pouco em pouco a gente chega la hehehe

 2009/2/3 Andrei Luís 
 compuvale.softw...@gmail.comcompuvale.software%40gmail.com
 compuvale.software%40gmail.com
  compuvale.software%40gmail.com
   compuvale.software%40gmail.com
  


  Mário,
 
  Basicamente você vai ter que colocar a mesma sql pra rodar.
 
  Não utilizo dbExpress, vou te mostrar como eu faço no IBO:
 
  Utilizando parâmetros: (fica mais organizado e limpo)
 
  qrTMP.SQL.Text := 'update tblCadastrado Set nome = :wnomeNovo
 Where
nome=
  :wnomeAntigo';
  qrTMP.ParamByName('wnomeNovo').asString := 'MARIO TESTE';
  qrTMP.ParamByName('wnomeAntigo').asString := 'MARIO';
  qrTMP.Execute;
  qrTmp.ib_transaction.commitRetaining;
 
  Sem utilizar parâmetros:
 
  qrTMP.SQL.Text := 'update tblCadastrado Set nome
  ='+QuotedStr('MARIO
  TESTE')
  + ' Where nome = '+QuotedStr('MARIO');
  qrTMP.Execute;
  qrTmp.ib_transaction.commitRetaining;
 
  Creio que você possa jogar isso num TSQLQuery ou num
 TClientDataSet
  (desculpe se falei besteira, mas é que realmente não manjo nada
 de
  dbExpress).
 
 
  []
  Andrei
 
  2009/2/3 Mario Rodrigues 
  marioirodrig...@gmail.commarioirodrigues%40gmail.com
 marioirodrigues%40gmail.com
  marioirodrigues%40gmail.com
   marioirodrigues%40gmail.com
marioirodrigues%
 40gmail.com
  
 
   Andrei,
  
   Valeu...eu ja tinha visto em outro email q acho q foi o sr
 mesmo
  q
   enviou...
   procurei..mas nao consegui achar nada q fale disso...
  
   caso alguem ai possa me ajudar...
   vlw
  
   2009/2/3 Andrei Luís 
   compuvale.softw...@gmail.comcompuvale.software%40gmail.com
 compuvale.software%40gmail.com
  compuvale.software%40gmail.com
   compuvale.software%40gmail.com
 
compuvale.software%
 40gmail.com
   
  
  
Olá Mário,
   
Veja se esse material te ajuda:
   
   
  
 

   
  
 
 http://www.4shared.com/file/72527475/4358aabb/curso_professor_pedro_souza.html
   
São vídeo aulas de Delphi + Firebird + dbExpress, estão
   compactadas
 com
  o
7Zip.
   
[]
Andrei
  

Re: [delphi-br] Duvida iniciante

2009-02-04 Por tôpico Mario Rodrigues
Pooow galera..voltei de novo...
são duas bronquinhas..uma é como fazer a pesquisa independente se é
maiuscula ou miniscula
DataModule2.cds.CommandText := 'update tblCadastrado Set nome
='+QuotedStr('MARIO TESTE')+' Where nome = '+QuotedStr('MARIO');
independente se é MARIO ou Mario OU maRIO etc etc etc...

e a outra é como fazer um count dos registros afetados...
tenho assim
DataModule2.cds.CommandText := 'update tblCadastrado Set nome
='+QuotedStr('MARIO TESTE')+' Where nome = '+QuotedStr('MARIO');
DataModule2.cds.CommandText := 'update tblCadastrado Set nome
='+QuotedStr('MARIO TESTE')+' Where nome = '+QuotedStr('JOSE');
DataModule2.cds.CommandText := 'update tblCadastrado Set nome
='+QuotedStr('MARIO TESTE')+' Where nome = '+QuotedStr('JOAO');

dai quantos foram afetados?

dei uma pesquisada e achei o comando ExecuteNonQuery() porem ele nao funfou
nao...onde no exemplo ele retorno a quantidade de uma exclusao simples

de novo novamente mais uma vez...valeu


2009/2/4 Daniel Sobrinho Laporte daniel.lapo...@gmail.com

   Beleza então Mario precisando estamos ai !

 Abraços,
 Daniel

 2009/2/4 Mario Rodrigues 
 marioirodrig...@gmail.commarioirodrigues%40gmail.com
 


  Daniel,
 
  Valeu ajudou muito...
  poAllowComandText = False..dai dei umas arrumadas no docigo e resolvi
  sim...valeu
 
  Andrei...era aquilo mesmo...flw tb cara...
 
  2009/2/4 Daniel Sobrinho Laporte 
  daniel.lapo...@gmail.comdaniel.laporte%40gmail.com
 daniel.laporte%40gmail.com
  
 
 
   Command Text change are not allowed é porque o seu datasetprovider que
   está
   ligado ao seu clientdataset não está com a opção poAllowComandText =
  True.
   O
   ClientDataSet não possui um engine próprio de pesquisa, por isso
  necessita
   de um dataset que faça esta função. Por isso você encontra
  
   SqlConnection (Ou componente qualquer de conexão)
   |
   SqlDataset(Ligado no sql connection)
   |
   DataSetProvider(Recebe o dataset)
   |
   ClientDataSet(Recebe o provider)
  
   Existem N modos de se fazer consultas via delphi embora eu não
 utilize
  o
   commandtext do clientdataset, o funcionamento é este descrito.
  
   Espero poder ter te ajudado.
  
   Abraços,
   Daniel.
  
  
   2009/2/3 Mario Rodrigues 
   marioirodrig...@gmail.commarioirodrigues%40gmail.com
 marioirodrigues%40gmail.com
  marioirodrigues%40gmail.com
   
  
Andrei,
   
deu o seguinte erro:
Command text change are not allowed
Diz q o comando nao é permitido...tirei o edit e alterei de post para
execute...
   
Bom dai o q eu fiz...ao inves de usar o client data set usei o
   TSQLQuery...
Dai funcionou...
valeu pela ajuda e paciencia Andrei
   
   
2009/2/3 Andrei Luís 
compuvale.softw...@gmail.comcompuvale.software%40gmail.com
 compuvale.software%40gmail.com
  compuvale.software%40gmail.com
   compuvale.software%40gmail.com

   
 Mario,

 Não, tem coisa errada no seu código. Edit e Post estão sobrando.
 Tire
  o
 Edit, e troque o Post por Execute que deve funcionar.

 O Edit é pra você colocar o cds em modo de edição, mas não é o
 caso.
  O
que
 você quer fazer é executar um comando sql.


 []
 Andrei

 2009/2/3 Mario Rodrigues 
 marioirodrig...@gmail.commarioirodrigues%40gmail.com
 marioirodrigues%40gmail.com
  marioirodrigues%40gmail.com
   marioirodrigues%40gmail.com
marioirodrigues%40gmail.com
 

  Andrei,
 
  Pooow besteira nao acho q foi nao...pelo menos ja me deu uma
   luz...fiz
  assim:
 
  DataModule2.cds.Edit; //Coloquei isso pq estava dando erro de q
 nao
 estava
  em modo de edit ou insert..pode ser??
  DataModule2.cds.CommandText := 'update tblCadastrado Set nome
  ='+QuotedStr('MARIO TESTE')
  + ' Where nome = '+QuotedStr('MARIO');
  DataModule2.cds.Post;
  DataModule2.cds.ApplyUpdates(-1);
  DataModule2.cds.Refresh;
 
  Compila...sem erros..porem nao altera nada...algum motivo?...
  De pouco em pouco a gente chega la hehehe
 
  2009/2/3 Andrei Luís 
  compuvale.softw...@gmail.comcompuvale.software%40gmail.com
 compuvale.software%40gmail.com
  compuvale.software%40gmail.com
   compuvale.software%40gmail.com
compuvale.software%40gmail.com
   
 
 
   Mário,
  
   Basicamente você vai ter que colocar a mesma sql pra rodar.
  
   Não utilizo dbExpress, vou te mostrar como eu faço no IBO:
  
   Utilizando parâmetros: (fica mais organizado e limpo)
  
   qrTMP.SQL.Text := 'update tblCadastrado Set nome = :wnomeNovo
  Where
 nome=
   :wnomeAntigo';
   qrTMP.ParamByName('wnomeNovo').asString := 'MARIO TESTE';
   qrTMP.ParamByName('wnomeAntigo').asString := 'MARIO';
   qrTMP.Execute;
   qrTmp.ib_transaction.commitRetaining;
  
   Sem utilizar parâmetros:
  
   qrTMP.SQL.Text := 'update tblCadastrado Set nome
   ='+QuotedStr('MARIO
   TESTE')
   + ' Where nome = 

Re: [delphi-br] Duvida iniciante

2009-02-04 Por tôpico Daniel Sobrinho Laporte
Bom vamos la em caso de minusculas ou maiusculas você trata no seu campo
dbedit, edit ou qualquer coisa fazendo com que ele seja gravado maiusculo ou
minsculo usando a propriedade CharCase e caso voce não queira tratar isso
dessa maneira ainda há a possibilidade de forçar ser maiusculo na própria
select.. dessa maneira :

DataModule2.cds.CommandText := UpperCase('update tblCadastrado Set nome
='+QuotedStr('MARIO TESTE')+' Where nome = '+QuotedStr('MARIO'));

Resultado vai ser :

UPDATE TBLCADASTRADO SET NOME = MARIO TESTE WHERE NOME = MARIO

Independente se está escrito com maiúsculo ou minúsculo..

Em relação aos registros quando você faz do tipo DML( INSERT/ UPDATE /
DELETE) você pode obter através do método se não me falha a memória é
MeuDataSet.RowsAffected algo assim rs..quando é uma consulta normal você
pode utilizar o MeuDataSet.RecordCount

Abraços,
Daniel

2009/2/4 Mario Rodrigues marioirodrig...@gmail.com

   Pooow galera..voltei de novo...
 são duas bronquinhas..uma é como fazer a pesquisa independente se é
 maiuscula ou miniscula

 DataModule2.cds.CommandText := 'update tblCadastrado Set nome
 ='+QuotedStr('MARIO TESTE')+' Where nome = '+QuotedStr('MARIO');
 independente se é MARIO ou Mario OU maRIO etc etc etc...

 e a outra é como fazer um count dos registros afetados...
 tenho assim
 DataModule2.cds.CommandText := 'update tblCadastrado Set nome
 ='+QuotedStr('MARIO TESTE')+' Where nome = '+QuotedStr('MARIO');
 DataModule2.cds.CommandText := 'update tblCadastrado Set nome
 ='+QuotedStr('MARIO TESTE')+' Where nome = '+QuotedStr('JOSE');
 DataModule2.cds.CommandText := 'update tblCadastrado Set nome
 ='+QuotedStr('MARIO TESTE')+' Where nome = '+QuotedStr('JOAO');

 dai quantos foram afetados?

 dei uma pesquisada e achei o comando ExecuteNonQuery() porem ele nao funfou
 nao...onde no exemplo ele retorno a quantidade de uma exclusao simples

 de novo novamente mais uma vez...valeu

 2009/2/4 Daniel Sobrinho Laporte 
 daniel.lapo...@gmail.comdaniel.laporte%40gmail.com
 

  Beleza então Mario precisando estamos ai !
 
  Abraços,
  Daniel
 
  2009/2/4 Mario Rodrigues 
  marioirodrig...@gmail.commarioirodrigues%40gmail.com
 marioirodrigues%40gmail.com
  
 
 
   Daniel,
  
   Valeu ajudou muito...
   poAllowComandText = False..dai dei umas arrumadas no docigo e resolvi
   sim...valeu
  
   Andrei...era aquilo mesmo...flw tb cara...
  
   2009/2/4 Daniel Sobrinho Laporte 
   daniel.lapo...@gmail.comdaniel.laporte%40gmail.com
 daniel.laporte%40gmail.com
  daniel.laporte%40gmail.com
   
  
  
Command Text change are not allowed é porque o seu datasetprovider
 que
está
ligado ao seu clientdataset não está com a opção poAllowComandText =
   True.
O
ClientDataSet não possui um engine próprio de pesquisa, por isso
   necessita
de um dataset que faça esta função. Por isso você encontra
   
SqlConnection (Ou componente qualquer de conexão)
|
SqlDataset(Ligado no sql connection)
|
DataSetProvider(Recebe o dataset)
|
ClientDataSet(Recebe o provider)
   
Existem N modos de se fazer consultas via delphi embora eu não
  utilize
   o
commandtext do clientdataset, o funcionamento é este descrito.
   
Espero poder ter te ajudado.
   
Abraços,
Daniel.
   
   
2009/2/3 Mario Rodrigues 
marioirodrig...@gmail.commarioirodrigues%40gmail.com
 marioirodrigues%40gmail.com
  marioirodrigues%40gmail.com
   marioirodrigues%40gmail.com

   
 Andrei,

 deu o seguinte erro:
 Command text change are not allowed
 Diz q o comando nao é permitido...tirei o edit e alterei de post
 para
 execute...

 Bom dai o q eu fiz...ao inves de usar o client data set usei o
TSQLQuery...
 Dai funcionou...
 valeu pela ajuda e paciencia Andrei


 2009/2/3 Andrei Luís 
 compuvale.softw...@gmail.comcompuvale.software%40gmail.com
 compuvale.software%40gmail.com
  compuvale.software%40gmail.com
   compuvale.software%40gmail.com
compuvale.software%40gmail.com
 

  Mario,
 
  Não, tem coisa errada no seu código. Edit e Post estão sobrando.
  Tire
   o
  Edit, e troque o Post por Execute que deve funcionar.
 
  O Edit é pra você colocar o cds em modo de edição, mas não é o
  caso.
   O
 que
  você quer fazer é executar um comando sql.
 
 
  []
  Andrei
 
  2009/2/3 Mario Rodrigues 
  marioirodrig...@gmail.commarioirodrigues%40gmail.com
 marioirodrigues%40gmail.com
  marioirodrigues%40gmail.com
   marioirodrigues%40gmail.com
marioirodrigues%40gmail.com
 marioirodrigues%40gmail.com
  
 
   Andrei,
  
   Pooow besteira nao acho q foi nao...pelo menos ja me deu uma
luz...fiz
   assim:
  
   DataModule2.cds.Edit; //Coloquei isso pq estava dando erro de q
  nao
  estava
   em modo de edit ou insert..pode ser??
   DataModule2.cds.CommandText := 'update tblCadastrado Set nome
   

Re: [delphi-br] Duvida iniciante

2009-02-03 Por tôpico Andrei Luís
Olá Mário,

Veja se esse material te ajuda:
http://www.4shared.com/file/72527475/4358aabb/curso_professor_pedro_souza.html

São vídeo aulas de Delphi + Firebird + dbExpress, estão compactadas com o
7Zip.

[]
Andrei

2009/2/3 Mario Rodrigues marioirodrig...@gmail.com

 Salve a todos,

 Uso FB 2.1
 Delphi 7 + dbExpress

 Bom o q eu queria fazer é o seguinte...ao clicar no botao fazer alteração
 na
 base...

 Por exemplo:

 num update seria

 update tblCadastrado Set nome = 'MARIO TESTE'
 Where nome 'MARIO'

 so isso...

 pelo banco so isso resolveria...mas como estou aprendendo como poderia
 fazer
 isso via delphi...
 num to pedindo o peixe pescado...se alguem ai tiver um *material/site/Ex de
 codig*o agradeceria...

 flwww




[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Duvida iniciante

2009-02-03 Por tôpico Mario Rodrigues
Salve a todos,

Uso FB 2.1
Delphi 7 + dbExpress

Bom o q eu queria fazer é o seguinte...ao clicar no botao fazer alteração na
base...

Por exemplo:

num update seria

update tblCadastrado Set nome = 'MARIO TESTE'
Where nome 'MARIO'

so isso...

pelo banco so isso resolveria...mas como estou aprendendo como poderia fazer
isso via delphi...
num to pedindo o peixe pescado...se alguem ai tiver um *material/site/Ex de
codig*o agradeceria...

flwww


[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Duvida iniciante

2009-02-03 Por tôpico Mario Rodrigues
Andrei,

Valeu...eu ja tinha visto em outro email q acho q foi o sr mesmo q enviou...
procurei..mas nao consegui achar nada q fale disso...

caso alguem ai possa me ajudar...
vlw

2009/2/3 Andrei Luís compuvale.softw...@gmail.com

   Olá Mário,

 Veja se esse material te ajuda:

 http://www.4shared.com/file/72527475/4358aabb/curso_professor_pedro_souza.html

 São vídeo aulas de Delphi + Firebird + dbExpress, estão compactadas com o
 7Zip.

 []
 Andrei

 2009/2/3 Mario Rodrigues 
 marioirodrig...@gmail.commarioirodrigues%40gmail.com
 


  Salve a todos,
 
  Uso FB 2.1
  Delphi 7 + dbExpress
 
  Bom o q eu queria fazer é o seguinte...ao clicar no botao fazer alteração
  na
  base...
 
  Por exemplo:
 
  num update seria
 
  update tblCadastrado Set nome = 'MARIO TESTE'
  Where nome 'MARIO'
 
  so isso...
 
  pelo banco so isso resolveria...mas como estou aprendendo como poderia
  fazer
  isso via delphi...
  num to pedindo o peixe pescado...se alguem ai tiver um *material/site/Ex
 de
  codig*o agradeceria...
 
  flwww
 
 

 [As partes desta mensagem que não continham texto foram removidas]

  



[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Duvida iniciante

2009-02-03 Por tôpico Mario Rodrigues
Andrei,

deu o seguinte erro:
Command text change are not allowed
Diz q o comando nao é permitido...tirei o edit e alterei de post para
execute...

Bom dai o q eu fiz...ao inves de usar o client data set usei o TSQLQuery...
Dai funcionou...
valeu pela ajuda e paciencia Andrei

2009/2/3 Andrei Luís compuvale.softw...@gmail.com

   Mario,

 Não, tem coisa errada no seu código. Edit e Post estão sobrando. Tire o
 Edit, e troque o Post por Execute que deve funcionar.

 O Edit é pra você colocar o cds em modo de edição, mas não é o caso. O que
 você quer fazer é executar um comando sql.


 []
 Andrei

 2009/2/3 Mario Rodrigues 
 marioirodrig...@gmail.commarioirodrigues%40gmail.com
 

  Andrei,
 
  Pooow besteira nao acho q foi nao...pelo menos ja me deu uma luz...fiz
  assim:
 
  DataModule2.cds.Edit; //Coloquei isso pq estava dando erro de q nao
 estava
  em modo de edit ou insert..pode ser??
  DataModule2.cds.CommandText := 'update tblCadastrado Set nome
  ='+QuotedStr('MARIO TESTE')
  + ' Where nome = '+QuotedStr('MARIO');
  DataModule2.cds.Post;
  DataModule2.cds.ApplyUpdates(-1);
  DataModule2.cds.Refresh;
 
  Compila...sem erros..porem nao altera nada...algum motivo?...
  De pouco em pouco a gente chega la hehehe
 
  2009/2/3 Andrei Luís 
  compuvale.softw...@gmail.comcompuvale.software%40gmail.com
 
 
   Mário,
  
   Basicamente você vai ter que colocar a mesma sql pra rodar.
  
   Não utilizo dbExpress, vou te mostrar como eu faço no IBO:
  
   Utilizando parâmetros: (fica mais organizado e limpo)
  
   qrTMP.SQL.Text := 'update tblCadastrado Set nome = :wnomeNovo Where
 nome=
   :wnomeAntigo';
   qrTMP.ParamByName('wnomeNovo').asString := 'MARIO TESTE';
   qrTMP.ParamByName('wnomeAntigo').asString := 'MARIO';
   qrTMP.Execute;
   qrTmp.ib_transaction.commitRetaining;
  
   Sem utilizar parâmetros:
  
   qrTMP.SQL.Text := 'update tblCadastrado Set nome ='+QuotedStr('MARIO
   TESTE')
   + ' Where nome = '+QuotedStr('MARIO');
   qrTMP.Execute;
   qrTmp.ib_transaction.commitRetaining;
  
   Creio que você possa jogar isso num TSQLQuery ou num TClientDataSet
   (desculpe se falei besteira, mas é que realmente não manjo nada de
   dbExpress).
  
  
   []
   Andrei
  
   2009/2/3 Mario Rodrigues 
   marioirodrig...@gmail.commarioirodrigues%40gmail.com
 marioirodrigues%
  40gmail.com
   
  
Andrei,
   
Valeu...eu ja tinha visto em outro email q acho q foi o sr mesmo q
enviou...
procurei..mas nao consegui achar nada q fale disso...
   
caso alguem ai possa me ajudar...
vlw
   
2009/2/3 Andrei Luís 
compuvale.softw...@gmail.comcompuvale.software%40gmail.com
 compuvale.software%
  40gmail.com

   
   
 Olá Mário,

 Veja se esse material te ajuda:


   
  
 
 http://www.4shared.com/file/72527475/4358aabb/curso_professor_pedro_souza.html

 São vídeo aulas de Delphi + Firebird + dbExpress, estão compactadas
  com
   o
 7Zip.

 []
 Andrei

 2009/2/3 Mario Rodrigues 
 marioirodrig...@gmail.commarioirodrigues%40gmail.com
 marioirodrigues%
  40gmail.com
   marioirodrigues%
40gmail.com
 


  Salve a todos,
 
  Uso FB 2.1
  Delphi 7 + dbExpress
 
  Bom o q eu queria fazer é o seguinte...ao clicar no botao fazer
alteração
  na
  base...
 
  Por exemplo:
 
  num update seria
 
  update tblCadastrado Set nome = 'MARIO TESTE'
  Where nome 'MARIO'
 
  so isso...
 
  pelo banco so isso resolveria...mas como estou aprendendo como
   poderia
  fazer
  isso via delphi...
  num to pedindo o peixe pescado...se alguem ai tiver um
*material/site/Ex
 de
  codig*o agradeceria...
 
  flwww
 

 [As partes desta mensagem que não continham texto foram removidas]

  



[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Duvida iniciante

2009-02-03 Por tôpico Mario Rodrigues
Andrei,

Pooow besteira nao acho q foi nao...pelo menos ja me deu uma luz...fiz
assim:

DataModule2.cds.Edit; //Coloquei isso pq estava dando erro de q nao estava
em modo de edit ou insert..pode ser??
DataModule2.cds.CommandText := 'update tblCadastrado Set nome
='+QuotedStr('MARIO TESTE')
+ ' Where nome = '+QuotedStr('MARIO');
DataModule2.cds.Post;
DataModule2.cds.ApplyUpdates(-1);
DataModule2.cds.Refresh;

Compila...sem erros..porem nao altera nada...algum motivo?...
De pouco em pouco a gente chega la hehehe

2009/2/3 Andrei Luís compuvale.softw...@gmail.com

   Mário,

 Basicamente você vai ter que colocar a mesma sql pra rodar.

 Não utilizo dbExpress, vou te mostrar como eu faço no IBO:

 Utilizando parâmetros: (fica mais organizado e limpo)

 qrTMP.SQL.Text := 'update tblCadastrado Set nome = :wnomeNovo Where nome=
 :wnomeAntigo';
 qrTMP.ParamByName('wnomeNovo').asString := 'MARIO TESTE';
 qrTMP.ParamByName('wnomeAntigo').asString := 'MARIO';
 qrTMP.Execute;
 qrTmp.ib_transaction.commitRetaining;

 Sem utilizar parâmetros:

 qrTMP.SQL.Text := 'update tblCadastrado Set nome ='+QuotedStr('MARIO
 TESTE')
 + ' Where nome = '+QuotedStr('MARIO');
 qrTMP.Execute;
 qrTmp.ib_transaction.commitRetaining;

 Creio que você possa jogar isso num TSQLQuery ou num TClientDataSet
 (desculpe se falei besteira, mas é que realmente não manjo nada de
 dbExpress).


 []
 Andrei

 2009/2/3 Mario Rodrigues 
 marioirodrig...@gmail.commarioirodrigues%40gmail.com
 

  Andrei,
 
  Valeu...eu ja tinha visto em outro email q acho q foi o sr mesmo q
  enviou...
  procurei..mas nao consegui achar nada q fale disso...
 
  caso alguem ai possa me ajudar...
  vlw
 
  2009/2/3 Andrei Luís 
  compuvale.softw...@gmail.comcompuvale.software%40gmail.com
 
 
   Olá Mário,
  
   Veja se esse material te ajuda:
  
  
 
 http://www.4shared.com/file/72527475/4358aabb/curso_professor_pedro_souza.html
  
   São vídeo aulas de Delphi + Firebird + dbExpress, estão compactadas com
 o
   7Zip.
  
   []
   Andrei
  
   2009/2/3 Mario Rodrigues 
   marioirodrig...@gmail.commarioirodrigues%40gmail.com
 marioirodrigues%
  40gmail.com
   
  
  
Salve a todos,
   
Uso FB 2.1
Delphi 7 + dbExpress
   
Bom o q eu queria fazer é o seguinte...ao clicar no botao fazer
  alteração
na
base...
   
Por exemplo:
   
num update seria
   
update tblCadastrado Set nome = 'MARIO TESTE'
Where nome 'MARIO'
   
so isso...
   
pelo banco so isso resolveria...mas como estou aprendendo como
 poderia
fazer
isso via delphi...
num to pedindo o peixe pescado...se alguem ai tiver um
  *material/site/Ex
   de
codig*o agradeceria...
   
flwww
   
 

 [As partes desta mensagem que não continham texto foram removidas]

  



[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Duvida iniciante

2009-02-03 Por tôpico Andrei Luís
Mário,

Basicamente você vai ter que colocar a mesma sql pra rodar.

Não utilizo dbExpress, vou te mostrar como eu faço no IBO:

Utilizando parâmetros:  (fica mais organizado e limpo)

qrTMP.SQL.Text := 'update tblCadastrado Set nome = :wnomeNovo Where nome=
:wnomeAntigo';
qrTMP.ParamByName('wnomeNovo').asString :=  'MARIO TESTE';
qrTMP.ParamByName('wnomeAntigo').asString := 'MARIO';
qrTMP.Execute;
qrTmp.ib_transaction.commitRetaining;



Sem utilizar parâmetros:

qrTMP.SQL.Text := 'update tblCadastrado Set nome ='+QuotedStr('MARIO TESTE')
+ ' Where nome = '+QuotedStr('MARIO');
qrTMP.Execute;
qrTmp.ib_transaction.commitRetaining;


Creio que você possa jogar isso num TSQLQuery ou num TClientDataSet
(desculpe se falei besteira, mas é que realmente não manjo nada de
dbExpress).


[]
Andrei





2009/2/3 Mario Rodrigues marioirodrig...@gmail.com

 Andrei,

 Valeu...eu ja tinha visto em outro email q acho q foi o sr mesmo q
 enviou...
 procurei..mas nao consegui achar nada q fale disso...

 caso alguem ai possa me ajudar...
 vlw

 2009/2/3 Andrei Luís compuvale.softw...@gmail.com

Olá Mário,
 
  Veja se esse material te ajuda:
 
 
 http://www.4shared.com/file/72527475/4358aabb/curso_professor_pedro_souza.html
 
  São vídeo aulas de Delphi + Firebird + dbExpress, estão compactadas com o
  7Zip.
 
  []
  Andrei
 
  2009/2/3 Mario Rodrigues marioirodrig...@gmail.commarioirodrigues%
 40gmail.com
  
 
 
   Salve a todos,
  
   Uso FB 2.1
   Delphi 7 + dbExpress
  
   Bom o q eu queria fazer é o seguinte...ao clicar no botao fazer
 alteração
   na
   base...
  
   Por exemplo:
  
   num update seria
  
   update tblCadastrado Set nome = 'MARIO TESTE'
   Where nome 'MARIO'
  
   so isso...
  
   pelo banco so isso resolveria...mas como estou aprendendo como poderia
   fazer
   isso via delphi...
   num to pedindo o peixe pescado...se alguem ai tiver um
 *material/site/Ex
  de
   codig*o agradeceria...
  
   flwww
  



[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Duvida iniciante

2009-02-03 Por tôpico Andrei Luís
Mario,

Não, tem coisa errada no seu código. Edit e Post estão sobrando. Tire o
Edit, e troque o Post por Execute que deve funcionar.

O Edit é pra você colocar o cds em modo de edição, mas não é o caso. O que
você quer fazer é executar um comando sql.

[]
Andrei

2009/2/3 Mario Rodrigues marioirodrig...@gmail.com

 Andrei,

 Pooow besteira nao acho q foi nao...pelo menos ja me deu uma luz...fiz
 assim:

 DataModule2.cds.Edit; //Coloquei isso pq estava dando erro de q nao estava
 em modo de edit ou insert..pode ser??
 DataModule2.cds.CommandText := 'update tblCadastrado Set nome
 ='+QuotedStr('MARIO TESTE')
 + ' Where nome = '+QuotedStr('MARIO');
 DataModule2.cds.Post;
 DataModule2.cds.ApplyUpdates(-1);
 DataModule2.cds.Refresh;

 Compila...sem erros..porem nao altera nada...algum motivo?...
 De pouco em pouco a gente chega la hehehe

 2009/2/3 Andrei Luís compuvale.softw...@gmail.com

Mário,
 
  Basicamente você vai ter que colocar a mesma sql pra rodar.
 
  Não utilizo dbExpress, vou te mostrar como eu faço no IBO:
 
  Utilizando parâmetros: (fica mais organizado e limpo)
 
  qrTMP.SQL.Text := 'update tblCadastrado Set nome = :wnomeNovo Where nome=
  :wnomeAntigo';
  qrTMP.ParamByName('wnomeNovo').asString := 'MARIO TESTE';
  qrTMP.ParamByName('wnomeAntigo').asString := 'MARIO';
  qrTMP.Execute;
  qrTmp.ib_transaction.commitRetaining;
 
  Sem utilizar parâmetros:
 
  qrTMP.SQL.Text := 'update tblCadastrado Set nome ='+QuotedStr('MARIO
  TESTE')
  + ' Where nome = '+QuotedStr('MARIO');
  qrTMP.Execute;
  qrTmp.ib_transaction.commitRetaining;
 
  Creio que você possa jogar isso num TSQLQuery ou num TClientDataSet
  (desculpe se falei besteira, mas é que realmente não manjo nada de
  dbExpress).
 
 
  []
  Andrei
 
  2009/2/3 Mario Rodrigues marioirodrig...@gmail.commarioirodrigues%
 40gmail.com
  
 
   Andrei,
  
   Valeu...eu ja tinha visto em outro email q acho q foi o sr mesmo q
   enviou...
   procurei..mas nao consegui achar nada q fale disso...
  
   caso alguem ai possa me ajudar...
   vlw
  
   2009/2/3 Andrei Luís compuvale.softw...@gmail.comcompuvale.software%
 40gmail.com
  
  
Olá Mário,
   
Veja se esse material te ajuda:
   
   
  
 
 http://www.4shared.com/file/72527475/4358aabb/curso_professor_pedro_souza.html
   
São vídeo aulas de Delphi + Firebird + dbExpress, estão compactadas
 com
  o
7Zip.
   
[]
Andrei
   
2009/2/3 Mario Rodrigues marioirodrig...@gmail.commarioirodrigues%
 40gmail.com
  marioirodrigues%
   40gmail.com

   
   
 Salve a todos,

 Uso FB 2.1
 Delphi 7 + dbExpress

 Bom o q eu queria fazer é o seguinte...ao clicar no botao fazer
   alteração
 na
 base...

 Por exemplo:

 num update seria

 update tblCadastrado Set nome = 'MARIO TESTE'
 Where nome 'MARIO'

 so isso...

 pelo banco so isso resolveria...mas como estou aprendendo como
  poderia
 fazer
 isso via delphi...
 num to pedindo o peixe pescado...se alguem ai tiver um
   *material/site/Ex
de
 codig*o agradeceria...

 flwww



[As partes desta mensagem que não continham texto foram removidas]



Res: [delphi-br] Duvida iniciante

2009-02-03 Por tôpico Silvio Clécio
Olá pessoal,

Caramba cara!! Acho que uma vez vc postou sobre esse material só que eu não 
baixei, hj fiz o download do arquivo (no formato 7z) e quando descompactei, um 
material massa!

Andrei, eu posso inserir o demo Vendas na sessão de downloads do BlogSite 
[http://silvioprog.blogspot.com/] ?

E outra, inserir o link [http://www.4shared. com/file/ 72527475/ 4358aabb/ 
curso_professor_ pedro_souza. html] na sessão [Sites/Links/Listas/Blogs/] ?

Se vc permitir cara isso vai ajudar muito a galera, estou sempre atualizando o 
BlogSite com novidades, e sobre material grátis. :D

[]'s, Silvio Clécio
---
Linux User: #481900
Skype: silvioprog
ICQ: 432519902
E-mail, Y! Messenger: silviop...@yahoo.com.br
Gmail, GTalk: silviop...@gmail.com
Hotmail, MSN: silviop...@hotmail.com
BlogSpot: http://silvioclecio.blogspot.com/
BlogSite: http://silvioprog.blogspot.com/
°oO| Seja livre,  use Linux! |Oo°




De: Andrei Luís compuvale.softw...@gmail.com
Para: delphi-br@yahoogrupos.com.br
Enviadas: Terça-feira, 3 de Fevereiro de 2009 14:57:18
Assunto: Re: [delphi-br] Duvida iniciante


Olá Mário,

Veja se esse material te ajuda:
http://www.4shared. com/file/ 72527475/ 4358aabb/ curso_professor_ pedro_souza. 
html

São vídeo aulas de Delphi + Firebird + dbExpress, estão compactadas com o
7Zip.

[]
Andrei


  Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] duvida iniciante

2005-03-24 Por tôpico marcio de Souza

Eu gostaria de saber qual a ferramenta que os colegas usam para modelagem de 
banco de dados tanto para paradox como para firebird e se poderiam me indicar 
onde eu consigo, (de preferencia as que forem gratuitas).
 
Agadeço
Marcio.


-
Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora!

[As partes desta mensagem que não continham texto foram removidas]



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





[delphi-br] DUVIDA INICIANTE-(INSTALAÇÃO)

2004-12-01 Por tôpico marcio de Souza

Eu gostaria de saber como eu faço para não ter que copiar as dll do Zeos por 
exemplo, para o diretório do Sistem do Windows.
 
O que me  aconteceu é que eu fiz um Cadastro de Clientes  usando Firebird com 
componente Zeos, e quando eu fui fazer a instalação no cliente ele isnalou 
normal, mas quando tentei entrar no programa ele acusou que tava faltando as 
Dll do Zeos as que vc coloca no diretório lib do delphi. E só funcionou quando 
eu coloquei as Dll no Sistem do Windows. 
 
Agradeço se algum colega puder me ajudar.
 
Marcio.



-
Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora!

[As partes desta mensagem que não continham texto foram removidas]



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] DUVIDA INICIANTE-(INSTALAÇÃO)

2004-12-01 Por tôpico Maicon Gabriel

Você pode colocar as DLL's de acesso em qualquer pasta que esteja
'apontada' na variavel de Ambiente PATH. Os diretorios do Windows
e tambem o System32 estão 'apontados' nesta variavel! E é claro,
você pode colocar estas DLL's tambem, na pasta em que o executável
esta rodando.
Você pode verificar o conteudo da PATH, apenas digitando path na
linha de comando e a configuração da mesma depende do 'Windows' que
você esta utilizando.


On Wed, 1 Dec 2004 18:19:42 -0300 (ART), marcio de Souza
[EMAIL PROTECTED] wrote:
 
 Eu gostaria de saber como eu faço para não ter que copiar as dll do Zeos por 
 exemplo, para o diretório do Sistem do Windows.
 
 O que me  aconteceu é que eu fiz um Cadastro de Clientes  usando Firebird com 
 componente Zeos, e quando eu fui fazer a instalação no cliente ele isnalou 
 normal, mas quando tentei entrar no programa ele acusou que tava faltando as 
 Dll do Zeos as que vc coloca no diretório lib do delphi. E só funcionou 
 quando eu coloquei as Dll no Sistem do Windows.
 
 Agradeço se algum colega puder me ajudar.
 
 Marcio.
 
 -
 Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora!
 
 [As partes desta mensagem que não continham texto foram removidas]
 
 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
 Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages
 
 Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
 Links do Yahoo! Grupos
 
 
 
 



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html