Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Desarrollo en Delphi para Android
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos


Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 11-06-2015
H.Sagas96 H.Sagas96 is offline
Miembro
NULL
 
Registrado: jun 2015
Posts: 29
Poder: 0
H.Sagas96 Va por buen camino
There is no overloaded version of MessageDlg that can be called with these arguments

El error lo que dice es:
Cita:
[DCC Error] Unit1.pas(160): E2250 There is no overloaded version of 'MessageDlg' that can be called with these arguments
No se como corregirlo.

Esta es una parte de mi codigo:
Código Delphi [-]
  i := messagedlg('¿Quiere borrar el pedido?',mtWarning, mbokcancel,0);
  if (i = mrok) then
    ShowMessage('Se ha borrado el pedido.');
Me mantiene constantemente subrayado de error el "mtWarning" dentro del codigo y no corre.

Última edición por nlsgarcia fecha: 11-06-2015 a las 22:45:43. Razón: Formateo y Sintaxis Delphi
Responder Con Cita
  #2  
Antiguo 11-06-2015
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.021
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Recuerda poner los tags al código fuente, ejemplo:



Gracias
Responder Con Cita
  #3  
Antiguo 11-06-2015
H.Sagas96 H.Sagas96 is offline
Miembro
NULL
 
Registrado: jun 2015
Posts: 29
Poder: 0
H.Sagas96 Va por buen camino
ok, perdon. Podrias resolverme la duda?
Responder Con Cita
  #4  
Antiguo 11-06-2015
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Poder: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola H.Sagas96.

En delphi 7 funciona perfectamente de este modo:
Código Delphi [-]
 if MessageDlg('¿Quiere borrar el pedido?', mtWarning, [mbYes,mbNo], 0) = mrOk then
   ....

Pero revisa en este ejemplo la sintáxis para la version XE7: MessageDlg (Delphi)

Saludos
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita
  #5  
Antiguo 11-06-2015
H.Sagas96 H.Sagas96 is offline
Miembro
NULL
 
Registrado: jun 2015
Posts: 29
Poder: 0
H.Sagas96 Va por buen camino
ok muchas gracias ahorita reviso
Responder Con Cita
  #6  
Antiguo 11-06-2015
H.Sagas96 H.Sagas96 is offline
Miembro
NULL
 
Registrado: jun 2015
Posts: 29
Poder: 0
H.Sagas96 Va por buen camino
No funciona en el xe6
Responder Con Cita
  #7  
Antiguo 11-06-2015
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Poder: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola de nuevo.

A ver, revisa estos enlaces:
Saludos
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita
  #8  
Antiguo 12-06-2015
H.Sagas96 H.Sagas96 is offline
Miembro
NULL
 
Registrado: jun 2015
Posts: 29
Poder: 0
H.Sagas96 Va por buen camino
Muchas gracias Ya logre correguir el error gracias a los links
Responder Con Cita
  #9  
Antiguo 12-06-2015
Avatar de nlsgarcia
[nlsgarcia] nlsgarcia is offline
Miembro Premium
 
Registrado: feb 2007
Ubicación: Caracas, Venezuela
Posts: 2.206
Poder: 21
nlsgarcia Tiene un aura espectacularnlsgarcia Tiene un aura espectacular
Club Delphi,

Cita:
Empezado por H.Sagas96
...There is no overloaded version of MessageDlg that can be called with these arguments...
Cita:
Empezado por H.Sagas96
...Ya logre corregir el error...


Revisa este código:
Código Delphi [-]
unit Unit1;

interface

uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
   if MessageDlg('¿Quiere borrar el pedido?', mtWarning, [mbYes,mbNo], 0) = mrYes then
      MessageDlg('Pedido Borrado', mtInformation, [mbOk], 0)
   else
      MessageDlg('Se mantiene el Pedido', mtInformation, [mbOk], 0)
end;

end.
El código anterior en Delphi XE6 sobre Windows 7 Professional x32, Muestra en ambiente VCL el uso de la función MessageDlg.

Revisa esta código:
Código Delphi [-]
unit Unit1;

interface

uses
  System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants, 
  FMX.Types, FMX.Graphics, FMX.Controls, FMX.Forms, FMX.Dialogs, FMX.StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.fmx}

procedure TForm1.Button1Click(Sender: TObject);
begin
   if (MessageDlg('¿Quiere borrar el pedido?', TMsgDlgType.mtWarning, [TMsgDlgBtn.mbYes, TMsgDlgBtn.mbNo], 0) =  mrYes) then
      MessageDlg('Pedido Borrado', TMsgDlgType.mtInformation, [TMsgDlgBtn.mbOk], 0)
   else
      MessageDlg('Se mantiene el Pedido', TMsgDlgType.mtInformation, [TMsgDlgBtn.mbOk], 0)
end;

end.
El código anterior en Delphi XE6 sobre Windows 7 Professional x32, Muestra en ambiente FMX el uso de la función MessageDlg.

Revisa esta información:
Notas:

1- Toda la información anterior es para futuras consultas relacionadas a la función MessageDlg en ambiente VCL y FMX.

2- El código sugerido en VCL y FMX, funciono correctamente en Delphi XE6 y Delphi XE7.

3- El error mencionado en el Msg #1 (E2250 There is no overloaded version of 'MessageDlg' that can be called with these arguments), ocurre si se utiliza la sintaxis VCL de la función MessageDlg en FMX.

Espero sea útil

Nelson.

Última edición por nlsgarcia fecha: 12-06-2015 a las 20:57:08.
Responder Con Cita
  #10  
Antiguo 12-06-2015
Avatar de AgustinOrtu
[AgustinOrtu] AgustinOrtu is offline
Miembro Premium
NULL
 
Registrado: ago 2013
Ubicación: Argentina
Posts: 1.858
Poder: 15
AgustinOrtu Es un diamante en brutoAgustinOrtu Es un diamante en brutoAgustinOrtu Es un diamante en brutoAgustinOrtu Es un diamante en bruto
Es una de las cosas de FMX que molesta bastante

Realmente, el tener que agregar el nombre del tipo enumerativo adelante seguido del valor en cuestión (TAlign.Client) ensucia mucho el código

Y el código delphi siempre me gusto por lo limpio que es

Pero bueno, se soluciona creando funciones PromtMsg, InfoMsg, WarningMsg etc
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
MessageDlg FENIXadr Varios 3 07-06-2010 22:59:24
OllyDBG Version 2.0 - Pre-alpha code, Nueva versión de este increible depurador Black_Ocean Noticias 1 16-04-2008 12:51:47
como puedo hacer para cambiar un archivo de excel con versión 2.1 a versión 8.0 RONPABLO Servers 4 23-01-2006 07:02:38
MessageDlg automatico rex Varios 2 02-06-2005 01:18:57
MessageDlg scooterjgm OOP 4 22-10-2004 10:41:05


La franja horaria es GMT +2. Ahora son las 01:57:00.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi