Zitat von
chest3rs:
Hab ich auch schon ausprobiert, nur bereiten mir die Spinbuttons Probleme.
Dann blende ihn aus:
Delphi-Quellcode:
Procedure HideSpinButton(oPicker: TDateTimePicker);
Var
oHandle: HWND;
Begin
If assigned(oPicker) Then Begin
oHandle := oPicker.Handle;
oHandle := FindWindowEx(oHandle, 0, 'msctls_updown32', Nil);
Windows.ShowWindow(oHandle, SW_HIDE);
End;
End;
Procedure TForm1.Button1Click(Sender: TObject);
Begin
HideSpinButton(DateTimePicker1);
End;