Ver Mensaje Individual
  #1  
Antiguo 01-03-2007
jlrbotella jlrbotella is offline
Miembro
 
Registrado: ene 2007
Posts: 185
Reputación: 18
jlrbotella Va por buen camino
Unit sin clases pero con funciones

Hola:

Tengo un unit que no tiene clases, con un procedure. El unit se llama libreria y el procedure se llama dibujar. Cuando lo llamo desde otro unit, le indico en bloque use libreria, pero cuando le llamo desde una funcion del unit no la encuetra. Ej:


Código Delphi [-]
unit libreria;
 
interfaces
 
uses dialogs;
 
implementation
 
procedure dibujar;
begin
showmessage('hola');
end;
 
end.
 
//el otro unit
 
unit main;
 
interfaces
 
uses forms, libreria
 
type
TForm = class(TForm)
public:
procedure botonclick;
 
...
 
implementation
 
procedure Tform.botonclick;
begin
libreria.dibujar;
 
//Error compilador no encuentra la función dibujar del unit libreria.
end;
 
end.

Última edición por roman fecha: 01-03-2007 a las 20:51:42. Razón: Corregir etiqueta [delphi]
Responder Con Cita