Fórum ShowMessage duvida #418458

14/06/2012

0

Estou com duvida sobre a estruturação do showmessager...

showmessage(Vc Está tentado Locar esta quantidade de Midia : + IntToStr(DMDados.DSet_emprestimosQTMIDIA.AsInteger) #13
No entanto temos Disponivel somente essas: +
IntToStr( DMDados.DSetFilmeNUMMIDIAS.AsInteger - DMDados.DSetFilmeNUMMIDIASEMP.AsInteger ) ) ;


estou tentando 1001 maneiras diferente para dar certo, mas ainda não encontrei nenhuma adequada para consegir completar minha missão :P..
Marcos Rossetto

Marcos Rossetto

Responder

Posts

14/06/2012

Marcos Rossetto

Ja consegui estruura mas agradeço pela ajuda!


showmessage(Vc Está tentado Locar esta quantidade de Midia : +
IntToStr(DMDados.DSet_emprestimosQTMIDIA.AsInteger) +
No entanto temos Disponivel somente essas: +
IntToStr( DMDados.DSetFilmeNUMMIDIAS.AsInteger - DMDados.DSetFilmeNUMMIDIASEMP.AsInteger )) ;
Responder

Gostei + 0

14/06/2012

Joel Rodrigues

Opa, que bom que deu certo.
Fechando o tópico.
Responder

Gostei + 0

14/06/2012

Marco Salles

Ja consegui estruura mas agradeço pela ajuda!


showmessage(Vc Está tentado Locar esta quantidade de Midia : +
IntToStr(DMDados.DSet_emprestimosQTMIDIA.AsInteger) +
No entanto temos Disponivel somente essas: +
IntToStr( DMDados.DSetFilmeNUMMIDIAS.AsInteger - DMDados.DSetFilmeNUMMIDIASEMP.AsInteger )) ;


Acho que vc pode economizar um Typcast utilizando as propriedades AsString do TFied

Logo não precisa IntToStr(DMDados.DSet_emprestimosQTMIDIA.AsInteger)
Simplesmente DMDados.DSet_emprestimosQTMIDIA.AsString


ficando assim :

showmessage(Vc Está tentado Locar esta quantidade de Midia : +
DMDados.DSet_emprestimosQTMIDIA.AsString +
No entanto temos Disponivel somente essas: +
IntToStr( DMDados.DSetFilmeNUMMIDIAS.AsInteger - DMDados.DSetFilmeNUMMIDIASEMP.AsInteger ))
Responder

Gostei + 0

14/06/2012

Deivison Melo

Bom dia,

Uma ótima opção para não reinventar a roda seria usar o do tópico abaixo:

https://www.devmedia.com.br/criando-um-messagebox-personalizado/5614

Forte abraço!
Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar