Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   Sobrecarga de propiedades (https://www.clubdelphi.com/foros/showthread.php?t=85256)

jzginez 21-02-2014 01:25:45

Sobrecarga de propiedades
 
Hola amigos he estado buscando referencias a este tema y no encuentro nada, al parecer y por lo que me indica delphi no se puede pero prefiero preguntarles a ustedes, los expertos, es posible hacer esto:

Código Delphi [-]
....
  private
    { Private declarations }
    Registro: Integer;
    Function LeeBoton: Integer; overload;
    Function LeeBoton(ID: Integer): Integer; overload;
  public
    { Public declarations }
    Property Resultado: Integer Read LeeBoton; overload;
    Property Resultado(ID: Integer): Integer Read LeeBoton2(ID: Integer); overload;
  end;

El error que me da es:
property getters and setters cannot be overload

La explicación de lo que necesito es muy simple, esta forma contiene TDatasource, Tedit, TCheckBox, etc, la mando a llamar desde otra forma a travez de la propiedad resultado y me pone la base en modo de insertar y puedo escribir los nuevos datos, validarlos y guardarlos (con diferentes procedimientos por supuesto), ahora lo que quiero hacer con la sobrecarga es que al mandarle como parametro el id me muestre los datos del registro seleccionado y me ponga la base en modo edición

Gracias

ecfisa 21-02-2014 05:27:23

Hola jzginez.

En principio, el método de lectura de la segunda declaración de propiedad,
Código Delphi [-]
 
...
    Property Resultado(ID: Integer): Integer Read LeeBoton2(ID: Integer);
viola la definición de esta última.

Cuando en una propiedad los módos de lectura y escritura son métodos, se tiene que cumplir que:
  • El método de lectura sea una función sin parámetros que devuelva un valor del mismo tipo que el declarado en la propiedad.
  • El método de escritura sea un procedimiento con un sólo parámetro cuyo tipo sea igual al declarado en la propiedad.

Por otro lado, Embarcadero dá una aclaración sobre el error que comentas en este enlace: E2271 Property getters and setters cannot be overloaded (Delphi)


Saludos :)

roman 21-02-2014 17:58:09

Cita:

Empezado por jzginez (Mensaje 472874)
la mando a llamar desde otra forma a travez de la propiedad resultado y me pone la base en modo de insertar y puedo escribir los nuevos datos, validarlos y guardarlos (con diferentes procedimientos por supuesto), ahora lo que quiero hacer con la sobrecarga es que al mandarle como parametro el id me muestre los datos del registro seleccionado y me ponga la base en modo edición

Podrías usar siempre un parámetro pasando 0 cuando lo que requieras sea insertar en lugar de editar . Aún así, creo que tu definición de la propiedad no es correcta (debes usar corchetes [] en lugar de paréntesis) para que sea una propiedad tipo arreglo.

De todas maneras, pienso que la semántica de una propiedad de lectura no es adecuada para lo que quieres hacer y se prestaría a confusiones. Yo usaría un método en lugar de una propiedad.

// Saludos


La franja horaria es GMT +2. Ahora son las 15:48:30.

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