[delphi-br] [Ajuda] Problemas com forms e checkbox!

2008-10-29 Por tôpico Douglas Takahara
Boa tarde,

Estou com o seguinte problema.
Tenho dois forms...
Vou considerá-los como Form1 e Form2 para mellhor entendimento.
No Form1 eu tenho um Button que no envento Onclick ele chama o Form2.
No Form2 eu mostro uma mensagem para um usuário em um label e mais em
baixo no form tenho um checkbox com o texto: Não mostrar essa
mensagem novamente!
Eu gostaria que quando tivesse marcado esse checkbox o Form2 não fosse
mais chamado pelo Form1.


Abaixo o código que estou utilizando:

No evento onclick do Form1:
begin
if (FmAviso.CheckBox1.Checked=False) then begin
Form2.Show;   
end;
end;

OK! Eu aperto o botão e mostra o Form2 e deixo marcado o checkbox.

Bom, o problema é que quando eu fecho o programa e abro novamente ele
volta do início.
Gostaria que ele salvasse e deixasse o checkbox marcado para não ser
mostrado o Form2 novamente.

Obrigado.




[delphi-br] Re: [Ajuda] Impressora.

2008-09-11 Por tôpico Douglas Takahara
--- Em delphi-br@yahoogrupos.com.br, Antonio Alexandre 
[EMAIL PROTECTED] escreveu

 Você pode fazer o conteudo inteiro da impressão virar um .pdf
 ai logo apos vc imprimir...
 ai vc não terá problemas com impressão desalinhada e textos fora do
 esquadro.
 
 2008/9/8 Douglas Takahara [EMAIL PROTECTED]
 
Boa tarde,
 
  Estou com o seguinte problema...
  Tenho um formulário pré impresso na qual o usuário preenche os 
campos
  pedidos como nome, endereço, etc...
  Fiz um sistema para que ele não preenchesse a mão esse formulário 
e
  sim digitasse no sistema para depois imprimir,,,
  Acontece que eu configurei às margens, tamanho do papel, etc .. em
  uma determinada impressora...
 
  Porém, se eu imprimo em impressoras diferentes, os dados saem
  um pouco acima ou abaixo da configuração... Quanto a largura 
todas
  as impressões saem idênticas..
 
  Existe alguma forma de se ter um padrão para que esses dados 
saiam
  como configurados??
  Eu já verifiquei tamanho do papel, margens, etc...
  Eu testei em uma impressora Lexmark , uma HP, e outra da marca
  Brother´s... todas à laser..
 
  Obrigado.
 
   
 
 
 
 
 -- 
 -=- Antonio Alexandre -=-
 -=--=- SoYJoU -=--=-
 -=--=--=--=- -=--=--=--=-
 -=-
 
 
 [As partes desta mensagem que não continham texto foram removidas]

 Boa tarde,

Estou upando o tópico, já que não consegui resolver...
Acredito que alguém já deve ter passado por isso...
Já tentei exportar pra word, em pdf e nada...
O erro fica na altura mesmo..
Em algumas impressoras o texto sai mais em cima e em outras mais 
embaixo..  Na parte da largura,está saindo rigorasamente igual... 
Estou com problemas na altura...
Preciso de ajuda..


Obrigado.




[delphi-br] [Ajuda] Impressora.

2008-09-08 Por tôpico Douglas Takahara
Boa tarde,

Estou com o seguinte problema...
Tenho um formulário pré impresso na qual o usuário preenche os campos 
pedidos como nome, endereço, etc...
Fiz um sistema para que ele não preenchesse a mão esse formulário e 
sim digitasse no sistema para depois imprimir,,,
Acontece que eu configurei às margens, tamanho do papel, etc .. em 
uma determinada impressora...

Porém, se eu imprimo em  impressoras diferentes, os dados saem 
um pouco acima ou abaixo da configuração... Quanto a largura todas 
as impressões saem idênticas..

Existe alguma forma de se ter um padrão para que esses dados saiam 
como configurados??
Eu já verifiquei tamanho do papel, margens, etc...
Eu testei em uma impressora Lexmark , uma HP,  e outra da marca 
Brother´s... todas à laser..

Obrigado.





[delphi-br] Re: [Ajuda] Impressora.

2008-09-08 Por tôpico Douglas Takahara
Antonio Alexandre, 

Obrigado pela ajuda, porém já tinha feito isso antes e não funcionou...
Eu acho estranho isso, já que existem normas da ABNT ,por exemplo, e
era pra estar funcionandoo..


