QRDBText2->DataField=ModuloDatos->IBQuery1->FieldValues["NOMBRE"];
QRDBText3->DataField=ModuloDatos->IBQuery1->FieldValues["APELLIDO"];
QRDBText4->DataField=ModuloDatos->IBQuery1->FieldValues["APELLIDO2"];