Abrir desde access un campo ole que tiene un .pdf

[RICTAPIA5]

para guardarlo:

adoQrCandidatos.edit;
TBlobField(adoQrCandidatos.FieldByName('imsspdf')).LoadFromFile(OpenDialog1.FileName);
adoQrCandidatos.post;

para leerlo:
procedure TfrmGestionarCandidato.SpeedButton4Click(Sender: TObject);
var
St:Array [0..255] of char;
archivo : string;
begin
archivo := adoQrCandidatos.FieldByName('idCandidato').asstring+'.pdf';
TBlobField(adoQrCandidatos.FieldByName('imsspdf')).SaveToFile('c:\temp\'+archivo) ;
ShellExecute(Handle,'open',StrPCopy(St,'c:\temp\'+archivo),nil,nil,SW_SHOW);
end;