[[AgustinOrtu]]

A ver si esto te orienta:

Código Delphi [-]

implementation

uses 
  DateUtils; 

[...]

procedure TForm1.Button1Click(Sender: TObject);
var
  FFecha, FFechaSeleccionada: TDate;

  function MismaFecha(const DateA, DateB: TDate): boolean;
  begin
    // si es la misma fecha -> devuelve True; False en caso contrario
    Result := CompareDate(FFecha, FFechaSeleccionada) = 0;
  end;

begin
  FFecha := EncodeDate(2000, 1, 1); // FFecha = 01/01/2000
  FFechaSeleccionada := Form1.DateTimePicker1FechaDesde.Date;

  if not(MismaFecha(FFecha, FFechaSeleccionada)) then
    // hacer algo
end;

Saludos