DateTimePicker Wochentag

[RavenIV]

In der Delphi-Hilfe ist ein Beispiel dabei.
Vielleicht gibt Dir das einen Anhaltspunkt.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);

var
  ADate: TDateTime;
  days: array[1..7] of string;
begin
  days[1] := 'Sunday';
  days[2] := 'Monday';
  days[3] := 'Tuesday';
  days[4] := 'Wednesday';
  days[5] := 'Thursday';
  days[6] := 'Friday';
  days[7] := 'Saturday';
  ADate := StrToDate(Edit1.Text);
  ShowMessage(Edit1.Text + ' is a ' + days[DayOfWeek(ADate)];
end;

/edit:
Och Menno, zu langsam
Gleich zweimal zu langsam