--- Em delphi-br@yahoogrupos.com.br, Antonio Alexandre
[EMAIL PROTECTED] escreveu

 Você pode fazer o conteudo inteiro da impressão virar um .pdf
 ai logo apos vc imprimir...
 ai vc não terá problemas com impressão desalinhada e textos fora do
 esquadro.
 
 2008/9/8 Douglas Takahara [EMAIL PROTECTED]
 
Boa tarde,
 
  Estou com o seguinte problema...
  Tenho um formulário pré impresso na qual o usuário preenche os campos
  pedidos como nome, endereço, etc...
  Fiz um sistema para que ele não preenchesse a mão esse formulário e
  sim digitasse no sistema para depois imprimir,,,
  Acontece que eu configurei às margens, tamanho do papel, etc .. em
  uma determinada impressora...
 
  Porém, se eu imprimo em impressoras diferentes, os dados saem
  um pouco acima ou abaixo da configuração... Quanto a largura todas
  as impressões saem idênticas..
 
  Existe alguma forma de se ter um padrão para que esses dados saiam
  como configurados??
  Eu já verifiquei tamanho do papel, margens, etc...
  Eu testei em uma impressora Lexmark , uma HP, e outra da marca
  Brother´s... todas à laser..
 
  Obrigado.
 
   
 
 
 
 
 -- 
 -=- Antonio Alexandre -=-
 -=--=- SoYJoU -=--=-
 -=--=--=--=- -=--=--=--=-
 -=-
 
 
 [As partes desta mensagem que não continham texto foram removidas]





[delphi-br] [Ajuda] Edit

2008-08-21 Por tôpico Douglas Takahara
BOm dia pessoal,

Estou precisando da seguinte ajuda,

Tenho um edit e nele coloco na propriedade text,
dd/mm/, por exemplo,gostaria que quando o usuário clicasse nesse
edit esse texto sumisse ou então ficasse todo selecionado facilitando
assim a inserção de dados do usuário.
Alguém tem como me ajudar e fora isso tem outra sugestão?




[delphi-br] Re: Problemas com consultas (MS Access)

2008-08-18 Por tôpico Douglas Takahara
Obrigado pela ajuda,
mas o que eu quero é isso quase isso que vc falou, a n ser pelo fato
que quero que mostre do 21ª  registro cadastrado de uma determinada
propriedade... 











--- Em delphi-br@yahoogrupos.com.br, Carlos [EMAIL PROTECTED] escreveu

 Vamos ver se eu entendi(já vou avisando que Access não é minha praia).
 Você tem uma tabela onde cadastra animais
 
 tb_animal
 cod_animal
 tipo
 raca
 propriedade
 idade
 peso
 doenca
 
 Então você faz uma consulta para ver os animais de uma determinada
 propriedade, e depois efetua outra consulta, onde você quer contar os
 animais desta mesma propriedade, mas que o cod_animal seja maior que 20
 
 Então não seria mais fácil se você fizesse assim:
 
 Select 
   cod_animal, tipo, raca, propriedade, idade, peso, count(doenca) as
 Cont_doenca  
 from 
   tb_animal 
 where 
   (cod_animal  20) and
   (propriedade = :pPropr) and
   (doenca = :pDoenca)
 Group by
   tipo
 
 Não sei se falei besteira(mas caso tenha dito, releve), pois entendi
 que você quer contar animais(COD_ANIMAL), sendo um determinado tipo de
 animal(campo BEZERRA_TUBER) que possuam uma determinada doença , então
 você passa o parâmetro que COD_ANIMAL tem que ser maior que 20, e
 creio que você tenha um cadastro de propriedades, então é só fazer um
 LookUpComboBox com as propriedades, e outro para as doenças, e
 pronto(eu acho).
 
 Caso contrário, seja mais explicito na questão para que assim possamos
 ajuda-lo.
 Fraterno abraço.
 Carlos





[delphi-br] Problemas com consultas (MS Access)

2008-08-15 Por tôpico Douglas Takahara
Boa tarde,

Estou com o seguinte problema...
Tenho uma tabela Animais que contém campos COD_ANIMAL,
PROPRIEDADE, RAÇÃ , IDADE...

Estou fazendo duas consultas
A primeira consulta eu mostro apenas os animais de uma determinada
propriedade.. 
Depois eu faço uma outra consulta utilizando a primeira consulta já
feita e add uma crítica para aparecer somente a partir do 21ª animal
cadastrado..
Estou utilizando a função CInt(DCount(''COD_ANIMAL'',''BEZERRA_TUBER
'',''COD_ANIMAL =''  [COD_ANIMAL]20)) ..

