ActiveDelphi - Índice do Fórum ActiveDelphi
.: O site do programador Delphi! :.
 
 FAQFAQ   PesquisarPesquisar   MembrosMembros   GruposGrupos   RegistrarRegistrar 
 PerfilPerfil   Entrar e ver Mensagens ParticularesEntrar e ver Mensagens Particulares   EntrarEntrar 

Ajuda com DbGrid

 
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi
Exibir mensagem anterior :: Exibir próxima mensagem  
Autor Mensagem
netopvh
Novato
Novato


Registrado: Sexta-Feira, 24 de Fevereiro de 2012
Mensagens: 60

MensagemEnviada: Seg Ago 13, 2012 11:50 pm    Assunto: Ajuda com DbGrid Responder com Citação

Olá Meu Caros

Estou com um probleminha q não sei como resolver

Seguinte, no Meu Banco de Dados tem um campo chamado
status do tipo integer que tem um Default 0
ai vem o problema

quero que no meu Dbgrid no Campo Status ao Inves de aparece 0
apareça NÂO MATRICULADO

tpw

Código:

if Qr_Alunos.FieldByName('status').AsInteger = 0 then
NÂO MATRICULADO
else if Qr_Alunos.FieldByName('status').AsInteger = 0 then
MATRICULADO


porem esse MATRICULADO E NAO MATRICULADO tem que aparece no Dbgrid no Campo Status

Poderiam me Ajudar???

Vlw
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
netopvh
Novato
Novato


Registrado: Sexta-Feira, 24 de Fevereiro de 2012
Mensagens: 60

MensagemEnviada: Seg Ago 13, 2012 11:56 pm    Assunto: Responder com Citação

Fiz desse jeito
mais da incompatibilidade de tipos de dados


Código:

 if Qr_Alunos.FieldByName('status').AsInteger = 0 then
   begin
     Qr_Alunos.FieldByName('status').AsString := 'NÃO MATRICULADO';
   end
 else if Qr_Alunos.FieldByName('status').AsInteger = 1 then
   begin
     Qr_Alunos.FieldByName('status').AsString := 'MATRICULADO';
   end;


Alguma Ideia de Como eu Resolveria isso
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
maizena
Colaborador
Colaborador


Registrado: Terça-Feira, 20 de Março de 2012
Mensagens: 1497
Localização: Laguna - SC

MensagemEnviada: Ter Ago 14, 2012 7:57 am    Assunto: Responder com Citação

Bom eu utilizaria um Stringgrid mais já que vc esta usando DBGrid creio que a melhor forma seria criar um campo na sua tabela do tipo STRING e quando efetuar a inserção de dados caso o campo seja 0 ou 1 atribua o valor respectivos a eles.
Na próxima experimenta utilizar stringgrid é mais fácil para manipular os dados.

Espero que ajude.
_________________
Canal Delphi+ INSCREVA-SE: http://www.youtube.com/channel/UCnVF5ly5PRwZONE-U7xZM6w?feature=watch
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular MSN Messenger
marcosalles
Moderador
Moderador


Registrado: Quarta-Feira, 26 de Março de 2008
Mensagens: 1695
Localização: Muriaé Mg

MensagemEnviada: Ter Ago 14, 2012 8:04 am    Assunto: Responder com Citação

Amigo pesquise por ongetText que com certeza isto ira te ajuda
_________________
http://marcosalles.wordpress.com

Desenvolvo FreeLancer e presto Consultoria
Orientação Online DataSnap DbX ClientDataSet
POO , Padrões de Projeto e dúvidas de Delphi em
Geral
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular Visitar a homepage do Usuário
Ghost_Rider
Colaborador
Colaborador


Registrado: Segunda-Feira, 6 de Outubro de 2003
Mensagens: 4437

MensagemEnviada: Ter Ago 14, 2012 8:41 am    Assunto: Responder com Citação

Voce poderia criar um campo calculado, usando o if que você fez para alimentar esse campo.
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
felipekk
Colaborador
Colaborador


Registrado: Quinta-Feira, 5 de Janeiro de 2012
Mensagens: 1531
Localização: Pirapora - MG

MensagemEnviada: Ter Ago 14, 2012 9:32 am    Assunto: Responder com Citação

netopvh escreveu:
Fiz desse jeito
mais da incompatibilidade de tipos de dados


Código:

 if Qr_Alunos.FieldByName('status').AsInteger = 0 then
   begin
     Qr_Alunos.FieldByName('status').AsString := 'NÃO MATRICULADO';
   end
 else if Qr_Alunos.FieldByName('status').AsInteger = 1 then
   begin
     Qr_Alunos.FieldByName('status').AsString := 'MATRICULADO';
   end;


Alguma Ideia de Como eu Resolveria isso
Bom dia,
qual o erro que está sendo retornado pra vc?
Abraços.
_________________
"Esteja ligado em melhora contínua: hoje melhor do que ontem e pior do que amanhã."


Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
maizena
Colaborador
Colaborador


Registrado: Terça-Feira, 20 de Março de 2012
Mensagens: 1497
Localização: Laguna - SC

MensagemEnviada: Ter Ago 14, 2012 10:32 am    Assunto: Responder com Citação

Assim
Código:

 if Qr_Alunos.FieldByName('status').AsInteger = 0 then
   begin
     Qr_Alunos.FieldByName('status').AsString := 'NÃO MATRICULADO';
   end
 else if Qr_Alunos.FieldByName('status').AsInteger = 1 then
   begin
     Qr_Alunos.FieldByName('status').AsString := 'MATRICULADO';
   end;


Não vai funcionar pq seu campo "status" não é do tipo string ele não pode receber caracteres alfa.
_________________
Canal Delphi+ INSCREVA-SE: http://www.youtube.com/channel/UCnVF5ly5PRwZONE-U7xZM6w?feature=watch
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular MSN Messenger
felipekk
Colaborador
Colaborador


Registrado: Quinta-Feira, 5 de Janeiro de 2012
Mensagens: 1531
Localização: Pirapora - MG

MensagemEnviada: Ter Ago 14, 2012 10:37 am    Assunto: Responder com Citação

Bem lembrado maizena.
_________________
"Esteja ligado em melhora contínua: hoje melhor do que ontem e pior do que amanhã."


Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
johnny-walker
Moderador
Moderador


Registrado: Sábado, 4 de Outubro de 2003
Mensagens: 10653
Localização: Contagem/MG - BRAZIL

MensagemEnviada: Ter Ago 14, 2012 11:00 pm    Assunto: Responder com Citação

Outra forna de resolver isto e que ficaria mais gráfico seria criar uma legenda de cor para matriculados e não matriculados, ficaria mais visível do que escrito "MATRICULADO".


bye
_________________
P.O.W.E.R B.Y D.E.L.P.H.I
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular MSN Messenger
Mostrar os tópicos anteriores:   
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi Todos os horários são GMT - 3 Horas
Página 1 de 1

 
Ir para:  
Enviar Mensagens Novas: Proibido.
Responder Tópicos Proibido
Editar Mensagens: Proibido.
Excluir Mensagens: Proibido.
Votar em Enquetes: Proibido.


Powered by phpBB © 2001, 2005 phpBB Group
Traduzido por: Suporte phpBB