Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Conversión del tiempo (https://www.clubdelphi.com/foros/showthread.php?t=7655)

lore 23-02-2004 03:06:29

Conversión del tiempo
 
Hola a todos. :)

Estoy realizando una aplicación en que los datos que ingresen en un edit y se muestren en una grilla se vean como valores enteros, pero que en realidad sean del tipo TDateTime. El valor que ingreso quiero que se refiera a los minutos. Desde ya muchas gracias.

Saludos. :)

jachguate 23-02-2004 05:52:27

No indicas si estos datos están en una tabla o no... cómo te referis a una grilla asumo que si.

Entonces, podes basarte en los eventos OnGetText y OnSetText para convertir el valor del TDateTime en la representación que te convenga y viceversa.

Hasta luego.

;)

lore 23-02-2004 19:49:49

Muchas gracias por constestar. :)

Sería mucho pedir un ejemplo así lo pudiera comprender.

Saludos. :)

jachguate 24-02-2004 03:17:26

Código:

Procedure Form1Table1Campo1GetText(Field : TField; var Text : String);
  // de los parámetros no me recuerdo bien...

Begin
  Case Tabla1Campo1.AsInteger of
    1 : Text := 'uno';
    2 : Text := 'dos';
    3 : Text := 'tres';
    4 : Text := 'cuatro';
  else
    Text := 'mayor que cuatro';
  end;
end;

Procedure Form1Table1Campo1SetText(Field : TField; const Text : String);
  // de los parámetros no me recuerdo bien...

Begin
  if text = 'uno' Then
    Tabla1Campo1.AsInteger := 1
  else if text = 'dos' Then
    Tabla1Campo1.AsInteger := 2
  else if text = 'tres' Then
    Tabla1Campo1.AsInteger := 3
  else if text = 'cuatro' Then
    Tabla1Campo1.AsInteger := 4
  else
    raise exception.Create('Valor inválido para este campo!');
end;

algo asi...

Hasta luego.

;)

lore 25-02-2004 15:23:08

Muchas gracias Juan Antonio.

El ejemplo que pusiste se me hace muy difícil adaptarlo a mis necesidades. Serías tan amable de poner algo para que me fuera un poco más útil. Disculpá las molestias.

Saludos. :)

roman 25-02-2004 15:31:43

Cita:

Empezado por lore
El ejemplo que pusiste se me hace muy difícil adaptarlo a mis necesidades. Serías tan amable de poner algo para que me fuera un poco más útil.

¿En qué no se adapta a tus necesidades? El ejemplo del compañero Jachguate es un perfecto ejemplo general para saber cómo manejar los eventos y hacer las conversiones que consultaste. ¿Qué más deseas?

// Saludos


La franja horaria es GMT +2. Ahora son las 20:14:22.

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