Otra opción es un campo calculado.
- Botón derecho sobre la tabla.
- Fields Editor
- Botón derecho sobre el Editor.
- New Field
Le dices que es tipo string.
En OnGetText:
- Pones el procedimiento que te transforma el campo bigint a horas y minutos.
Código Delphi
[-]
procedure TDataModule.TablaCAMPOCALCGetText(Sender: TField;
var Text: String; DisplayText: Boolean);
begin
Text := Convierte_Min_En_Horas(TablaCAMPO_BIG_INT.AsInteger);
end;
En OnSetText:
- Convientes las horas y minutos y las pones en el campo bigint.
Código Delphi
[-]
procedure TDataModule.TablaCAMPOCALCSetText(Sender: TField;
const Text: String);
begin
TablaCAMPO_BIG_INT.AsInteger := Convierte_Horas_En_Minutos(Text);
end;