Ver Mensaje Individual
  #2  
Antiguo 15-04-2015
Avatar de AgustinOrtu
[AgustinOrtu] AgustinOrtu is offline
Miembro Premium
NULL
 
Registrado: ago 2013
Ubicación: Argentina
Posts: 1.858
Reputación: 15
AgustinOrtu Es un diamante en brutoAgustinOrtu Es un diamante en brutoAgustinOrtu Es un diamante en brutoAgustinOrtu Es un diamante en bruto
Buenas sorianolloret

Creo que no entendi nada, solamente se me ocurre que si son varios años, guardar algo como esto en tu tabla:

"01/01/2000 - 01/01/2015"

Eso lo podrias hacer masomenos asi:

Código Delphi [-]
interface

  function ConcatDates(DateFrom, DateTo: TDate): string; overload;
  function ConcatDates(DateFrom, DateTo: string): string; overload;

implementation

function ConcatDates(DateFrom, DateTo: TDate): string;
begin
  Result := ConcatDates(DateToStr(DateFrom), DateToStr(DateTo));
end;

function ConcatDates(DateFrom, DateTo: string): string;
begin
  Result := Format('%s - %s', [DateFrom, DateTo]);
end;

Y un ejemplo de llamada

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
    DateFrom, DateTo: TDate;
    sDateFrom, sDateTo: string;
begin
    DateFrom := EncodeDate(2000, 1, 1);
    DateTo := EncodeDate(2015, 1, 1);
    sDateFrom := '01/01/2000';
    sDateTo := '01/01/2015';

    ShowMessageFmt('Mandando dates: %s', [ConcatDates(DateFrom, DateTo)]);
    ShowMessageFmt('Mandando strings: %s', [ConcatDates(sDateFrom, sDateTo)]);
end;

Saludos y person si no entendi bien
Responder Con Cita