Delphi - Donde declaro los procedimientos y funciones

 
Vista:

Donde declaro los procedimientos y funciones

Publicado por Daniel Garcia (1 intervención) el 28/01/2002 04:45:59
Hola a todos, estuve leyendo algunas respuestas que se han dado al respecto en este foro pero sigo sin entender, quiero tener funciones o procedimientos disponibles desde cualquier puntoo de mi aplicacion y no puedo !!!!!, si tengo una uunidad que sea rutinas:
unit URutinas;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;

type
TFRutinas = class(TForm)
private
{ Private declarations }
public
{ Public declarations }
end;

var
FRutinas: TFRutinas;

implementation

uses UTable, Unit1;

{$R *.DFM}

Procedure bloqueo;
begin
end;

Procedure desbloqueo;
begin
end;

Function consultabloqueo(wbloqbase, wbloqreg : String): String;
begin

end;

end.

como hago para llamarlas desde otro lado en donde la declaro en la clausula uses de la uinidad de donde la pretendo llamar?????

Gracias de antemano
Saludos
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Donde declaro los procedimientos y funciones

Publicado por Diego Romero (67 intervenciones) el 28/01/2002 07:50:27
Mueve los emcabezados de las funciones y procedimientos a la parte public de la declaración del From, eso bastará.
Pero si no haces referencia en el codigo de esas funciones y proc a algún objeto del Form en el que están declarada te conviene armar una nueva Unit que solo contenga esas funciones y proc, esa nueva Unit quedaría mas o menos asi.
Unit Funciones_Varias;
uses {las que necesites }
interface
{encabezados de las funciones y procs exportadas, es decir las que pueden ser usadas por otras units}
implementation
{desarrolla las funciones y procs aquí}
begin
end.
Luego no tienes mas que declarar en las Uses de las otras units esta nueva units para poder usar las funciones y procs que declaraste en la parte interface.
Saludos.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Donde declaro los procedimientos y funciones

Publicado por mamcx (533 intervenciones) el 29/01/2002 18:49:20
Ejemplo

// La unit con las funciones
unit URutinas;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;

Procedure bloqueo;

implementation

Procedure bloqueo;
begin
end;

end.

//La unit que llama las funciones

unit Otra;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
URutinas; =====AQUI SI NO HACE PARTE DEL PROYECTO; O NO CONTIENE FORMS; O ES UNA RUTINA GLOBAL PARA USARSE EN VARIAS APPLICACIONES (Por ejemplo Dialogs es para culquier app)

implementation

uses URutinas; === AQUI SI REFERENCIAS UN FORMULARIO O ES DENTRO DEL PROYECTO...

Procedure OtraFuncion;
begin
Bloquear;//Ya puedes llamar. Talvez necesites compilar despues de poner en el uses si por casualidad no te muestra el CodeInsigth
end;

Procedure desbloqueo;
begin
end;

Function consultabloqueo(wbloqbase, wbloqreg : String): String;
begin

end;

end.

En resumen:

En uses colocas units globales yy/o externas

En Implementation Uses colocas las unit locales...
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar