Discussion :

[yam49]

Bonjour,

Je souhaite pouvoir enregistrer un fichier WORD dans une base de données. Pour ce faire la base gère les BLOB, je n'ai aucun problème avec des images grace au composant DBImage

Mais comment faire avec un fichier WORD

Merci de votre aide,

Cordialement

nb: jusqu'a present je stockais le fichier word sur disque et je ne stockais que le chemin d'acces dans la base, cela marche bien mais pose un problème de confidentialité, le fichier word restant lisible car stocker sur un disque reseau

[cmen76]

BLOB c'est Binary Large OBject
Donc typiquement on peut y stocker n'importe quoi de n'importe quelle taille ; donc aussi un doc Word
Tu récupères un TBLOBField
Pour l'utiliser, tu disposes des méthodes SaveToFile, SaveToStream, et LoadFromFile et LoadFromStream.
Attention cependant pour certains SGBD à la configuration (BLOBSIZE) qui pourrait tronquer le BLOB trop grand.

[yam49]

J'ai bien compris ce qu'est un BLOB et comment on les manipule

Cependant, je ne vois pas du tout comment passer d'un fichier word sur mon disque, que je souhaite stocker dans la base grace à un programme delphi et ensuite pouvoir revisualiser avec une application delphi

Pour visualiser des document word j'utilise actuellement un OLECONTAINER

Cela fonctionne bien pour lire le fichier word, mais je n'arrive pas à stocker ce que j'ai dans l'objet dans ma base

Aurrai tu un exemple de code

Merci de ton aide, je doit certainement sauter une étape

[cmen76]

Pour sauvegarder

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
  olecontainer.SaveAsDocument(tmpdoc);
  // T.edit
  T.BlobField.LoadFromFile(tmpdoc);
  // T.Post
  Deletefile(tmpdoc)

Pour recharger

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
  T.BlobField.SaveToFile(tmpdoc);
  OleContainer.CreateObjectFromFile(tmpdoc, false);
  OleContainer.DoVerb(ovPrimary);

[yam49]

Merci pour tout, cela fonctionne et repond à mes attentes