duvidas com Application.MessageBox
Galera estou fazendo um sisteminha e gostaria de hora de gravar o pedido aparecer uma tela avisando que foi gravado.
Da seguinte forma.
Application.MessageBox(Pré Venda Gravada com sucesso,Informação do Sistema,
MB_OK+MB_ICONINFORMATION);
Mas gostaria de colocar nessa tela o numero do pedido que está gravado no edtNroPedido.text
Como insiro isso na menssagem????
tipo
Application.MessageBox(Pré Venda N: +edtNroPedido.text, Gravada com sucesso,Informação do Sistema,
MB_OK+MB_ICONINFORMATION);
no aguardo obrigado!!!!!!!!!!!!!!!!!!
Da seguinte forma.
Application.MessageBox(Pré Venda Gravada com sucesso,Informação do Sistema,
MB_OK+MB_ICONINFORMATION);
Mas gostaria de colocar nessa tela o numero do pedido que está gravado no edtNroPedido.text
Como insiro isso na menssagem????
tipo
Application.MessageBox(Pré Venda N: +edtNroPedido.text, Gravada com sucesso,Informação do Sistema,
MB_OK+MB_ICONINFORMATION);
no aguardo obrigado!!!!!!!!!!!!!!!!!!
Guilherme
Curtidas 0
Respostas
William
24/05/2012
Colega se não me engano o primeiro parâmetro para MessaBox tem que ser uma constante, mas a idéia é concatenação de strings mesmo.
Caso aparece algum erro poste ai... no momento estou sem delphi para testar.
Caso aparece algum erro poste ai... no momento estou sem delphi para testar.
GOSTEI 0
Deivison Melo
24/05/2012
Observe que ao utilizarmos o Application.MessageBox ele irá chamar os botões pré-definidos e serão retornados na linguagem que o sistema operacional estiver utilizando, ou seja, se mesmo programando em um windows em ptBR se rodarmos o nosso sistema em um SO usando a linguagem ENG veremos que as mensagens serão chamadas em inglês, pois o utiliza a API do windows .
Recomendaria que fizesse seu próprio formulário de mensagens personalizadas.
Exemplos:
http://www.planetadelphi.com.br/dica/7311/criando-uma-caixa-de-mensagem-personalizada-
https://www.devmedia.com.br/dicas-caixa-de-mensagens/799
http://www.tecnobyte.com.br/dica8.html#dica159
https://www.devmedia.com.br/artigo-clube-delphi-edicao-29-caixas-de-mensagem/13518
E etc...
Eu mesmo utilizada uma caixa de mensagens personalida em minhas aplicações quando desenvolvia em Delphi!!
Assim poderia ter o controle melhor de suas caixas de mensagens...
Recomendaria que fizesse seu próprio formulário de mensagens personalizadas.
Exemplos:
http://www.planetadelphi.com.br/dica/7311/criando-uma-caixa-de-mensagem-personalizada-
https://www.devmedia.com.br/dicas-caixa-de-mensagens/799
http://www.tecnobyte.com.br/dica8.html#dica159
https://www.devmedia.com.br/artigo-clube-delphi-edicao-29-caixas-de-mensagem/13518
E etc...
Eu mesmo utilizada uma caixa de mensagens personalida em minhas aplicações quando desenvolvia em Delphi!!
Assim poderia ter o controle melhor de suas caixas de mensagens...
GOSTEI 0
Luiz Vichiatto
24/05/2012
No caso o Application.MessageBox utiliza PCHAR, no caso terás de converter.
Para resolver isto tenho uma fução que converte em pchar
Para resolver isto tenho uma fução que converte em pchar
pcharMSG : PChar; GetMen(pcharMSG, length(Mensagem)+1; StrCopy(pcharMSG, pChar(Mensagem)); Application.MessgeBox(pcharMSG, Mensagem, mb_ok+....);
Galera estou fazendo um sisteminha e gostaria de hora de gravar o pedido aparecer uma tela avisando que foi gravado.
Da seguinte forma.
Application.MessageBox(Pré Venda Gravada com sucesso,Informação do Sistema,
MB_OK+MB_ICONINFORMATION);
Mas gostaria de colocar nessa tela o numero do pedido que está gravado no edtNroPedido.text
Como insiro isso na menssagem????
tipo
Application.MessageBox(Pré Venda N: +edtNroPedido.text, Gravada com sucesso,Informação do Sistema,
MB_OK+MB_ICONINFORMATION);
no aguardo obrigado!!!!!!!!!!!!!!!!!!
Da seguinte forma.
Application.MessageBox(Pré Venda Gravada com sucesso,Informação do Sistema,
MB_OK+MB_ICONINFORMATION);
Mas gostaria de colocar nessa tela o numero do pedido que está gravado no edtNroPedido.text
Como insiro isso na menssagem????
tipo
Application.MessageBox(Pré Venda N: +edtNroPedido.text, Gravada com sucesso,Informação do Sistema,
MB_OK+MB_ICONINFORMATION);
no aguardo obrigado!!!!!!!!!!!!!!!!!!
GOSTEI 0
Bruno Leandro
24/05/2012
caso ainda não deu certo voce pode utilizar da seguinte forma
Application.MessageBox( PChar(`Pré Venda N: ` +edtNroPedido.text+ `, Gravada com sucesso`) ,`Informação do Sistema`,
MB_OK+MB_ICONINFORMATION);
Application.MessageBox( PChar(`Pré Venda N: ` +edtNroPedido.text+ `, Gravada com sucesso`) ,`Informação do Sistema`,
MB_OK+MB_ICONINFORMATION);
GOSTEI 0
Deivison Melo
24/05/2012
o que ele queria mudar pelo que entendi são os captions dos botões!!
Se estiver enganado me corrijam por favor!
Forte abraço!!
Se estiver enganado me corrijam por favor!
Forte abraço!!
GOSTEI 0
Guilherme
24/05/2012
caso ainda não deu certo voce pode utilizar da seguinte forma
Application.MessageBox( PChar(`Pré Venda N: ` +edtNroPedido.text+ `, Gravada com sucesso`) ,`Informação do Sistema`,
MB_OK+MB_ICONINFORMATION);
Application.MessageBox( PChar(`Pré Venda N: ` +edtNroPedido.text+ `, Gravada com sucesso`) ,`Informação do Sistema`,
MB_OK+MB_ICONINFORMATION);
Exatamente o que eu Queria.....muito obrigado pela atenção!!!!!!!!!!!!
abraços
GOSTEI 0