días de la semana

[[AgustinOrtu]]

Podes hacerlo en un evento desde Delphi o en la propia sentencia SQL (nunca lo hice yo de esta manera)

Desde delphi, tenes que asignar un metodo en el evento OnGetText del campo. Asi como accedes al valor usando FieldByName('fraFecha').Value, podes hacer algo como esto

Código Delphi [-]

interface

  TForm1 = class(TForm)
  ...
  private
    function WeekDayToStr(Day: integer): string;
    procedure fraFechaOnGetText(Sender: TField; var Text: string; DisplayField: boolean);

Código Delphi [-]
function TForm1.WeekDayToStr(Day: integer): string;
begin
  case Day of
    0: Result := 'Lunes'; // o domingo, eso no se como lo modelas
    1: Result := 'Martes';
    .. 
  end;
end;

procedure TForm1.fraFechaOnGetText(Sender: TField; var Text: string; DisplayField: boolean);
begin
    if not(Sender.IsNull) then
        Text := WeekDayToStr(Sender.AsInteger);
end;

Y en algun evento antes de pedir los datos, o en el OnCreate, OnShow del form.. asignas a tu campo este evento, asi

Código Delphi [-]
  with DataSet, Query, etc.. do  
    FieldByName('fraFecha').OnGetText := fraFechaOnGetText;

Obviamente el DataSet, Query.. debe estar creado (no es NIL) y abierto, para que pueda "ver" al campo

Saludos