No access funciona, só que agora gostaria de passar para o delphi em
forma sql...

Tem alguma forma de eu fazer isso?
eu já tentei fazer com UNION mas n da certo




[delphi-br] Saber quantos registros foram retornados em uma consulta sql!!

2008-07-28 Por tôpico Douglas Takahara
Boa noite,

Gostaria de saber como faço para saber quantos registros foram
retornados em uma consulta..

por exemplo
select * from table where campo1=campo1;

gostaria de saber como faço uma condição caso ele retornar mais de 20
registros por exemplo;

eu estou usando access e sqlquery...

eu tentei 

if sqlquery.recordcount 20 then
begin

ShowMessage('registros20')
end else

showMessage('registro 20')


porém n funcionou




[delphi-br] Numerção Automática!!

2008-07-25 Por tôpico Douglas Takahara
 Boa tarde,

Estou com o seguinte problema,
Eu tenho um banco de dados em access e em uma dessa tabelas eu tenho
um   campo q está como chave primária e  como auto incremento...

Acontece que quando eu  tento deletar algum registro pelo delphi da a
seguinte mensagem:
sql_no_data

acredito que o erro está na propriedade..
eu tentei como string, como int, como long int...
mas nenhuma

alguma sugestão?




RES: [delphi-br] Re: Exclusão dbgrid!!

2008-07-18 Por tôpico Douglas Takahara
eu tinha feito isso...
agora estou com duvidas no sqldelete..
coloquei 
delete from user where cpf:=cpf;
no meu botão eu coloquei..
sqlquery.delete;
sqlquery.applyupdates(-1);
Porém, ele n está funcionando..



--- Em delphi-br@yahoogrupos.com.br, Davi Eduardo Borges Wall
[EMAIL PROTECTED] escreveu

 Você associa um DataSet ao grid pelo DataSource.
 
  
 
 Basta fazer, Grid.DataSource.DataSet.Delete;
 
  
 
 []'s
 
  
 
 
 
 De: delphi-br@yahoogrupos.com.br
