Ver Mensaje Individual
  #6  
Antiguo 28-10-2003
Avatar de rolando_s
rolando_s rolando_s is offline
Miembro
 
Registrado: oct 2003
Ubicación: Santiago Chile
Posts: 31
Reputación: 0
rolando_s Va por buen camino
Unhappy

Cita:
Posteado originalmente por roman
Entonces no debería haber ningún problema. Asegúrate de haber declarado la función "dentro" del formulario:

Código:
TForm1 = class(TForm)

public { o private}
  function TuFuncion: Tipo;
end;
y de anteponer la clase del formulario en la implementación de la función:

Código:
function TForm1.TuFuncion: Tipo;
begin
end;
la funcion es funcionando OK sin la tabla dentro
Los llamados a la tabla fuera de la funcion ok

pero dentro de la funcion no


type
Treg = Record
Fecha, horario:TDateTime;
Ano, Mes, Dia, Hora, Minuto, Segundo, MSegundo :Word;
Hora_c, Dia_c, existe : String;

Function Horarios: Treg;
var
H: TReg;
DateTime : TDateTime;
begin
DateTime := Time;
//etc etc
end;

procedure TTiempo.botonClick(Sender: TObject);
begin
Table1.Open;
//
// leer un un dat para comparar con el resto si lo ago dentro de la funcion alega
//
Table1.Close;
H1:=horarios;
Label1.Caption:= H1.Dia_c+'/'+H1.Hora_c ;
// etc etc
end;

esto funcona

y no me deja funtion tform1.horarios:treg;

Disculpa las molestias y muchas gracias

// Saludos
__________________
www.cybervanet.cl
El matrimonio es como un submarino
puede flotar pero esta diseñado para hundirse
Responder Con Cita