REVELAR

Fórum Colocar o nome do campo dentro do Application.MessageBox? #326592

01/08/2006

0

Bom dia amigos delphianos gostaria de saber como fasso para colocar o nome do campo dantro da caixa do Application.MessageBox

Fiz assim e naum consegui:

if application.messagebox(´Deseja Excluir este Lançamento:´ + #13+ dm.qtbcontalan.FieldByName(´nomeconta´).AsString+´?´, ´Excluir Dados´, MB_ICONQUESTION
+ MB_YESNO) = IDYES  then BEGIN


agora se fizer usando um MessageDLG funciona:

if MessageDlg(´Deseja excluir este Lançamento:´+ 13+ dm.qtbcontalan.FieldByName(´nomeconta´).AsString+´?´, mtConfirmation,[mbYes, mbNo],0) = mrYes then
begin



Jlimajr

Jlimajr

Responder

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

Aceitar