Array
(
)

messagebox com incluindo valor integer

Erivando
   - 23 fev 2006

olá amigos


estou tentando colocar o resultado de um relatorio em uma MessageBox

mas dar erro;

eu estou fazendo assim:

if MessageBox(Application.Handle, 0,´Foi impresso ´+PAnsiChar(Impressos)+´.Você confirma esta informação?´
+#10+10+´ATENÇÃO: Se você concordar, atualize estas informações em seu livro de registros.´
+10+10+´´SIM´ para confirmar.´
+10+´´Não´ para cancelar.´,´Pergunta´,mb_yesno+mb_iconquestion)=6 then
begin

end else

end;


linha do erro:

+10+´´Não´ para cancelar.´,()´Pergunta´,mb_yesno+mb_iconquestion)=6 then

ponto do erro onde o delphi aponta ().

fico grato a quem possa mim ajudar;

eriv@ndo


Erivando
   - 23 fev 2006


Citação:
olá amigos


estou tentando colocar o resultado de um relatorio em uma MessageBox

mas dar erro;

eu estou fazendo assim:

if MessageBox(Application.Handle, 0,´Foi impresso ´+PAnsiChar(Impressos)+´.Você confirma esta informação?´
+#10+10+´ATENÇÃO: Se você concordar, atualize estas informações em seu livro de registros.´
+10+10+´´SIM´ para confirmar.´
+10+´´Não´ para cancelar.´,´Pergunta´,mb_yesno+mb_iconquestion)=6 then
begin

end else

end;


linha do erro:

+10+´´Não´ para cancelar.´,()´Pergunta´,mb_yesno+mb_iconquestion)=6 then

ponto do erro onde o delphi aponta ().

fico grato a quem possa mim ajudar;

eriv@ndo


fiz assim e tambem não deu certo!
if MessageBox(0,´Foi impresso ´+PAnsiChar(Impressos)+´.Você confirma esta informação?´
+#10+10+´ATENÇÃO: Se você concordar, atualize estas informações em seu livro de registros.´
+10+10+´´SIM´ para confirmar.´
+10+´´Não´ para cancelar.´,´Pergunta´,mb_yesno+mb_iconquestion)=6 then
begin

end else

end;