datamodule1.QAspirante.SQL.Text:='update aspirante set email='+chr(39)+suiedit1.Text+chr(39)+[B]',fechanac='+chr(39)+datetimepicker1.format+chr(39)[/B]+ ',experiencialaboral='+chr(39)+suimemo1.Text+chr(39)+ 'where email='+chr(39)+suiedit1.Text+chr(39);