Discussion :

[FireWolf]

Je suis en [Delphi] 2007 édition entreprise et j’utilise [Open Office] 2.1 et [Oracle 9].
J’ai un document au format Word stocké dans un THugeBlob dans une base de données oracle. Je le lis grâce en Stream sur le champ d’une TQuery et un [TConteneur]…et tout ce passe très bien. Mais aujourd’hui je voudrais l’ouvrir avec [Open Office]. Mais le TConteneur me l’ouvre toujours Word or mon but est de m’affranchir de Word. Avez-vous une idée pour résoudre mon PB ?? (Je voudrais bien qu'Open Office lise directement le stream ou le Champ HugeBlob.)

[FireWolf]

Me sent un peu seul...là...

[devyan]

Peux-tu préciser comment tu réalisais l'ouverture de ton fichier avec Word ?

Cela pourrait aider à comprendre d'où vient ton problème...

Yan.

[Clorish]

Une fois en cherchant autre chose je suis tombé la dessus.

Ca repond peut etre a tes questions.

[FireWolf]

Comme dans la base j'ai un document Word, celui-ci se lance automatiquement quand je double clique sur le Tcontainer.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
 
procedure TForm1.LectureDocDansOleContainer;
var QueryDyn : TQuery;
    Bf: TBlobField;
    Bs: TBlobStream;
begin
  if ( not DBLocal.Connected) then //DBLocal = TDataBase
    DBLocal.Connected := True;
  // Recuperation du champ BLOB modèle
  QueryDyn := TQueryLisia.Create(self);
  with QueryDyn do
  begin
    DataBaseName := 'ALiasDBLocal';
    ParamCheck := False;
    SQL.Clear;
    SQL.Add('SELECT CLEF1,CLEF2, MON_THUGEBLOB');
    SQL.Add('FROM TABLE_DOCUMENT');
    SQL.Add('WHERE CLEF1 = Val1 AND CLEF2 = Val2');
    Open;
  end;
  Bf  := QueryDyn.FieldByName('MON_THUGEBLOB') as TBlobField;
  Bs  := TBlobStream.Create(Bf, bmRead);
  try
    MainForm.OleContainer1.LoadFromStream(Bs);
    MainForm.OleContainer1.DoVerb(0);  // edit
  finally
    QueryDyn.Close;
    Bs.Free;
  end;
end;

D'après ce que j'ai lu sur les forums pour manipuler l'objet Wold du TOleContainer on peut utiliser:

Code :

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

1
2
3
4
5
 
var MyWord : Variant;
begin
    MyWord := OleContainer1.OleObject.Application.WordBasic;
end;

[FireWolf]

Mon Pb est de réussir dans mon application à lire un document word stocké dans une base de donné oracle. Je peu le récupérer dans un champ TBlobField ou dans un TBlobStream et je voudrais le lire avec open office (je n'aurais pas word sur la machine cliente). j'espère que je suis plus clair cette fois. Merci a devyan et a Clorish pour l'intérêt que vous porté à mon pb.

[Jipété]

je n'aurais pas word sur la machine cliente

Donc les documents Word (les ".doc") seront ouverts avec OO suite à installation de celui-ci (et enregistrement dans la BdR, et association des .doc à sWriter).
Donc ton truc devrait fonctionner.
Évidement c'est difficile à tester sur une machine où tu as les 2 progs installés, mais tu peux changer la manière dont tu ouvres les .doc sur la machine de test (clic droit sur un .doc, "ouvrir avec...", "choix de programme...", tu choisis sWriter et tu coches "Toujours utiliser..."), pour voir.

Mes 2 cts,
--
jp

[Clorish]

Si effectivement la machine cliente ne possede pas Word mais seulement OOo, avec les bonnes associations (oui j'ai vu des docs chargé avec Wordpad !!) ca doit marcher automatiquent. Quoi que .. a tester quand meme.

Mais le plus simple serait de lancer manuelement le serveur OLE OppenOffice grace au lien evoqué, et d'ouvrir le Stream dans ce dernier.

[Jipété]

(oui j'ai vu des docs chargé avec Wordpad !!)

Oui, dans l'install par défaut de Ouinouin, mais le setup d'OO pose la question des associations, donc il suffit de répondre avec les bons choix et zou !

--
jp

[Clorish]

mais le setup d'OO pose la question des associations, donc il suffit de répondre avec les bons choix et zou !

T'en connait beaucoup qui lisent les install ?
Je ne sais pas si ils ont activé l'ouverture par defaut des fichier doc ou pas .... mais j'ai deja vu ca

Sans compter que L'on peu refuser l'association dans un premier temps, puis desinstaller Word plus tard.

[Jipété]

Sans compter que L'on peu refuser l'association dans un premier temps, puis desinstaller Word plus tard.

Machines sans Word, je te rappelle,

T'en connait beaucoup qui lisent les install ?

Pas trop, ça c'est ben vlai

Je ne sais pas si ils ont activé l'ouverture par defaut des fichier doc ou pas

En fait c'est pendant la phase d'installation que l'assistant pose la question de l'association : le bigniou est capable d'associer les .doc, .xls, .ppt et d'autres à ses propres exe's. 'Videment faut répondre qu'on est d'accord,
--
jp

[FireWolf]

Je vais tester l'ouverture des documents directement avec open office et je vous tiens au courant!

Par contre l'idée de Clorish
Citation:
Mais le plus simple serait de lancer manuellement le serveur OLE OppenOffice grace au lien evoqué, et d'ouvrir le Stream dans ce dernier.

M'intéresse beaucoup mais je ne sais pas comment lire un stream avec Ooo...

[Clorish]

Machines sans Word, je te rappelle,

Sans word ... ne veux pas dir qu'il n'y en a jamais eu

Par contre l'idée de Clorish
Citation:
Mais le plus simple serait de lancer manuellement le serveur OLE OppenOffice grace au lien evoqué, et d'ouvrir le Stream dans ce dernier.

Si ils sont pas benet ca devrais pas etre trop compliqué.
Sinon rien ne t'empeche de copier le stream sur le Hdd dans un fichier temporaire que tu ouvre, edite, modifie, puis reintegre le fichier dans le BdD en le rechargeant dans un Stream

Bon certe, il faut vouloir le copier sur le Hdd ... question securité, c'est pas toujours conseillé. Mais vu que tu parle d'edition, je ne vois pas trop de probleme a ca .. car au pire ... le gars ..... il a qu'a copier le contenu du doc depuis OOo

[devyan]

Wouaou ! Y'a eu du monde depuis ma demande de précisions

Effectivement, ça confirme bien ce que je pensai. A savoir que l'ouverture du document est réalisée à l'aide de l'association de fichiers

Si tu sais ouvrir un fichier avec OOo, il n'y a plus trop de problème.
Même si il n'est pas possible de lui passer directement un stream en paramètre.
Il suffit simplement dans ce cas de copier ton contenu dans un fichier temporaire qu'il ne te reste plus qu'à ouvrir.

Yan.

[FireWolf]

Oui comme qui dirais j'ai des petits problèmes de drivers natifs sur sur ma machine de test : http://www.developpez.net/forums/sho...55#post2506455

[FireWolf]

J'ai enfin put faire le test :
1) Sur ma machine cliente j'ai bine installé open office.
2) J'ai associé OOo avec les fichiers Word (Word n'est pas prèsent sur cette machine)
3) Lors de l'ouverture du document avec le TOleContainer il me dit "erreur de lecture du flux" .
4) Je suis donc coincé...

[FireWolf]

Si ils sont pas benet ca devrais pas etre trop compliqué.
Sinon rien ne t'empeche de copier le stream sur le Hdd dans un fichier temporaire que tu ouvre, edite, modifie, puis reintegre le fichier dans le BdD en le rechargeant dans un Stream

Clorish, sais tu comment:
1) Ouvrir le document dans la base directement avec OOo?
C'est une super solution...
Ou,
2) Extraire le blob contenant le document et le sauver sur le disque sous forme de document (pas sous forme binaire)...J'ai essayé mais je n'ai réussi qu'a le sauver sous forme binaire.(illisible pour OOo et Word)...

Merci pour votre aide a tous, ça fais plaisir de se sentir soutenu ! Et de trouver d'autres idées.

[Clorish]

2) Extraire le blob contenant le document et le sauver sur le disque sous forme de document (pas sous forme binaire)...J'ai essayé mais je n'ai réussi qu'a le sauver sous forme binaire.(illisible pour OOo et Word)...

C'est que le stream BLOB doit contenir des infos en plus .. masi la ne n'ais pas les competences pour gerer les champs blob