Hej! Hej Hej igen flåt Hej Sven! Jag är djupt tacksam för hjälpen! Hej igen Tack för hjälpen Sven!CurrentX vill inte lyda?
Jag Har problem med utskrift!
Jag har en kod som ser ut som följande
Public Sub SkrivUt()
Printer.ScaleMode = 6
Printer.ScaleTop = 0
Printer.ScaleLeft = 0
Printer.ScaleHeight = 297
Printer.ScaleWidth = 210
Printer.FontName = "Times New Roman"
Printer.FontSize = 12
Printer.CurrentX = 110
Printer.CurrentY = 55
Printer.Print , Text3(0).Text; Spc(1); Text3(1).Text
Printer.EndDoc
End Sub
Det stora problemet är att jag inte kan ändra värdet för CurrentX! om jag ändrar CurrentX från 110 som nu, till 120, så blir det ingen skilnad vid utskrift? Däremot går det utan problem att ändra CurrentY.
Jag vet inte om jag kanske är alldelesute och cycklar med min kåd? Men det är nästan omöjligt att hitta någon vättig information om utsktift!
Är det kanske någon som har några tips att dela med sig av?
Tack på förhand!
mvh
Anders!Sv: CurrentX vill inte lyda?
Jag har ju sagt till dig att du skall ha Printer.ScaleMod = 7 'centimeter
Du kan ange centimeter värdet med decimaler tex 2.7 går bra.
Skillanden mellan 110 och 120 räcker inte till den textWidth du
har valt för tex Printer.FontName = "Times New Roman"
Printer.FontSize = 12
mvh
SvenSv: CurrentX vill inte lyda?
Ser nu att det var millimeter du använder.Men svaret blir det samma
Times New Roman är propotionellt så 1 cm räcker inte som
skillnad. Om du ändrar till Arial kommer du förmodligen att se
skillnad. Testa öka till 125,borde räcka.
DSSv: CurrentX vill inte lyda?
Jag har nu provat lite fram och tillbaka.
Jag ändrade till Arial och endrade även CurrantX Från 110 till 125, men inget hände! sen ökade jag 5 åt gången och när jag kom till 145 så flyttade sig texten 26 mm åt höger. sen ändrase jag även CurrentX till 75 för att se vad som hände och då flyttade sig texten 52mm inåpt med utgångs från där texten var med CurrentX 110. Jag provade även med ScaleMode = 7, med det blev precis sama.
Jag kan inte få någon logik i det hela!
mvh
Anders!Sv: CurrentX vill inte lyda?
Svaret på logiken är att varje tecken vill ha en viss bredd
för att kunna visas rätt. TextWidth.
Utskriften startar på den första millimeter där det får plats i den
konfig CurrentX du angivit !
DSSv: CurrentX vill inte lyda?
Men jag har gett upp på X nu och använder Tab(?) istället när det gäller text!
mvh
Anders!