cmelocpv Aprendiz

Registrado: Segunda-Feira, 10 de Novembro de 2014 Mensagens: 129
|
Enviada: Qui Jan 14, 2016 5:37 pm Assunto: Como Banco Dados com StringGrid |
|
|
Boa noite, e o seguinte eu ate consigo pegar as informações do banco so que não esta colocando na posição correta no stringgrid.
Hora--- segunda----terca----quarta----quinta----sexta-----sábado
-------------------------------------------------------------------------
08:00----------------XXXXX-------------XXXXX-----------------------
quando executo o valor de XXXXX que esta na terca teria que estar na quarta e o de quinta na sexta, o que eu posso estar errando na hora de mostar
| Código: | for X:= 1 to gridsemana.RowCount -1 do
begin
Hora := horagrid;
for I := 2 to 7 do
begin
cds_Agenda.Filter := 'AGE_ID_COLAB = '''+ inttostr(vcolab)+
''' AND AGE_DATA = ''' + DateToStr(Datainicial + I) +
''' AND AGE_HORA = ''' + FormatDateTime('hh:mm',hora)+'''';
if cds_Agenda.RecordCount > 0 then
begin
gridsemana.Cells[I,X] := cds_AgendaAGE_Cliente.Value + ' (' + cds_AgendaAGE_Hora.Value + ')';
end
else
gridsemana.Cells[I,X] := '';
end;
end; |
não sei se consegui me explicar mas é isso ... valeu |
|