Código Delphi [-] Edit1.Text := FormatDateTime('dddd', DateTimePicker1.Date);
Edit1.Text := FormatDateTime('dddd', DateTimePicker1.Date);