Interlinea in Word

[Romeo]

Ciao Enrico,
come stai ?

volevo sapere come si fa a settare l'interlinea tra una riga e un'altra in un file Word?

Ad esempio, per scrivere in file Word, io uso:

oWord := CREATEOBJECT( "Word.Application" )
...
...
oSel = oWord:Selection
...
...
oSel:Font:Size:=14
oSel:Font:Bold:=.t.
oSel:Font:Color:=CLR_RED
oSel:Font:name:="Nome Font"
oSel:TypeText("Descrizione Riga 1"+CRLF)
oSel:TypeText("Descrizione Riga 2"+CRLF)

E funziona bene, ma la seconda Riga ha una interlinea troppo distante, devpo poi aggiustarla da Word

Non si riesce a settare qualche parametro da FWH ?

Grazie 100 e auguri

[MaxP]

Ciao Romeo,

aggiungi queste righe

Code: Select all  Expand view  RUN

oSel:ParagraphFormat:LineSpacingRule := 0
oSel:ParagraphFormat:SpaceAfter = 0

Buona serata
Massimo

[Romeo]

Grazie 1000