Preencher StringGrid

[Faccruz 0]

Bom dia, preciso fazer algo semelhante a esse Link, porém gostaria de exibir todos os horários de 00:00 até 23:30 (30 em 30 minutos), e caso algum horário esteja preenchido exibir um campo determinado.

 

No exemplo do tópico, ele exibe apenas os horários preenchidos, eu gostaria de exibir todos (preenchidos e não preenchidos)

 

Alguem teria alguma idéia de como fazer?

[bdexterholland 0]

Camarada, acredito que isto irah lhe ajudar:

var
  I: Integer;
  Hora : TTime;
begin
  Hora := StrToTime('00:00');
  for I := 1 to 48 do
    begin
      StringGrid1.Cells[0,I] := TimeToStr(Hora);
      Hora := Hora + StrToTime('00:30');
    end;