Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   Utilizar procedures sin form... (https://www.clubdelphi.com/foros/showthread.php?t=62848)

Jose Roman 16-01-2009 20:18:51

Utilizar procedures sin form...
 
Hola a todos, Resulta que tengo una aplicacion, la cual tiene tres forms, cada uno se dedica realiza un procedure en comun (la impresion de facturas o recibos de caja), mi pregunta es ¿como hago para declarar una unit nueva en la que se puedan imprimir los datos que cada formulario ingresa sin tener que escribirle a cada form el mismo codigo?, esto sin tener que crear la unit con un form. gracias

dec 16-01-2009 20:22:03

Hola,

En principio, nada te impide añadir una nueva unidad en tu proyecto, que, por supuesto habrías de incluir (en alguna de las cláusulas "uses") en las unidades donde quisieras utilizarla. En la nueva unidad implementarías el procedimiento en cuestión, y, este quedaría disponible para cualquiera que hubiera incluido la unidad correspondiente.

Por ejemplo:

Código Delphi [-]
unit MyUnit;

interface

procedure Foo();

implementation

procedure Foo();
begin
  // Here the code
end;

end.

Añadiendo la unidad "MyUnit" en cualquier otra unidad, ya podrías utilizar el procedimiento "Foo()" que se implementa en la misma.

roman 16-01-2009 20:22:19

En el IDE:

File|New|Unit

// Saludos

Jose Roman 16-01-2009 20:34:39

Muchas gracias las soluciones me han servido.


La franja horaria es GMT +2. Ahora son las 18:06:09.

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