Veri Tabanından dosya açma

[gonulali]

Merhaba,
Yaptığım Exe programımda dosya kaydetme bölümü var. Kişi programda bilgileri girdikten sonra eğer ekleyeceği bir tutanak var ise scan yapıp program içinden veri tabanına dosyayı kaydettiriyorum. Pdf,Doc,Jpg uzantılı.. Daha sonra bu ek dosyayı okumak isteyen kişi açıp okuyabiliyor.
Yapmak istediğim bu veri tabanına kaydettirdiğim dosyayı, android ve ios telefonlarda nasıl açtırabilirim? kişi telefonundan da okumak isterse oradan açabilsin. Bunula ilgili ne yapmam gerek acaba?

[dilanorkan]

sorgulama.Active:=False;
sorgulama.SQL.Clear;
sorgulama.SQL.Add('select * from dosya');
sorgulama.SQL.Add('where kayit_id=:x1');
sorgulama.ParamByName('x1').Value:=ana_ekran.kayit_id;
sorgulama.Active:=True;

DosyaAdi := sorgulama.FieldByName('dosya_adi').AsString; //Dosyanı adı
DosyaAdi := DosyaAdi +'.'+sorgulama.FieldByName('dosya_uzantisi').AsString; //uzantısı
DosyaAdi := 'd:\'+DosyaAdi; //Hardisk yolu

(sorgulama.FieldByName('dosya_icerigi') as TBlobField).SaveToFile(DosyaAdi); //Dosyadaki asıl veri
if ac.Checked=true then
begin
ShellExecute(Handle, 'open', PChar(DosyaAdi), nil, nil, {SW_RESTORE} SW_SHOWNORMAL);
end;
sana bir örnek dostum ben aktif kullanıyorum MSSQL Server veritabanım

[COMMANDX]

VAR
BLOB:TStream;
FS:TFileStream;
YOL:Widestring;
 BEGIN
YOL:='C:\A.JPG';
BLOB :=  DM.UniQuERY.CreateBlobStream( DM.UniQuERY.FieldByName('RESIM_BLOB'), bmRead);
try
 blob.Seek(0, soFromBeginning);
   with TFileStream.Create(YOL, fmCreate) do
   try
     CopyFrom(blob, blob.Size)
   finally
     Free
   end;
finally
 blob.Free
end;
ShellExecute(Handle, 'open', YOL, '', '', SW_NORMAL);