Ver Mensaje Individual
  #7  
Antiguo 14-07-2021
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - Espańa
Posts: 18.325
Reputación: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Cita:
Empezado por kainchu3102 Ver Mensaje
Solo me trajo una sola fecha y me la marco en el calendario

Es correcto, pues es lo que tú le has indicado.


Código Delphi [-]
MonthCalendar1.date := DBGTURNOS.DataSource.DataSet.FieldByName('fec_tur').AsDateTime;


Con esta línea has asignado 1 fecha a la proipiedad Date del Calendario.



Cita:
Empezado por kainchu3102 Ver Mensaje
en realidad lo que quiere es que me traiga todas las fechas guardados desde un dbgrid o desde la base de datos mysqly me muestre seleccionada en el calendario
Para eso deberás ejecutar la consulta y realizar un recorrido por el resultado (todos los registros) para ir asignándolos.
Código Delphi [-]
with DataModule1.FDQuery1 Do
  begin
  SQL.Clear;
  SQL.Add ('SELECT fec_tur FROM turnos');
  Open();
  while not eof do begin
    MonthCalendar1.date := FieldByName('fec_tur').AsDateTime;
    Next;

  end;

     end;


El problema es que MonthCalendar1 sólo tiene una propiedad Date para asignar, por lo tanto en cada registro estás "machacando" la fecha del anterior. Al menos el componente estandard de Delphi.

Tendrás que buscar un componente diferente o asignar las fechas de otra manera.
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita