Data e dia da semana ! Socorro !

Question

Prezados colegas,Estou fazendo um relat�rio de agenda no qreport com os seguintes campos:Data         HoraA data � escrita no formato dd/mm/aaaa. Estou querendo colocar um label em frente a data infor...

Evandro Massini · Answer

Tente o seguinte:label1.caption:=formatdatetime(�dddd�,data);At� mais......

Bilouro · Answer

Naum vai precisar do dayofweek, use assim por exemplo:

showmessage(FormatDateTime(�dddd�,date));

agora se quiser garantir que seja exibido sempre em portugues mesmo em um sistema em ingl�s:

procedure geradata;
var
dias: array[1..7] of string;
begin
dias[1]:=�Domingo�;
dias[2]:=�Segunda-feira�;
dias[3]:=�Ter�a-feira�;
dias[4]:=�Quarta-feira�;
dias[5]:=�Quinta-feira�;
dias[6]:=�Sexta-feira�;
dias[7]:=�Sabado�;
showmessage(dias[DayOfWeek(date)]);
end;

[]�s