Helow
Demonstrating initial idea of easy and practical implementation on OLE -
Excel
do while ! PRO->(EOF())
// 5 6 7 8
10
@nLine++,5 OleSay PRO->CODIGO, PRO->DESCRICAO, PRO->QTDE,
PRO->VLRUNIT,/*Skip*/ ,PRO->QTDE*PRO->VLRUNIT FONT 'Arial' SIZE 8 OF oPlan
PRO->( DBSkip() )
enddo
@nLine++,9 OleSay 'Total Geral', '=SOMA(J2:J'+ALLTRIM(STR(nLine-2))+')' FONT
'Arial' SIZE 10 COLOR 5 OF oPlan
// Formatando a coluna 10
@,10 OleSay FONT 'Arial' BOLD PICTURE '###.###.###.##0,00' COLOR 9 OF oPlan
Complete code in:
http://xBaseSuporte.freeforums.org/viewtopic.php?t=132
Including download reference properties and methods OLE
Éric
http://xBaseSuporte.freeforums.org
Join and contribute you also:
http://xbasesuporte.freeforums.org/prof ... e=register &agreed=true
"Gejza Horvath" <
_hsoftkn@nextra.sk> escreveu na mensagem
news:[email=
46a080fc@ozsrv2.ozlan.local...]
46a080fc@ozsrv2.ozlan.local...[/email]
> To everybody, who is interested about the Excel Ole interface:
>
>
http://msdn2.microsoft.com/en-us/librar ... lobj_link2
>
> and
>
http://msdn2.microsoft.com/en-us/librar ... e.10).aspx
>
> Gejza Horváth
>