OpenDialog->FileName te devuelve el nombre del archivo, por eso al insertar eso te graba el nombre,
debes crear un campo blob en la base de datos y y cargar el archivo a un Stream, luego este asignarlo al parámetro, de esta formap puedes guardar un jpg, doc, binarios, texto, etc, algo así:
QInsertar->SQL->Clear();
Insert = "INSERT INTO registros (descripcion) VALUES (:pdescripcion)";
TFileStream *fStream = new TFileStream(OpenDialog->FileName, fmOpenRead);
QInsertar>ParamByName("DOCUMENTO")->AsStream = fStream;
delete fStream;
QInsertar->Parameters->ParamByName("pdescripcion")->Value = Direccion;