Ver Mensaje Individual
  #2  
Antiguo 10-06-2004
Avatar de cbrrr
cbrrr cbrrr is offline
Miembro
 
Registrado: jun 2004
Posts: 57
Reputación: 20
cbrrr Va por buen camino
Más o menos podría ser una cosa así (faltaría afinarlo un poco, pero bueno, para que pilles la idea)

Código Delphi [-]
 procedure TForm1.FormCreate(Sender: TObject);
 var
   t1, t2, t3: TTime;
 begin
   t1 := StrToTime('09:00:00');
   t3 := StrToTime('09:05:00') - t1;
   t2 := StrToTime('10:00:00');
   while t1 <= t2 do
   begin
     ComboBox1.Items.Add( DateTimeToStr(t1) );
     t1 := t1 + t3;
   end;
 end;
Espero que te sea de ayuda
__________________
Si no tienes algo que decir más importante que el silencio, cállate
Responder Con Cita