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
  #21  
Antiguo 04-03-2010
Avatar de rgstuamigo
rgstuamigo rgstuamigo is offline
Miembro
 
Registrado: jul 2008
Ubicación: Santa Cruz de la Sierra-Bolivia
Posts: 1.646
Poder: 17
rgstuamigo Va por buen camino
Arrow

El problema que veo que tienes es que no has entendido el concepto de Programacion Orientado a Objeto, en éste caso si tienes un Procedure y/o funcion que esta declarado e implementado dentro de una clase, pues la única forma de llamar a tal método es instanciando un objeto de dicha clase , a no ser que lo declares como método clase(Class methods) . ,por ejemplo:
Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var MiObjeto:MiClase;
begin
   MiObjeto:=MiClase.Create;//<-- creo un objeto de tipo "MiClase" 
   MiObjeto.Hola;// Ahora ya puedo llamar al método Hola
   MiObjeto.Free;{<--Siempre despues de usar un objeto hay que liberarlo
                 es decir liberar la memoria cuando ya no se va usar mas dicho objeto}
end;

Saludos...
__________________
"Pedid, y se os dará; buscad, y hallaréis; llamad, y se os abrirá." Mt.7:7

Última edición por rgstuamigo fecha: 04-03-2010 a las 16:46:44.
Responder Con Cita
  #22  
Antiguo 04-03-2010
Avatar de CarlosHernandez
CarlosHernandez CarlosHernandez is offline
Miembro
 
Registrado: oct 2003
Posts: 139
Poder: 21
CarlosHernandez Va por buen camino
gracias roman y rgstuamigo por ese aporte, ya me funciona perfecto
__________________
begin
Elverdugo79@hotmail.com
end;
Responder Con Cita
  #23  
Antiguo 04-03-2010
Avatar de rgstuamigo
rgstuamigo rgstuamigo is offline
Miembro
 
Registrado: jul 2008
Ubicación: Santa Cruz de la Sierra-Bolivia
Posts: 1.646
Poder: 17
rgstuamigo Va por buen camino
Arrow

Viendo un poco lo que pretendías hacer con éste códico >
Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
 MiClase.hola;
end;
y explicando un poco sobre los métodos de clase (Class methods) que te mencioné en mi anterior post , pues se puede lograr que tu anterior código funcione, tan solo deberias declarar al metodo "hola" como método de clase de ésta forma:
Código Delphi [-]
...
type
  MiClase = Class
  private
    { Aqui se pone todas las declaraciones privadas }
  public
    { Aqui se pone todas las declaraciones públicas }
    class procedure Hola();//este método es un método de clase
  end;
....
Bueno ..desde luego que la implementación del método "hola" tambien debe llevar la palabra reservada "class">
Código Delphi [-]
...
class procedure TMiClase.Hola;
begin
ShowMessage('Hola');
end;
...
En otros lenguajes de programacion como por ejemplo Java o C++ ésto se llama métodos estáticos(static).
Ésto significa que ya no necesito tener un objeto creado(instanciado) de la clase para poder llamar al método "hola", lo puedo hacer directamente atraves de la clase tal como tú lo hiciste , es decir asi:
Código Delphi [-]
...
MiClase.hola;//Ahora si puedo llamar al procedure "Hola" por que es un método de clase. 
...
Para más informacion sobre los método de clases ver la ayuda de Delphi presionando la tecla F1.
Saludos...
__________________
"Pedid, y se os dará; buscad, y hallaréis; llamad, y se os abrirá." Mt.7:7

Última edición por rgstuamigo fecha: 04-03-2010 a las 17:28:03.
Responder Con Cita
  #24  
Antiguo 04-03-2010
Avatar de CarlosHernandez
CarlosHernandez CarlosHernandez is offline
Miembro
 
Registrado: oct 2003
Posts: 139
Poder: 21
CarlosHernandez Va por buen camino
tambie lo probe y funciona perfecto
__________________
begin
Elverdugo79@hotmail.com
end;
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

Temas Similares
Tema Autor Foro Respuestas Último mensaje
llamar a un Store Procedure BlueSteel Firebird e Interbase 6 05-07-2006 09:01:40
Llamar Un Stored Procedure Desde Un Trigger ibuser Firebird e Interbase 3 26-08-2004 09:51:48
¿Como puedo llamar un Procedure desde otra unit? athal Lazarus, FreePascal, Kylix, etc. 11 17-05-2004 01:05:20
Llamar stored procedure con BDE Ricardo Alfredo Conexión con bases de datos 3 12-09-2003 03:09:31
llamar a un procedure desde otro negama Conexión con bases de datos 1 28-08-2003 01:22:15


La franja horaria es GMT +2. Ahora son las 10:41:17.


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