---

Jeg vil gerne printe indholdet i en listbox ud (en række linier med tekst,
hentet fra en tekstfil). Prøver printer.print List1 - og får kun een linie
ud, nemlig den første (eller den sidste, hvis jeg markerer den), men ikke
alle linierne. Jeg mangler den rigtige kommando! Kan nogen hjælpe mig?
På forhånd tak
Per

---

"Per Ekelund" <nyhavn@city.dk> skrev i en meddelelse
news:434e6a47$0$172$edfadb0f@dread11.news.tele.dk...
> Jeg vil gerne printe indholdet i en listbox ud (en række linier med tekst,
> hentet fra en tekstfil). Prøver printer.print List1 - og får kun een linie
> ud, nemlig den første (eller den sidste, hvis jeg markerer den), men ikke
> alle linierne. Jeg mangler den rigtige kommando! Kan nogen hjælpe mig?
> På forhånd tak
> Per

Prøv dette :

For x = 1 To List1.ListCount - 1
List1.ListIndex = x
Printer.Print List1.Text
Next x

ps....er ikke testet, men direkte fra hukommelse


>
>

---

StoneWare wrote:
>
> For x = 1 To List1.ListCount - 1
> List1.ListIndex = x
> Printer.Print List1.Text
> Next x
>
> ps....er ikke testet, men direkte fra hukommelse

Vil det ikke give en side pr linie?
Hvis man skal igennem en løkke, vil jeg foreslå at man bruger en temp
variabel og printer den til sidst.

--
///M

---

///M skrev:
> StoneWare wrote:
>
>>For x = 1 To List1.ListCount - 1
>> List1.ListIndex = x
>> Printer.Print List1.Text
>>Next x
>>
>>ps....er ikke testet, men direkte fra hukommelse
>
>
> Vil det ikke give en side pr linie?
> Hvis man skal igennem en løkke, vil jeg foreslå at man bruger en temp
> variabel og printer den til sidst.
>

Hei
Nei det gir ikke en ny side pr linje, det får du ikke før du bruker
Printer.Newline eller har passert skriverens egenskaper på papirtype.

Men du er nødt til å definere høyden evt. bredden(X og Y verdier) og øke
høyden med en teller ellers vil du skrive alle linjene på samme punkt og
ikke under hverandre.

så med noe tillegg skal koden over fungere

Lykke til