Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Consiglio x stampare MSHFLEXGRID

Ciao, sto provando da alcuni giorni a stampare alcune MSHFLEXGRID....
Sono riuscito ad intercettare tranquillamente ogni "casella" ma dover 
ricostruire la tabella diventa piuttosto laborioso calcolando che con questa 
semplice linea, stampo al volo e velocemente:
Printer.PaintPicture MSHFlexGrid1.Picture, 1, 1400
Printer.EndDoc
già fatta e belle che pronta ma.. SIG!... questo mi stampa solo la prima 
pagina e non va alla seconda, alla terza e così via...
Ho provato a spostarmi sulla tabella e con qualche conto multiplo A MOD 50=0 
per stampare ogni 50 i miei 200 e più dati su 4 pagine proprio non ci son 
riuscito.
qualche consiglio più pratici dei miei "NON RIUSCITI"?
Tramite google ho trovato direrse idee ma sempre stampano solo la prima 
pagina....
sbaglio qualche cosa, nel senso che devo in qualche modo riposizionarmi 
sulla MSHflexgrid o devo cambiare sistema e ricostruire tutta la tabella 50 
alla volta con un for to?
ciao e grazie!
Anto
------------
Con LUPO dal 2000 si chiacchierava... ci reincontreremo comunque!
Grazie!
------------
----== Posted via Newsfeeds.Com - Unlimited-Uncensored-Secure Usenet News==----
http://www.newsfeeds.com
 The #1 Newsgroup Service in the World! >100,000 Newsgroups
---= East/West-Coast Server Farms - Total Privacy via Encryption =---

 alla volta con un for to?
Io uso questo:
http://www.adit.co.uk/html/printing_grids.html
Forse bisogna fare qualche adattamento con la MSHflexgrid ma non credo 
sia complicato.
ciao
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!

module. The PrintGrid module can then print the hidden MSFlexgrid.
Non saprei cosa fare... non ho ben capito se sia possibile fare qualche cosa 
ma credo che ricopiare il tutto in una msflex temporanea sia complicato.... 
suppongo, non saprei come farlo in breve e velocemente senza occupare troppa 
memoria e tempo cpu/...!
Altre idee di stampa MSHflexgrid?
AIUT... acci e denti...:-))))
ciao
Anto

 
Io questa operazione la faccio gia' quando ho bisogno di stampare 
listview o s-grid e non e' un grosso problema, basta farsi una routine 
che copia nella flexgrid nascosta header e contenuti delle celle.
Qui sotto ti riporto un pezzo della mia routine.
ciao
	maxx
Public Sub fill_FG_prn(objLst As Object)
     Dim fg As MSFlexGrid
     Dim lv As MSComctlLib.ListView
     Dim i As Integer, j As Integer
     Dim riga As String
     On Error GoTo fill_FG_prn_Error
     Set fg = frmStampa.FG_Prn
     fg.Clear
     fg.Rows = 1
     Select Case TypeName(objLst)
     Case "vbalGrid"
	'cut
     Case "ListView"
         Set lv = objLst
         'recupera header
         For i = 1 To lv.ColumnHeaders.Count
             'riga = riga & vbTab & sg.ColumnHeader(i)
             fg.TextMatrix(0, i - 1) = lv.ColumnHeaders(i).Text
             fg.Cols = fg.Cols + 1
         Next i
         For j = 1 To lv.ListItems.Count
             riga = lv.ListItems(j).Text
             For i = 2 To lv.ColumnHeaders.Count
                 riga = riga & vbTab & lv.ListItems(j).SubItems(i - 1)
             Next i
             fg.AddItem riga
         Next j
         fg.Cols = fg.Cols - 2
         For i = 0 To fg.Cols - 1
             fg.ColWidth(i) = lv.ColumnHeaders(i + 1).width    '* 
Screen.TwipsPerPixelX
         Next i
         For i = 1 To fg.Cols - 1
             fg.ColAlignment(i) = flexAlignRightCenter
         Next i
     End Select
     Set fg = Nothing
     Set lv = Nothing
end sub


> ARGOMENTO NON FACOLTATIVO
Grazie delle info... argh.... ci ho capito NULLA:.. meglio che rinuncio, da 
solo non ce la fare mai....
Comunque ho provato a mettere una MSFLEXGRID e ridare il comando sopra, ho 
sempre come risultato la stessa risposta
ERRORE di compilazione
ARGOMENTO NON FACOLTATIVO
ma che accidenti è?
i riferimenti dei componenti descritti nel txt li ho checckati...
cosa posso aver sbagliato?
grazie per qualche consiglio  (ho VB6sp6)!
ciao


 sempre come risultato la stessa risposta
Leggeti anche il manuale del codice PrintGrid...
ciao
	maxx


 Leggeti anche il manuale del codice PrintGrid...
beh... almeno quello l'ho fatto....dai... poi tra leggere e capire e' 
un'altra cosa... :-))) e...
he he he... è appunto leggendo il manuale che HO SBAGLIATO!!!! ed È 
SBAGLIATO!
Per questo che chiedevo info.... infatti c'e' una virgola di troppo che non 
ci vuole!
Lo riporto per dare una mano a qualche d'uno d'altro che "LEGGENDO" il 
manuale non si è accorto e non ha visto l'errore riportato, la linea 
corretta è.. o almeno dovrebbe essere...:
Private Sub PrintButton_Click()
    P001.PrintGrid MsFlexGrid1, 1, "Monthly Sales Report", 
PrintSettings.GRID_NORMAL
End Sub
E NON:
Private Sub PrintButton_Click()
    P001.PrintGrid, MsFlexGrid1, 1, "Monthly Sales Report", 
PrintSettings.GRID_NORMAL
End Sub
Come riportato nell'esempio esteso che manda evidentemente ad un componente 
richiesto
A volte anche i manuali creano problemi! e questo è un classico errore da 
"manuale"!
Un'altra possibilità che ho inserito ieri sera, è quella di trasferire 
MSFLEXGRID o MSHflexgrid, ad una tabella in EXCEL che con dieci linee di 
codice sia MSfl che MSHfl vanno a finire in EXCEL (ammesso che sia 
installato) e stampi a gogo!
Grazie dei consigli!
:-)


 installato) e stampi a gogo!
Ma se sai esportare il contenuto delle celle in excel, possibile che tu 
non sia in grado di esportare da mshfg a msfg?


 ha molte piu' funzionalita'.
Si, ho visto, ma dato che io e l'inglese siamo piuttosto scarsi... e anche 
nel resto, non ho capito un accidenti di come utilizzare la versione 2...
:-((


Appro...
prima di cominciare, visto che sei più pratico del sottoscritto... con una 
DATAGRID il discorso è uguale o diverso (a parte i nomi delle proprietà 
varie)?
ciao
grazie


 varie)?
Il problema con tutte le griglie e' capire come recuperare i dati dalle 
singole celle. E' inutile continuare a girarci intorno.
Puoi spiegare di nuovo cosa vuoi fare esattamente?
