Bonjour,
Je suis en train de me développer une classe de gestion Ole Automation pour piloter Word 2010 avec Lazarus.
Lazarus 1.0.14 (32bit) et FPC 2.6.2 sous Windows Seven Pro 64.
Mon problème est le suivant. Comme je veux gérer des formulaires, j'ai besoin de connaitre le type des champs (les ContentControl),
et donc d'accéder à leur propriété "Type".
Hélas si je fais cela
Quelqu'un a une idée pour contourner ce problème ?
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 function T_MSWord.GetChampsType(index: Integer): integer; Var UnChamp : Variant; begin Result := -1; If fIsDocument Then If ( index > 0) and ( index <= fDocument.ContentControls.Count) Then Begin UnChamp:=fDocument.ContentControls.Item(index); Result := UnChamp.Type; //ÇA BLOQUE ICI A LA COMPILATION end; Result := fDocument.ContentControls; end;
Merci d'avance
JS
Partager