Strona: [  << <   1   > >>  ]  z  1     
Autor Temat: drukowanie...
anonim




Typ: Nie zarejestrowany
drukowanie...

mam pytanko, poniewaz przypisalem do cmd kod zrodlowy nastepujecy:
Private Sub Command2_Click()
Printer.Print Text2.Text
Printer.EndDoc
End Sub

i jest problem bo mi drukuje tekst ale tylko jedna linijke tj od poczatku strony kartki (lewy gorny rog) do konca (prawy gorny rog) zamiast drukowac wszystko co jest w textboxie... o co chodzi???

27-05-2004 16:27
  
losmac
"profesorek"




Typ: neutral
Postów: 758
Zarejestrowany: May 2003

Nie wiem, ale może masz ustawniony multiline = true.
Może spróbuj odczytywać znaki z TextBox'a do napotkania znaku vbCrLf i wtedy drukować


strTmp = TextBox1.Text
pos_end = InStr(pos_end+1,strTmp,vbCrLf)
pos_start = 1
Do While pos_end>0
    sText = Mid(pos_end+1,strTmp,pos_end - pos_start)
    Printer.Print sText
    pos_start = pos_end
    pos_end = InStr(pos_end+1,strTmp,vbCrLf)
Loop
Printer.EndDoc

Sprawdź wszystko, bo pisałem z głowy i nie sprawdzilem tego.


_____________________________________________
POSTULATY STARUSZKA:
1) Ludzie, dbajcie o polszczyznę!!!
2) Ludzie, zadawajcie kompletne pytania, a nie rzucacie ochłapy i trzeba się domyślać o co chodzi!!!

Powodzenia
Maciej Łoś

29-05-2004 15:31
Pokaż profil losmac  Wyślij email do losmac   Odwiedź stronę losmac  
Wszystkich odpowiedzi: 1 :: Maxymalnie na stronę: 20
Strona: [  << <   1   > >>  ]  z  1