Hola
1-La comparación se saca de un dato Texto (combobox).
2-La comparación es de un solo dato, osea, no de varios ITEMS del combobox.
3-La hora si es Time no se podrá comparar con un string (tal como lo pretendes hacer).
Código Delphi
[-]
var
i: integer;
Fecha, Hora : String;
begin
Fecha:= FormatdateTime('mm/dd/yyyy',(now));
Hora:= FormatdateTime('hh:nn:ss',(now));
for i:= 0 to cmbfecha.Items.Count do
begin
if (cmbFecha.Text = Fecha)
and (Hora < '10:18:00') then
label2.caption:= IntToStr(i);
end;
end;
Saludos