Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 01-11-2003
[Waldo] Waldo is offline
Miembro Premium
 
Registrado: sep 2003
Posts: 101
Poder: 21
Waldo Va por buen camino
Procedimientos

Hola!.

Tengo un datamodule, tengo unos procedures que crie y pues no se como hacerle para que ese procedimiento funcione para todas mis forms.
Responder Con Cita
  #2  
Antiguo 01-11-2003
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Si por "funcionar en todas mis forms" te refieres a poderlos usar en todas ellas debes incluir la unidad del datamodule en cada formularios en la cláusula uses y accederías a los procedimientos así:

DataModule1.Procedimiento.

Por cierto, ésta no es en realidad una pregunta de componentes así que la moví del foro "OOP" a este foro.

// Saludos

Última edición por roman fecha: 01-11-2003 a las 07:16:47.
Responder Con Cita
  #3  
Antiguo 01-11-2003
[Waldo] Waldo is offline
Miembro Premium
 
Registrado: sep 2003
Posts: 101
Poder: 21
Waldo Va por buen camino
ok eso lo de uses lo entiendo
pero me refiero a que ya cree mis procedimientos
ahora los tengo que declarar en algun encabezado del datamodule?
Responder Con Cita
  #4  
Antiguo 01-11-2003
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Si tus procedimientos son parte de la clase del datamodule:

Código:
type
  TDataModule1 = class(TDataModule)
  public
    procedure TuProcedimiento;
  end;
no tienes que hacer nada más de lo que te comenté antes.

Si te refieres a procedimientos declarados fuera de la clase del datamodule entonces sí debes añadir el encabezado en la sección interface:

Código:
interface
type
  TDataModule1 = class(TDataModule)
    ...
  end;

procedure TuProcedimiento;

implementation

procedure TuProcedimiento;
begin
  { código del procedimiento }
end;
// Saludos
Responder Con Cita
  #5  
Antiguo 01-11-2003
[Waldo] Waldo is offline
Miembro Premium
 
Registrado: sep 2003
Posts: 101
Poder: 21
Waldo Va por buen camino
Gracias!...
Responder Con Cita
Respuesta



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


La franja horaria es GMT +2. Ahora son las 21:16:01.


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