Gracias por su ayuda y comentarios...pues termine resolviendo el problema sin evaluar los componentes, asi que use una comprobacion directa a la vieja usanza.
Código Delphi
[-]
if ( (_Tipo_Documento.KeyValue <> null) and (Documento.Text <> '') and (_Nombre.Text <> '')
and (_Apellido.Text <> '') and (_Genero.KeyValue <> null) and (_Edad.Text <> '')
and (_Nombre_Acudiente.Text <> '') and (_Apellido_Acudiente.Text <> '') and (_Telefono.Text <> '')
and (_Direccion.Text <> '') and (_Discapacidad.KeyValue <> null) ) then begin
TInsercion.BtnClick(nbInsert);
ShowMessage ('Datos Registrados');
end else begin
ShowMessage ('Todos los Campos Deben Ser Diligenciados');
end;
y con eso me funciono bien, en cuanto a lo de la validación en el evento keypress de datos lo especifique así:
Código Delphi
[-]
procedure TForm2._TelefonoKeyPress(Sender: TObject; var Key: Char);
begin
if not(Key in ['0'..'9',#8]) then
begin
Key:=#0;
ShowMessage('Solo se Admite Numeros, Sin Punto ni Comas');
end;
end;