Printer.CurrentX = 800
Printer.CurrentY = 13750
Printer.FontSize = 12
Printer.Print Adress

Printer.enddoc


hur högerjusterar jag stringen adress på utskriften...
tex att den alltid får plats i höger hörn...???
som i tex pappret "nedan"


------------------------
I
I
I
I
I
I
adressI
------------------------

Kolla ditt inlägg om valutautseende.


Thomas

Nr 1 tycker jag att du skall överväga att använda ScaleMod = 7 centimeter
mycket lättare att planera på ett A4 med hjälp av en linjal.
Du kan skriva cm med decimal tex 10.5.
Återkommer med höger justering när du berättar var på A4 vänster gräns ligger.
Du skall använda tex Tab(65 ) för att alltid hamna på rätt ställe.
Ex.
<code>
CmDialog.Flags = &H100000 Or &H4
CmDialog.ShowPrinter
Printer.Orientation = 1
Printer.ScaleMode = 7
'ScaleMod = centimeter
'******* Print Huvud Logo ***********
Printer.PaintPicture picPrinter.Picture, 2, 0.5, 3, 2
Printer.FontName = "Arial"
Printer.FontBold = True
Printer.FontSize = 10
Printer.CurrentX = 2: Printer.CurrentY = 3
Printer.Print "Test"
Printer.Print ; Tab(65); "Summa Total"
</code>
För att spara papper när du testar rekommenderar jag på det varmaste
att du använder detta PDF program för att testa utskrift.
http://www.pdf995.com/

Är det ingen som ser vad jag skriver? Lösningen finns redan tidigare i hans förra tråd.
Tab kommer väl dessutom inte att högerjustera texten, utan bara att flytta ut vänsterjusteringen åt höger.


Thomas

tackar båda 2. , jag ska testa

Hejsan!
Jag gör så här
printer.currentx=10-.textwidth("hejsan")
printer.print "hejsan"
printer.currentx=10-.textwidth("på dig")
printer.print "på dig"
printer.currentx=10-.textwidth("a")
printer.print "a"

Då får du det hela med rak högerkant vid positionen 10
mvh Claes

<b>Tab kommer väl dessutom inte att högerjustera texten, utan bara att flytta ut vänsterjusteringen åt höger.</b>

Har jag aldrig påstått heller.Men ! du måste ha en väldefinierad punkt för att sedan
beroende på textlängden enl beskrivningen ovan kunna beräkna var summan skall placeras.

Tab(70) tex är ett utmärkt verktyg att definera högergränsen.

Då skulle jag lösa det så här
<code>
Printer.Print;Tab(70 - Len(strTal));strTal
</code>

Tab(70) representera längden av 70 versaler "W" med den FontSize du valt

Hmm ser nu att jag råkade skriva CurrentY istället för CurrentX i mitt svar i förra tråden.
Men Claes svar använder sig av samma princip, så du kan kolla på det eller på mitt gamla (och ändra till CurrentX).


Thomas