if ... end e imprimir..

21/11/2005

0

oi tudo na paz?...estou com um problema ´meu programa faz umas perguntas para o usuário más se eu disser não na primeira pergunta ele e cancela as demais...
    if MessageDlg(´Deseja imprimir promissórias ?´,
    mtConfirmation, [mbYes, mbNo], 0) = mrYes then
  begin
  QuickRep3.Print;
  if Application.MessageBox(´Imprimir documento de saida ?´ , ´Imprimir´, MB_ICONQUESTION + MB_YESNO) = IDYES then
  QuickRep1.Print;
  end;


acho que algo com estes If´s da vida..flw... galera t+


Gigatel

Gigatel

Responder

Posts

21/11/2005

Marcio.theis

Tira dentro do bloco Begin...end;

if MessageDlg(´Deseja imprimir promissórias ?´, mtConfirmation, [mbYes, mbNo], 0) = mrYes then
QuickRep3.Print;
if Application.MessageBox(´Imprimir documento de saida ?´ , ´Imprimir´, MB_ICONQUESTION + MB_YESNO) = IDYES then
QuickRep1.Print;


Responder

21/11/2005

Massuda

[quote:01a8443646=´Moderação´][color=red:01a8443646]Tópico bloqueado por Massuda

[b:01a8443646]Tópico duplicado.[/b:01a8443646]
Por favor continuem a discussão no tópico original:
http://forum.clubedelphi.net/viewtopic.php?t=70579[/color:01a8443646][/quote:01a8443646]


Responder

Que tal ter acesso a um e-book gratuito que vai te ajudar muito nesse momento decisivo?

Ver ebook

Recomendado pra quem ainda não iniciou o estudos.

Eu quero
Ver ebook

Recomendado para quem está passando por dificuldades nessa etapa inicial

Eu quero

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

Aceitar