| |
|
|
E.T. | Hi, The values, which with usefont... or Create(font... for Höhe and wide indicated go, what are the really for values in XProfan ?? are it spots, Pixel, percent or what it otherwise yet gives ???
from Help: n1 : worth - Zeichenhöhe n2 : worth - Zeichenbreite n1 : Zeichenhöhe. standing here 0, becomes one Defaultwert for wide and Höhe taken. n2 : Zeichenbreite. standing here 0, becomes one Defaultwert taken
The testimony worth can Yes now all sorts of things his. and which values go with Defaultwert taken ? , the must Yes irgendeinen reference to that Font having (Skalierfaktor or something like).
Mario |
|
|
| Grüße aus Sachsen... Mario WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte... | 04/10/08 ▲ |
|
|
|
|
Artur D. | Hello Mario,
so far I yet remind can was in previous Profan² versions always of Pixeln The speech.
Evtl. position You a Font one, can the program walk, and make a Screenshot the Window and misst then in Paint under starker enhancement The Fonts ex. then can you you sure his. (I know, is something umständlich)
greetings, Artur D. |
|
|
| XProfan 10 AMD Athlon XP 2600+ mit 2 GB RAM | 04/10/08 ▲ |
|
|
|
|
E.T. | @Artur: thanks. but then then knows I of course the something scaliert watts, but still not How.
I Have quick time an example zusammengebastelt. If I The display on screen with the expression (laser, PDF-Printer, Tintenspritzer) compare have I always deutliche Abweichungen in the Schriftgröße (in the reference to the lines). Irgenwie go since the values different processing. CompileMarkSeparationDeclare X%
Window 0,0-600,300
Orientation 900
BILDSCHIRMTEIL
UseFont Times New Roman,10,5,0,0,0
UsePen 0,1,RGB(255,255,0)
X% = 5
WhileLoop 100
CaseNot @Right$(@str$(X%),1) = 5 : DrawText X%-5,38,@str$(X%)
Line X%,40-X%,170
X% = X% + 5
EndWhile
Orientation 0
UseFont Arial,20,10,0,0,0
DrawText 20,50,Das ist ein Test-Text (Arial) !!
UseFont Lucida Console,20,10,0,0,0
DrawText 20,80,Das ist ein Test-Text (Lucida Console) !!
UseFont Courier,0,0,0,0,0
DrawText 20,110,Das ist ein Test-Text (Courier) !!
UseFont Times New Roman,13,6,0,0,0
DrawText 20,140,Das ist ein Test-Text (Times New Roman) !!
ENDE BILDSCHIRMAUSGABE
UND NUN DAS GLEICHE ZUM DRUCKER
ACHTUNG !! HIER WIRD SOFORT GEDRUCKT !!!
Startprint
Orientation 900
UseFont Times New Roman,10,5,0,0,0
UsePen 0,1,RGB(255,255,0)
X% = 5
WhileLoop 100
CaseNot @Right$(@str$(X%),1) = 5 : DrawText X%-5,38,@str$(X%)
Line X%,40-X%,170
X% = X% + 5
EndWhile
Orientation 0
UseFont Arial,20,10,0,0,0
DrawText 20,50,Das ist ein Test-Text (Arial) !!
UseFont Lucida Console,20,10,0,0,0
DrawText 20,80,Das ist ein Test-Text (Lucida Console) !!
UseFont Courier,0,0,0,0,0
DrawText 20,110,Das ist ein Test-Text (Courier) !!
UseFont Times New Roman,13,6,0,0,0
DrawText 20,140,Das ist ein Test-Text (Times New Roman) !!
endprint
ENDE DRUCKEN
waitinput
/../../Function-References/XProfan/end/'>end
If the printer scalieren would, then would Yes m.E. too The Margins the Striche scaliert, so the the expression again How on-screen looks should (comparison Font to the lines).
Mario |
|
|
| Grüße aus Sachsen... Mario WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte... | 04/10/08 ▲ |
|
|
|
|
Thomas Freier | Hello Mario, Perhaps helps you demonstration DrawRichText.prf of Pascal [web]https://www.tomcatsoft.de/[/web] from RTF-pressure moreover. |
|
|
| Gruß Thomas Windows XP SP2, XProfan X2 | 04/10/08 ▲ |
|
|
|
|
E.T. | thanks. Habs found, in Ner .zipper cache. Allerding kanns not tested go because of fehlernder RichEdit.ph. Have moreover here in the Forum or in others Paketen on the named Page nothing found. but Maybe hift me the code a little bit moreover...
Mario
Edit: ...from RTF-pressure... stood Yes there, is even still To late... |
|
|
| Grüße aus Sachsen... Mario WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte... | 04/11/08 ▲ |
|
|
|
|
Thomas Freier | you have still XProfan 9 & 10 and in the Ordner Include isn't The RichEdit.ph ??? |
|
|
| Gruß Thomas Windows XP SP2, XProfan X2 | 04/11/08 ▲ |
|
|
|
|
E.T. | ...How I already said: To late. clear is the there drinn, only my good altes PrFellow hats not found, though 9 and 10 as include-Paths registered are. Vieleicht mags indeed time ne interval.
and self think circa these Time ??
Mario |
|
|
| Grüße aus Sachsen... Mario WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte... | 04/11/08 ▲ |
|
|
|