Hola amigos, tengo la siguiente situación: tengo un dbgrid y quiero mostrar todos los valores que arroja en el cuerpo de un mensaje para mandar por mail. En el siguiente código, hice lo que mas pude pero solo me muestra el registro que selecciono de la grilla.
Necesito que me ayuden con esto, sé que el tema se ha tratado, como por ejemplo vi algo de datasettableproducer, no tengo drama en implementar lo que sea, solo necesito un ejemplo.
Código Delphi
[-]ShellExecute(GetDesktopWindow(),
nil,
pChar('mailto:'+(mail)+ '?subject=' + 'Informe sobre su situacion con '+(DM.IBQuery_materiaNOMBRE.Value)
+ '&body=' + 'Su situacion es la siguiente: '+'%0D%0A'+ 'Cantidad de Faltas: '+(Label_c_falta.Caption)+'%0D%0A'
+ ' Faltas Justificadas: '+(Label_f_jus.Caption) +'%0D%0A'+ ' Faltas Injustificadas: '+(Label_f_injus.Caption)+'%0D%0A'
+ ' Cantidad Faltas Disponibles: '+(Label_c_f_disp.Caption)+'%0D%0A' + ' Porcentaje Permitido: '+(Label_p_permitido.Caption)+'%0D%0A'
+ ' Situcion con la Materia: '+(Label_s_materia.Caption)+'.' + '%0D%0A' + '%0D%0A' +' Fecha ' + ' Cantidad de Horas ' + ' Tipo de Falta '
+ ' Detalles '+ '%0D%0A'
+DateToStr(DM.ConsultaAistenciaFECHA.Value) + ' ' + inttostr(DM.ConsultaAistenciaC_HORA.Value)+ ' '+ (DM.ConsultaAistenciaTIPO_FALTA.Value) + ' '
+ (DM.ConsultaAistenciaDETALLE.Value)),
nil,
nil,
SW_SHOWNORMAL);
Desde ya muchas gracias,saludos!!!