Crear procedimiento !!!

[Ledian_Fdez]

Amigos:
Ya no da el error, magnifico. He aprendido mucho aca con ustedes hoy, pero ... a la hora de llamar al procedimiento

Código Delphi [-]
DM.Carga_Cuadro_Combinado(ComboBox1);

en cualquiera de los formularios me da el error undeclared identifier:'Carga_Cuadro_Combinado'. Les aclaro que tengo en uso el DM


Con otra ayuda soluciono el problema.

Saludos Ledian

[[maeyanes]]

Pusiste la declaración del procedimiento en la sección public del DataModule?

Código Delphi [-]
TMiDataModulo = class(TDataModule)
  // Componentes y eventos
private
  { Private declarations }
public
  { Public declarations }
  procedure Carga_Cuadro_Combinado(ComboBox: TComboBox);
end;

Saludos...

[Ledian_Fdez]

Hola de nuevo

al poner la declaración del procedimiento en la sección public del DataModule

Código Delphi [-]
TMiDataModulo = class(TDataModule)
  // Componentes y eventos
private
  { Private declarations }
public
  { Public declarations }
  procedure Carga_Cuadro_Combinado(ComboBox: TComboBox);
end;

Me genera el siguiente error:
Unsatisfied forward or external declaration: 'TMiDataModulo.Carga_Cuadro_Combinado'


¿Qué estoy haciendo mal

Saludos.. Ledian

[[fer21unmsm]]

Empezado por Ledian_Fdez

Hola de nuevo

al poner la declaración del procedimiento en la sección public del DataModule

Código Delphi [-]TMiDataModulo = class(TDataModule) // Componentes y eventos private { Private declarations } public { Public declarations } procedure Carga_Cuadro_Combinado(ComboBox: TComboBox); end;


Me genera el siguiente error:
Unsatisfied forward or external declaration: 'TDM.Carga_Cuadro_Combinado'


¿Qué estoy haciendo mal

Saludos.. Ledian

Hola, ese mensaje de error siempre lo veo salir cuando se ha declarado un método o función en una clase pero se ha implementado, en realidad no me he leído todos los mensaje. De casualidad en vez de "TDM", no debería ser "TMiDataModulo", es decir:
TMiDataModulo.Carga_Cuadro_Combinado

Saludos.

[Ledian_Fdez]

Tienes razon fer21unmsm pero eso solo fue un error a la hora de transcribir el mensaje de error. Ruego que me disculpen.

ya lo corregi mas arriba.
Ahora por favor alguien me ayuda...

gracias de antemano

saludos Ledian.

[[maeyanes]]

Tienes implementada en la sección implementation de la unidad el código del procedimiento Carga_Cuadro_Combinado? Si no es así, es por eso que te sale ese error...


Saludos...

[Ledian_Fdez]

No se si es a este orden al que te refieres.

Código Delphi [-]
implementation

uses ConsUnit, MunUnit, ProvUnit, TallerUnit, SituacionUnit;

{$R *.dfm}

procedure LLena_Provincia(MyCombo:TComboBox);

mi pregunta ahora es como poner el procedure publico

Ledian.