Ir para conteúdo
Fórum Script Brasil
  • 0

Messagedlg - Overload


...fabinho

Pergunta

Moçada, gostaria de usar outros tipos de Messagedlg. Como está disponível no help do Delphi 7, quero usar como segue a sintaxe:

function MessageDlg(const Caption: WideString; const Msg: WideString; DlgType: TMsgDlgType; Buttons: TMsgDlgButtons; HelpCtx: Longint; DefaultBtn: TMsgDlgBtn = mbNone; Bitmap: TBitmap = nil): Integer; overload;

ficaria assim, por exemplo:

Messagedlg('Exclusão de arquivo', 'Confirma a exclusão?', mtConfirmation, [mbYes, mbNo], 0, mbNo, imagem) = mryes then .....

Mas acontece que o Delphi critica.. como se essa função somente pudesse ser usada com os parâmetros padrão, aqueles que todo mundo conhece.

Alguém ajuda? grato.

Link para o comentário
Compartilhar em outros sites

4 respostass a esta questão

Posts Recomendados

  • 0
Mas acontece que o Delphi critica.. como se essa função somente pudesse ser usada com os parâmetros padrão, aqueles que todo mundo conhece.

Isto é improvável. Coloque a mensagem de erro na íntegra (original, não sua interpretação) para que possamos dar alguma opnião.

Link para o comentário
Compartilhar em outros sites

  • 0
Guest --fabinho --
Mas acontece que o Delphi critica.. como se essa função somente pudesse ser usada com os parâmetros padrão, aqueles que todo mundo conhece.

Isto é improvável. Coloque a mensagem de erro na íntegra (original, não sua interpretação) para que possamos dar alguma opnião.

A mensagem de erro é:

"Too many actual parameters"

Link para o comentário
Compartilhar em outros sites

  • 0
Guest --felipe --
A mensagem de erro é:

"Too many actual parameters"

segundo o help do deplhi:

function MessageDlg(const Caption: WideString; const Msg: WideString; DlgType: TMsgDlgType

; Buttons: TMsgDlgButtons; HelpCtx: Longint; DefaultBtn: TMsgDlgBtn = mbNone; Bitmap: TBitmap = nil): Integer; overload;

Messagedlg('Exclusão de arquivo', 'Confirma a exclusão?', mtConfirmation, [mbYes, mbNo], 0, mbNo, imagem) = mryes then .....

Caption specifies the caption for the message box when DlgType is mtCustom. If this parameter is not used, the caption for custom message boxes is the title of the application.
ou seja, você não pode usar o parametro "const Caption" a menos que o parametro "DlgType" seja mtCustom.

Bitmap is an image that appears on the face of the message dialog. If Bitmap is nil (Delphi) or NULL (C++), there is no image unless DlgType is mtConfirmation.

ou seja, você não pode usar o parametro "Bitmap" a menos que o parametro "DlgType" seja mtConfirmation..

finalmente: ou você usa o mtCustom e especifica o parametro "Caption", ou você usa mtConfirmation e especifica o parametro "Bitmap"..

mesmo assim eu tava testando e não funcionou.. o erro é o mesmo

então criei uma variavel WideString, já que -> const Msg: WideString; e não funcionou também

tentei usar o exemplo do delphi:

if MessageDlg('Welcome to my Delphi application.  Exit now?',
    mtConfirmation, [mbYes, mbNo], 0, mbYes) = mrYes then exit;

e o erro continua! :angry:

acho que pra usar MessageDlg do tipo overload deve ser diferente, ou tem que declarar algo em uses, não sei..

abraços

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,4k
×
×
  • Criar Novo...