Fórum duvida stringgrid ??? #414685

boa tarde amigos do forum, estou precisando de uma ajuda de voces, e o seguinte, tenho aki um mapa de disponibilidade feito em excel, preciso criar do mesmo jeito em delphi, so que nao sei como,
ai vai a imagem do mapa: http://img59.imageshack.us/img59/8669/mapab.png
ele tem que ser baseado no mes selecionado em um combobox, ja ate começei a fazer o formulario, mas nao estou conseguindo fazer o esquema dos dias dos meses e dias da semana
imagem do formulario:http://img585.imageshack.us/img585/6269/telaform.png
ate a parte de carregar os dados da consulta no stringgrid eu consegui, repare que acima do string grid tem 31 edits exibindo dias do mes e 31 edits exibindo dias da semana de acordo com o dia do mes, so que preciso que seja exibido dentro do stringgrid, pois queria fazer tudo dentro do stringgrid porque depois disso preciso selecionar os dias que o apartamento esta ocupado como no exemplo do excel.
se alguem puder me ajudar nessa empreitada ficarei grato pois sou novato em delphi ainda ....
segue abaixo a rotina que estou tentando ...
with mapa do
begin
Close;
sql.Clear;
sql.Add(select imoveis.nome_condominio,imoveis.num_ap,imoveis.per_bl_ini,imoveis.per_bl_fim,imoveis.nome_cli,imoveis.quant_pessoas from imoveis +
where imoveis.nome_condominio = :condominio);
ParamByName(condominio).Value := RxDBLookupCombo1.Text;
Open;
First;
contador := 1;
with StringGrid1 do
begin
while not Eof do
begin
ColCount := 31;
RowCount := contador + 1;
colwidths[0] := 149;
colwidths[1] := 50;
colwidths[2] := 60;
rowcount := contador + 1;
font.size := 7;
cells[0,0] := CONDOMÍNIO;
cells[1,0] := PAX;
cells[2,0] := APTO;
cells[0,contador] := mapanome_condominio.value;
cells[1,contador] := inttostr(mapaquant_pessoas.value);
cells[2,contador] := mapanum_ap.value;
inc(contador);
next;
end;
end;