[mailto:[EMAIL PROTECTED] Em nome de Douglas Takahara
 Enviada em: quinta-feira, 17 de julho de 2008 15:22
 Para: delphi-br@yahoogrupos.com.br
 Assunto: [delphi-br] Re: Exclusão dbgrid!!
 
  
 
 Bom..
 Agora que percebi..
 na verdade ele sempre apaga o primeiro registro que esta no dbgrid
 eu gostaria que ele apagasse a determinada linha selecionada
 
 --- Em delphi-br@yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br , Douglas Takahara
 douglashideki@ escreveu
 
  Rubem,
  
  Com relação a primeira pergunta , acredito que realmente o selected
  field n corresponde ao campo que contém cpf.. 
  
  Quanto a segunda pergunta..
  sim , eu abro e fecho novamente a consulta...
  
  
  
  
  --- Em delphi-br@yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br , Rubem Nascimento da Rocha
  djpardalrocha@ escreveu
  
   
   Acho que vc está cometendo um equivoco. Vc usa DBGrid.SelectedField
  para pegar o valor da chave (por assim dizer) que será usada para a
  exclusão, mas será que o SelectedField do DBGrid, no momento da
  deleção, corresponde mesmo ao campo que contém o CPF? Outra coisa,
  depois da deleção, vc fecha e depois abre a consulta do DBGrid?
   
   Sds.
   
   
To: delphi-br@yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br 
From: douglashideki@
Date: Wed, 16 Jul 2008 17:07:55 +
Subject: [delphi-br] Exclusão dbgrid!!


Boa tarde,

Estou tentando excluir uma linha do dbgrid por um button,
coloquei o
seguinte:

if MessageDlg ('Tem certeza que deseja excluir a
informação?',mtConfirmation,[mbYes,mbNo],0)= mrYes then begin

with DataModule.SQLQuery do begin
close;
sql.Clear;
SQL.Add('DELETE FROM TABLE WHERE CPF =
'+QuotedStr(DBGrid.SelectedField.AsString)+' ');
ExecSQL;


Close;

end;

Showmessage('Registro excluí­do com sucesso!');
end
Else
Showmessage('Operação cancelada!');

Gostaria de quando o usuario clicasse neese buton fosse deletado a
linha selecionada... Acontece que deletar até deleta, mas ás
 vezes nao
delete a linha que está selecionada...

essa parte +QuotedStr(DBGrid.SelectedField.AsString)+' eh assim
mesmo?



   
   __
   Instale a Barra de Ferramentas com Desktop Search e ganhe EMOTICONS
  para o Messenger! É GRÁTIS!
   http://www.msn.com.br/emoticonpack
http://www.msn.com.br/emoticonpack 
  
 
 
  
 
 
 
 [As partes desta mensagem que não continham texto foram removidas]





[delphi-br] Re: Exclusão dbgrid!!

2008-07-17 Por tôpico Douglas Takahara
Vinicius Santos,

Obrigado pelo chute, porém minha tabela tem chaves primárias sim.



--- Em delphi-br@yahoogrupos.com.br, Vinicius Santos - MSI
[EMAIL PROTECTED] escreveu

 Desculpa me intrometer, eu não estou acompanhando este Post
 vou dar um belo de um chute, sua tabela tem chaves primárias ?? se
não tiver chaves primárias, provavelmente é isso !
 
 Vinicius dos Santos
 Blog: http://tuplas.blogspot.com
 http://www.msisolucoes.com.br
 
   - Original Message - 
   From: Douglas Takahara 
   To: delphi-br@yahoogrupos.com.br 
   Sent: Wednesday, July 16, 2008 6:49 PM
   Subject: [delphi-br] Re: Exclusão dbgrid!!
 
 
   Daniel Bastos,
 
   Eu consigo deletar os dados, porem nem sempre deleta os dados que eu
   quero.. eu seleciono a field que eu quero deletar, por exemplo, porem
   n deleta o field que selecionei e sim outro.
 
   --- Em delphi-br@yahoogrupos.com.br, Daniel Bastos danbastos@
   escreveu
   
Um chute.. até pq não trabalho a um tempo com dbx :)
Será que este delete não pode estar pendente de um commit?
Pq se ele atualiza os dados e não aparece, pode estar usando o
   isolamento
transacional ReadCommited. Mas, sem commit, realmente não
aparecerá no
dbgrid.

Abs.
Daniel A. Bastos

2008/7/16 Douglas Takahara douglashideki@:

 Rubem,

 Com relação a primeira pergunta , acredito que realmente o
selected
 field n corresponde ao campo que contém cpf..

 Quanto a segunda pergunta..
 sim , eu abro e fecho novamente a consulta...

 --- Em delphi-br@yahoogrupos.com.br
delphi-br%40yahoogrupos.com.br,
 Rubem Nascimento da Rocha
 djpardalrocha@ escreveu

 
 
  Acho que vc está cometendo um equivoco. Vc usa
DBGrid.SelectedField
 para pegar o valor da chave (por assim dizer) que será usada
para a
 exclusão, mas será que o SelectedField do DBGrid, no momento da
 deleção, corresponde mesmo ao campo que contém o CPF? Outra coisa,
 depois da deleção, vc fecha e depois abre a consulta do DBGrid?
 
  Sds.
 
  
   To: delphi-br@yahoogrupos.com.br
delphi-br%40yahoogrupos.com.br
   From: douglashideki@

   Date: Wed, 16 Jul 2008 17:07:55 +
   Subject: [delphi-br] Exclusão dbgrid!!
  
  
   Boa tarde,
  
   Estou tentando excluir uma linha do dbgrid por um button,
   coloquei o
   seguinte:
  
   if MessageDlg ('Tem certeza que deseja excluir a
   informação?',mtConfirmation,[mbYes,mbNo],0)= mrYes then begin
  
   with DataModule.SQLQuery do begin
   close;
   sql.Clear;
   SQL.Add('DELETE FROM TABLE WHERE CPF =
   '+QuotedStr(DBGrid.SelectedField.AsString)+' ');
   ExecSQL;
  
  
   Close;
  
   end;
  
   Showmessage('Registro excluí­do com sucesso!');
   end
   Else
   Showmessage('Operação cancelada!');
  
   Gostaria de quando o usuario clicasse neese buton fosse
deletado a
   linha selecionada... Acontece que deletar até deleta, mas ás
   vezes nao
   delete a linha que está selecionada...
  
   essa parte +QuotedStr(DBGrid.SelectedField.AsString)+'
eh assim
   mesmo?
  
  
  
 
  __
  Instale a Barra de Ferramentas com Desktop Search e ganhe
EMOTICONS
 para o Messenger! É GRÁTIS!
  http://www.msn.com.br/emoticonpack
 

 



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

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





[delphi-br] Re: Exclusão dbgrid!!

2008-07-17 Por tôpico Douglas Takahara
eh o seguinte...
eu tentei do jeito que vc falou  e n deu certoo...

eu tenho o dbgrid com dados de usuário por exemplo, como campos., cpf,
nome, rg, etc...
Eu gostaria que se fosse necessário deletaria a linha selecionada do
dbgrid...


--- Em delphi-br@yahoogrupos.com.br, Vinicius Santos - MSI
[EMAIL PROTECTED] escreveu

 Eu li o histórico do post
 Pq vc não pega o CPF, diretamente da tabela ??
 
 SQL.Add('DELETE FROM TABLE WHERE CPF =' +
QuotedStr(TabelaCPF.AsString)) ;
 
 Qual o motivo, de vc querer pegar o campo selecionado ?? isso
resolveria seu problema cara !
 
 Vinicius dos Santos
 Blog: http://tuplas.blogspot.com
 http://www.msisolucoes.com.br
 
 
   - Original Message - 
   From: Douglas Takahara 
   To: delphi-br@yahoogrupos.com.br 
   Sent: Thursday, July 17, 2008 9:17 AM
   Subject: [delphi-br] Re: Exclusão dbgrid!!
 
 
   Vinicius Santos,
 
   Obrigado pelo chute, porém minha tabela tem chaves primárias sim.
 
   --- Em delphi-br@yahoogrupos.com.br, Vinicius Santos - MSI
   vinicius@ escreveu
   
Desculpa me intrometer, eu não estou acompanhando este Post
vou dar um belo de um chute, sua tabela tem chaves primárias ?? se
   não tiver chaves primárias, provavelmente é isso !

Vinicius dos Santos
Blog: http://tuplas.blogspot.com
http://www.msisolucoes.com.br

- Original Message - 
From: Douglas Takahara 
To: delphi-br@yahoogrupos.com.br 
Sent: Wednesday, July 16, 2008 6:49 PM
Subject: [delphi-br] Re: Exclusão dbgrid!!


Daniel Bastos,

Eu consigo deletar os dados, porem nem sempre deleta os dados que eu
quero.. eu seleciono a field que eu quero deletar, por exemplo,
porem
n deleta o field que selecionei e sim outro.

--- Em delphi-br@yahoogrupos.com.br, Daniel Bastos danbastos@
escreveu

 Um chute.. até pq não trabalho a um tempo com dbx :)
 Será que este delete não pode estar pendente de um commit?
 Pq se ele atualiza os dados e não aparece, pode estar usando o
isolamento
 transacional ReadCommited. Mas, sem commit, realmente não
   aparecerá no
 dbgrid.
 
 Abs.
 Daniel A. Bastos
 
 2008/7/16 Douglas Takahara douglashideki@:
 
  Rubem,
 
  Com relação a primeira pergunta , acredito que realmente o
   selected
  field n corresponde ao campo que contém cpf..
 
  Quanto a segunda pergunta..
  sim , eu abro e fecho novamente a consulta...
 
  --- Em delphi-br@yahoogrupos.com.br
   delphi-br%40yahoogrupos.com.br,
  Rubem Nascimento da Rocha
  djpardalrocha@ escreveu
 
  
  
   Acho que vc está cometendo um equivoco. Vc usa
   DBGrid.SelectedField
  para pegar o valor da chave (por assim dizer) que será usada
   para a
  exclusão, mas será que o SelectedField do DBGrid, no momento da
  deleção, corresponde mesmo ao campo que contém o CPF? Outra
coisa,
  depois da deleção, vc fecha e depois abre a consulta do DBGrid?
  
   Sds.
  
   
To: delphi-br@yahoogrupos.com.br
   delphi-br%40yahoogrupos.com.br
From: douglashideki@
 
Date: Wed, 16 Jul 2008 17:07:55 +
Subject: [delphi-br] Exclusão dbgrid!!
   
   
Boa tarde,
   
Estou tentando excluir uma linha do dbgrid por um button,
coloquei o
seguinte:
   
if MessageDlg ('Tem certeza que deseja excluir a
informação?',mtConfirmation,[mbYes,mbNo],0)= mrYes then
begin
   
with DataModule.SQLQuery do begin
close;
sql.Clear;
SQL.Add('DELETE FROM TABLE WHERE CPF =
'+QuotedStr(DBGrid.SelectedField.AsString)+' ');
ExecSQL;
   
   
Close;
   
end;
   
Showmessage('Registro excluí­do com sucesso!');
end
Else
Showmessage('Operação cancelada!');
   
Gostaria de quando o usuario clicasse neese buton fosse
   deletado a
linha selecionada... Acontece que deletar até deleta, mas ás
vezes nao
delete a linha que está selecionada...
   
essa parte +QuotedStr(DBGrid.SelectedField.AsString)+'
   eh assim
mesmo?
   
   
   
  
   __
   Instale a Barra de Ferramentas com Desktop Search e ganhe
   EMOTICONS
  para o Messenger! É GRÁTIS!
   http://www.msn.com.br/emoticonpack
  
 
  
 
 
 
 [As partes desta mensagem que não continham texto foram removidas]






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

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





[delphi-br] Re: Exclusão dbgrid!!

2008-07-17 Por tôpico Douglas Takahara
Bom..
Agora que percebi..
na verdade ele sempre apaga o primeiro registro que esta no dbgrid
eu gostaria que ele apagasse a determinada linha selecionada

--- Em delphi-br@yahoogrupos.com.br, Douglas Takahara
[EMAIL PROTECTED] escreveu

 Rubem,
 
 Com relação a primeira pergunta , acredito que realmente o selected
 field n corresponde ao campo que contém cpf.. 
 
 Quanto a segunda pergunta..
 sim , eu abro e fecho novamente a consulta...
 
 
 
 
 --- Em delphi-br@yahoogrupos.com.br, Rubem Nascimento da Rocha
 djpardalrocha@ escreveu
 
  
  Acho que vc está cometendo um equivoco. Vc usa DBGrid.SelectedField
 para pegar o valor da chave (por assim dizer) que será usada para a
 exclusão, mas será que o SelectedField do DBGrid, no momento da
 deleção, corresponde mesmo ao campo que contém o CPF? Outra coisa,
 depois da deleção, vc fecha e depois abre a consulta do DBGrid?
  
  Sds.
  
  
   To: delphi-br@yahoogrupos.com.br
   From: douglashideki@
   Date: Wed, 16 Jul 2008 17:07:55 +
   Subject: [delphi-br] Exclusão dbgrid!!
   
   
   Boa tarde,
   
   Estou tentando excluir uma linha do dbgrid por um button, coloquei o
   seguinte:
   
   if MessageDlg ('Tem certeza que deseja excluir a
   informação?',mtConfirmation,[mbYes,mbNo],0)= mrYes then begin
   
   with DataModule.SQLQuery do begin
   close;
   sql.Clear;
   SQL.Add('DELETE FROM TABLE WHERE CPF =
   '+QuotedStr(DBGrid.SelectedField.AsString)+' ');
   ExecSQL;
   
   
   Close;
   
   end;
   
   Showmessage('Registro excluí­do com sucesso!');
   end
   Else
   Showmessage('Operação cancelada!');
   
   Gostaria de quando o usuario clicasse neese buton fosse deletado a
   linha selecionada... Acontece que deletar até deleta, mas ás
vezes nao
   delete a linha que está selecionada...
   
   essa parte +QuotedStr(DBGrid.SelectedField.AsString)+' eh assim
   mesmo?
   
   
   
  
  _
  Instale a Barra de Ferramentas com Desktop Search e ganhe EMOTICONS
 para o Messenger! É GRÁTIS!
  http://www.msn.com.br/emoticonpack
 





[delphi-br] Exclusão dbgrid!!

2008-07-16 Por tôpico Douglas Takahara
Boa tarde,

Estou tentando excluir uma linha do dbgrid por um button, coloquei o
seguinte:



   if MessageDlg ('Tem certeza que deseja excluir a
informação?',mtConfirmation,[mbYes,mbNo],0)= mrYes then begin

   with DataModule.SQLQuery do begin
close;
sql.Clear;
SQL.Add('DELETE FROM TABLE WHERE CPF =
'+QuotedStr(DBGrid.SelectedField.AsString)+'  ');
ExecSQL;
   

Close;


 end;

Showmessage('Registro excluí­do com sucesso!');
end
Else
Showmessage('Operação cancelada!'); 


Gostaria de quando o usuario clicasse neese buton fosse deletado a 
linha selecionada... Acontece que deletar até deleta, mas ás vezes nao
delete a linha que está selecionada...

   essa parte +QuotedStr(DBGrid.SelectedField.AsString)+' eh assim
mesmo?



[delphi-br] Re: Exclusão dbgrid!!

2008-07-16 Por tôpico Douglas Takahara
Rubem,

Com relação a primeira pergunta , acredito que realmente o selected
field n corresponde ao campo que contém cpf.. 

Quanto a segunda pergunta..
sim , eu abro e fecho novamente a consulta...




--- Em delphi-br@yahoogrupos.com.br, Rubem Nascimento da Rocha
[EMAIL PROTECTED] escreveu

 
 Acho que vc está cometendo um equivoco. Vc usa DBGrid.SelectedField
para pegar o valor da chave (por assim dizer) que será usada para a
exclusão, mas será que o SelectedField do DBGrid, no momento da
deleção, corresponde mesmo ao campo que contém o CPF? Outra coisa,
depois da deleção, vc fecha e depois abre a consulta do DBGrid?
 
 Sds.
 
 
  To: delphi-br@yahoogrupos.com.br
  From: [EMAIL PROTECTED]
  Date: Wed, 16 Jul 2008 17:07:55 +
  Subject: [delphi-br] Exclusão dbgrid!!
  
  
  Boa tarde,
  
  Estou tentando excluir uma linha do dbgrid por um button, coloquei o
  seguinte:
  
  if MessageDlg ('Tem certeza que deseja excluir a
  informação?',mtConfirmation,[mbYes,mbNo],0)= mrYes then begin
  
  with DataModule.SQLQuery do begin
  close;
  sql.Clear;
  SQL.Add('DELETE FROM TABLE WHERE CPF =
  '+QuotedStr(DBGrid.SelectedField.AsString)+' ');
  ExecSQL;
  
  
  Close;
  
  end;
  
  Showmessage('Registro excluí­do com sucesso!');
  end
  Else
  Showmessage('Operação cancelada!');
  
  Gostaria de quando o usuario clicasse neese buton fosse deletado a
  linha selecionada... Acontece que deletar até deleta, mas ás vezes nao
  delete a linha que está selecionada...
  
  essa parte +QuotedStr(DBGrid.SelectedField.AsString)+' eh assim
  mesmo?
  
  
  
 
 _
 Instale a Barra de Ferramentas com Desktop Search e ganhe EMOTICONS
para o Messenger! É GRÁTIS!
 http://www.msn.com.br/emoticonpack





[delphi-br] Re: Exclusão dbgrid!!

2008-07-16 Por tôpico Douglas Takahara
Daniel Bastos,

Eu consigo deletar os dados, porem nem sempre deleta os dados que eu
quero.. eu seleciono a field que eu quero deletar, por exemplo, porem
n deleta o field que selecionei e sim outro.


 



--- Em delphi-br@yahoogrupos.com.br, Daniel Bastos [EMAIL PROTECTED]
escreveu

 Um chute.. até pq não trabalho a um tempo com dbx :)
 Será que este delete não pode estar pendente de um commit?
 Pq se ele atualiza os dados e não aparece, pode estar usando o
isolamento
 transacional ReadCommited. Mas, sem commit, realmente não aparecerá no
 dbgrid.
 
 Abs.
 Daniel A. Bastos
 
 2008/7/16 Douglas Takahara [EMAIL PROTECTED]:
 
Rubem,
 
  Com relação a primeira pergunta , acredito que realmente o selected
  field n corresponde ao campo que contém cpf..
 
  Quanto a segunda pergunta..
  sim , eu abro e fecho novamente a consulta...
 
  --- Em delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br,
  Rubem Nascimento da Rocha
  djpardalrocha@ escreveu
 
  
  
   Acho que vc está cometendo um equivoco. Vc usa DBGrid.SelectedField
  para pegar o valor da chave (por assim dizer) que será usada para a
  exclusão, mas será que o SelectedField do DBGrid, no momento da
  deleção, corresponde mesmo ao campo que contém o CPF? Outra coisa,
  depois da deleção, vc fecha e depois abre a consulta do DBGrid?
  
   Sds.
  
   
To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
From: douglashideki@
 
Date: Wed, 16 Jul 2008 17:07:55 +
Subject: [delphi-br] Exclusão dbgrid!!
   
   
Boa tarde,
   
Estou tentando excluir uma linha do dbgrid por um button,
coloquei o
seguinte:
   
if MessageDlg ('Tem certeza que deseja excluir a
informação?',mtConfirmation,[mbYes,mbNo],0)= mrYes then begin
   
with DataModule.SQLQuery do begin
close;
sql.Clear;
SQL.Add('DELETE FROM TABLE WHERE CPF =
'+QuotedStr(DBGrid.SelectedField.AsString)+' ');
ExecSQL;
   
   
Close;
   
end;
   
Showmessage('Registro excluí­do com sucesso!');
end
Else
Showmessage('Operação cancelada!');
   
Gostaria de quando o usuario clicasse neese buton fosse deletado a
linha selecionada... Acontece que deletar até deleta, mas ás
vezes nao
delete a linha que está selecionada...
   
essa parte +QuotedStr(DBGrid.SelectedField.AsString)+' eh assim
mesmo?
   
   
   
  
   __
   Instale a Barra de Ferramentas com Desktop Search e ganhe EMOTICONS
  para o Messenger! É GRÁTIS!
   http://www.msn.com.br/emoticonpack
  
 
   
 
 
 
 [As partes desta mensagem que não continham texto foram removidas]





[delphi-br] Re: [Ajuda] Comando NVL!!

2008-07-04 Por tôpico Douglas Takahara
Bom, andei pesquisando e parece que a função no access eh NZ..

o que eu quero é o seguinte..
tenho campos nome, idade, sexo...
eu faço uma consulta por exemplo:

SELECT Tabela1.nome, Tabela1.sexo, Count(Tabela1.idade) AS
ContarDeidade FROM Tabela1 GROUP BY Tabela1.nome, Tabela1.sexo
HAVING (((Tabela1.sexo)=F) AND ((Count(Tabela1.idade))=18));

eu gostaria que caso algum registro n tenha o critério sexo=F e
idade=18, aparecesse o nome e na contage aparece 0 :

por exemplo:


nome   sexoidade
eu F   20  
aa F   4
aaaF   9

se fosse com a função sql ficaria mais ou menos assim:

nomesexo   contaridade
aa  F   1
aaa F   1 

no caso o nome eu n aparece, eu gostaria que aparecesse e como n
atende a condição nada aparecesse 0




--- Em delphi-br@yahoogrupos.com.br, Rubem Nascimento da Rocha
[EMAIL PROTECTED] escreveu

 
 NVL() é função, e não comando! Se retorna um valor, é uma função, e
não uma procedure, rotina ou comando! Olha os conceitos, galera!
 
 Sds.
 
 
 
 To: delphi-br@yahoogrupos.com.br
 From: [EMAIL PROTECTED]
 Date: Thu, 3 Jul 2008 15:58:18 -0300
 Subject: Re: [delphi-br] Re: [Ajuda] Comando NVL!!
 
 Ms Access nao aceita esse comando NVL salvo engano ele eh do Oracle.
 
 2008/7/3 Douglas Takahara [EMAIL PROTECTED]:
 
  --- Em delphi-br@yahoogrupos.com.br ,
  Joao Morais  escreveu
 
  Douglas Takahara wrote:
  Eu quero que ele conte um campo e retorne zero caso o valor for null
  meu comando sql está assim:
 
  Select from blabla Count(NVL(IDADE,0) from bla bla..
 
  Eu gostaria de saber se usa o comando NVL mesmo ou se usa outro...
  estou tentando como citei acima, porém n está dando certo.
 
  Não seria coalesce()? Qual o banco?
 
  Joao Morais
 
 
  desculpe pelo gafe Rubem!!!
 
  Joao eh MS Acess
 
 
 
 
 --
 Antonio Mateus
 Estudante de Sistemas de Informação 4º Periodo
 
 _
 Instale a Barra de Ferramentas com Desktop Search e ganhe EMOTICONS
para o Messenger! É GRÁTIS!
 http://www.msn.com.br/emoticonpack





[delphi-br] [Ajuda] Comando NVL!!

2008-07-03 Por tôpico Douglas Takahara
Boa tarde,

Pessoal estou com seguinte problema:

Estou usando banco de dados access e usando uma query pra fazer a
consulta.

Eu quero que ele conte um campo e  retorne zero caso o valor for null
meu comando sql está assim:

Select from blabla Count(NVL(IDADE,0) from bla bla..

Eu gostaria de saber se usa o comando NVL mesmo ou se usa outro...
estou tentando como citei acima, porém n está dando certo.

Alguma ajuda
??

Obrigado!!



[delphi-br] Re: [Ajuda] Comando NVL!!

2008-07-03 Por tôpico Douglas Takahara
--- Em delphi-br@yahoogrupos.com.br, Joao Morais [EMAIL PROTECTED] escreveu

 Douglas Takahara wrote:
  Eu quero que ele conte um campo e  retorne zero caso o valor for null
  meu comando sql está assim:
  
  Select from blabla Count(NVL(IDADE,0) from bla bla..
  
  Eu gostaria de saber se usa o comando NVL mesmo ou se usa outro...
  estou tentando como citei acima, porém n está dando certo.
 
 Não seria coalesce()? Qual o banco?
 
 Joao Morais


desculpe pelo gafe Rubem!!!

Joao eh MS Acess