[delphi-br] Msg + Campo tabela
Em uma outra ocisião o Dimas Fernando me respondeu uma questão referente aoseguinte problema: Uma mensagem do delphi que me mostrasse campos de uma tabela. Abaixo segue o exemplo dado por ele. Application.MessageBox( PansiChar( ' Este aluno pertence a: ' + tabela.fieldbyname('nome_campo').AsString), 'Aviso', mb_iconExclamation); A minha duvida é a seguinte? Se eu quiser colocar dois campos da mesma tabela o q tenho que fazer? Meu exemplo: //Aviso ao usuário dos valores de Retenção e Base Application.MessageBox(PansiChar('Valor da Retenção:' + floattostr(DataModulo.TMOVIMENTO.FieldByName('VALOR_RETENCAO').AsCurrency + PansiChar('Valor da Base: ' + floattostr(DataModulo.TMOVIMENTO.FieldByName('BASE_RETENCAO').AsCurrency)), 'Aviso', mb_iconExclamation); ERRO: [Error] UMovimento.pas(231): Incompatible types PAULO FERNANDES PORTO ALEGRE/RS [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] Msg + Campo tabela
Ola, Paulo Parece que falta fechar os parênteses do primeiro FloatToStr... E não sei se há necessidade de colocar o segundo PAnshiChar(... Abraços, Ana - Original Message - From: Info Desenvolvimento [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, May 18, 2005 4:12 PM Subject: [delphi-br] Msg + Campo tabela Em uma outra ocisião o Dimas Fernando me respondeu uma questão referente aoseguinte problema: Uma mensagem do delphi que me mostrasse campos de uma tabela. Abaixo segue o exemplo dado por ele. Application.MessageBox( PansiChar( ' Este aluno pertence a: ' + tabela.fieldbyname('nome_campo').AsString), 'Aviso', mb_iconExclamation); A minha duvida é a seguinte? Se eu quiser colocar dois campos da mesma tabela o q tenho que fazer? Meu exemplo: //Aviso ao usuário dos valores de Retenção e Base Application.MessageBox(PansiChar('Valor da Retenção:' + floattostr(DataModulo.TMOVIMENTO.FieldByName('VALOR_RETENCAO').AsCurrency + PansiChar('Valor da Base: ' + floattostr(DataModulo.TMOVIMENTO.FieldByName('BASE_RETENCAO').AsCurrency)), 'Aviso', mb_iconExclamation); ERRO: [Error] UMovimento.pas(231): Incompatible types PAULO FERNANDES PORTO ALEGRE/RS [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 Esta mensagem foi verificada pelo E-mail Protegido Terra. Scan engine: McAfee VirusScan / Atualizado em 17/05/2005 / Versão: 4.4.00 - Dat 4493 Proteja o seu e-mail Terra: http://mail.terra.com.br/ -- 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] Msg + Campo tabela
Como eu faço para gerar uma mensagem + um campo de uma tabela. Exemplo: Application.MessageBox(' Este aluno pertence a: + 'Campo da tabela', 'Aviso', mb_iconExclamation); Vou fazer isso no OnExit de um edit, então quando o usuário entra com o código ele informa de onde é o aluno, qual turma. Paulo César Fernandes Desenvolvimento [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] Msg + Campo tabela
Faca assim: Application.MessageBox( PansiChar( ' Este aluno pertence a: ' + tabela.fieldbyname('nome_campo').AsString), 'Aviso', mb_iconExclamation); Precisa colocar PansiChar para converter o contéudo que vc quer mostrar... na forma normal, nao precisa, ou seja apenas: Application.MessageBox( 'APENAS UM TESTE', 'Aviso', mb_iconExclamation); Se voce precisar colocar mais campos, faça tudo isso dentro do PansiChar( . ) Ate mais - Original Message - From: info.Desenvolvimento To: delphi-br@yahoogrupos.com.br Sent: Wednesday, February 16, 2005 10:40 AM Subject: [delphi-br] Msg + Campo tabela Como eu faço para gerar uma mensagem + um campo de uma tabela. Exemplo: Application.MessageBox(' Este aluno pertence a: + 'Campo da tabela', 'Aviso', mb_iconExclamation); Vou fazer isso no OnExit de um edit, então quando o usuário entra com o código ele informa de onde é o aluno, qual turma. Paulo César Fernandes Desenvolvimento [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] Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [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