Le problème avec Windev c'est qu'on ne gère pas les variants comme avec
delphi il faut utiliser des objets OLE Dynamiques et qu' la conversion ca
plante !!!
Sais tu si il existe une DLL delphi qui permet d'effectuer l'OLE assez
complet avec oO ?
D'avance Merci
_____________________________________________
De : FAouzi Abderrahman [mailto:fa...@prosig.fr]
Envoyé : vendredi 24 février 2006 14:32
À : pr...@fr.openoffice.org
Objet : [Norton AntiSpam] RE: [prog] OLE OpenOffice et VB.NET
Voici un exemple qui marche correctement avec Delphi :
procedure TOOoWriter.SaveToPDF(FileName: string);
var
wProperties: variant;
begin
if not (fConnected and fDocumentOpened) then
abort;
wProperties := VarArrayCreate([0, 0], varVariant);
wProperties[0] := MakePropertyValue('FilterName', 'writer_pdf_Export');
fDocument.StoreToURL('file:///'+ StripString(FileName, ['\'], '/'),
wProperties);
end;
function TOOoWriter.MakePropertyValue(PropName: string;
PropValue: variant): variant;
var
Struct: variant;
begin
Struct :=
fOpenOffice.Bridge_GetStruct('com.sun.star.beans.PropertyValue');
Struct.Name := PropName;
Struct.Value := PropValue;
Result := Struct;
End Function
_____________________________________________
De : Cezame Concept [mailto:ceza...@wanadoo.fr]
Envoyé : vendredi 24 février 2006 14:13
À : pr...@fr.openoffice.org
Objet : RE: [prog] OLE OpenOffice et VB.NET
Le plus gros problème rencontré réside dans le passage de paramètres avec la
commande « PropertyValue » ...
Ci-dessous un exemple :
En VB :
Function setOOoProp(cName, uValue) As Object
Dim oPropertyValue As Object Dim oSM As Object
Set oSM = CreateObject("com.sun.star.ServiceManager")
Set oPropertyValue =
oSM.Bridge_GetStruct("com.sun.star.beans.PropertyValue")
oPropertyValue.Name = cName
oPropertyValue.Value = uValue
Set setOOoProp = oPropertyValue
End Function
En Windev quand on fait :
oPropertyValue est objet Automation dynamique
oPropertyValue>>Name="FilterName"
oPropertyValue>>Value="writer_pdf_Export"
jusqu'ici tout est ok mais si on passe oPropertyValue à la fonction
storeToURL( .... , oPropertyValue )
alors erreur ... Le membre demandé n'existe pas.
D'avance merci
_____________________________________________
De : FAouzi Abderrahman [mailto:fa...@prosig.fr]
Envoyé : vendredi 24 février 2006 13:44
À : pr...@fr.openoffice.org
Objet : [Norton AntiSpam] RE: [prog] OLE OpenOffice et VB.NET
Sous delphi, même concept presque
Décrit ton problème
_____________________________________________
De : Cezame Concept [mailto:ceza...@wanadoo.fr]
Envoyé : vendredi 24 février 2006 13:39
À : pr...@fr.openoffice.org
Objet : [prog] OLE OpenOffice et VB.NET
Rencontrant des problèmes pour utiliser l'OLE open office sous Windev je me
suis penché sur VB Express 2005 et l'assemblage.NET
Est-ce que quelqu'un a déjà utilisé l'OLE ou autre sous VB.NET ?
D'avance merci pour toute information
Cyril VIGNOLO
<< Fichier: ATT00248.txt >> << Fichier: ATT00096.txt >> << Fichier:
ATT00279.txt >> << Fichier: ATT00111.txt >>
21 messages in org.openoffice.fr.progRE: RE: [prog] OLE OpenOffice et VB.NET
.dat
