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 19-02-2009
Mauro® Mauro® is offline
Miembro
 
Registrado: may 2003
Ubicación: Argentina
Posts: 62
Poder: 21
Mauro® Va por buen camino
Crear Unit como repositorio de Procedimientos y funciones

Hola a todos. Como estan? espero que bien.
Les escribo porque quiero crear una Unit con varias funciones comunes de mi aplicación para poder reutilizarlas, pero no se como.
La idea es poder usar esta unit desde las demas y poder así llamar a las funciones como por ej.: utiles.DiasdelMes

Si alguien me puede ayudar, le agradezco de ante mano.
Saludos a todos.
Mauro.-
Responder Con Cita
  #2  
Antiguo 19-02-2009
Avatar de dec
dec dec is offline
Moderador
 
Registrado: dic 2004
Ubicación: Alcobendas, Madrid, España
Posts: 13.107
Poder: 34
dec Tiene un aura espectaculardec Tiene un aura espectacular
Hola,

Puedes crear una nueva unidad, directamente, desde Delphi (mira el menú "File > New") y lo que lograrás será una plantilla como esta:

Código Delphi [-]
unit Unit1;

interface

implementation

end.

En la cláusula "interface" debes declarar lo que quieras compartir con otras unidades, y, en la cláusula "implementation" debes implementar lo que previamente declarases. De este modo, podrías compartir un procedimiento como este:

Código Delphi [-]
unit Unit1;

interface

procedure Foo();

implementation

procedure Foo();
begin
  // Haz algo aquí
end;

end.

Si tienes alguna otra duda...
__________________
David Esperalta
www.decsoftutils.com
Responder Con Cita
  #3  
Antiguo 19-02-2009
Avatar de BlueSteel
[BlueSteel] BlueSteel is offline
Miembro Premium
 
Registrado: may 2003
Ubicación: Concepción - Chile
Posts: 2.310
Poder: 23
BlueSteel Va por buen camino
Wink

Solo agregar que para llamar a dichas funciones o procedimientos ... debes declarar la unidad

Código Delphi [-]
unit Unit2;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, 

Forms,
  Dialogs, DB, StdCtrls;

type
  TClientes = class(TForm)
   
  // otros componentes

  
  // procedure sy funciones
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form2: TForm2;

implementation

Uses
    Unit1;

{$R *.dfm}

Salu2
__________________
BlueSteel
Responder Con Cita
  #4  
Antiguo 19-02-2009
Mauro® Mauro® is offline
Miembro
 
Registrado: may 2003
Ubicación: Argentina
Posts: 62
Poder: 21
Mauro® Va por buen camino
Muchas gracias!

Gracias por la pronta respuesta de ambos, ya he logrado poner en marcha mi Unit de Utilidades.

Saludos y buena suerte para todos.

Mauro.-
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
Como puedo crear funciones? THACKER Varios 2 27-09-2008 20:51:22
Definición de procedimientos y/o funciones mauqu Varios 2 27-08-2007 16:00:19
Unit sin clases pero con funciones jlrbotella OOP 3 01-03-2007 22:01:51
Como accedo a procedimientos de mi unit? MadeInBsAs Varios 3 08-05-2006 23:30:11
¿Como puedo ver las funciones de una Unit? Antuan Varios 10 26-08-2005 21:26:15


La franja horaria es GMT +2. Ahora son las 06:41:35.


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