| |
|
|
- Page 1 - |
|
Andreas Koch | Hello together,
I have a Question this Source:
cls
Font 1
Print Chr$(231), Chr$(229)
StartPrint
@Set("Charset",1)
UseFont "Arial",0,0,0,0,0
DrawText 0,80,Chr$(231)
DrawText 0,100,Chr$(229)
EndPrint
WaitInput
Why becomes on-screen dew and Sigma outputted and at Print any seltsamen characters?
lovely Greeting
Andreas cook |
|
|
| |
|
|
| |
|
- Page 2 - |
|
|
« this Posting watts as Solution marked. » |
|
- Page 2 - |
|
Andreas Koch | so, a small feedback. its so, that only the first 255 characters by me anwählbar are. The problem have I now therefore resolved, I me a own Font prepares have. I have simply a Standardfont taken, The greek characters of hinten to in front copies and as own Font installs. functions wonderful with FontForge (could I free download).
thanks for eure Help, on The idea would I otherwise never come. |
|
|
| |
|
|
|
|
ByteAttack | Try Please the time from...
$H windows.ph
CLS
var Font$=$PROGDIR+"sixpack_medium.ttf"
~AddFontResource(addr(Font$))
usefont "sixpack",30,15,0,0,0
drawtext 10,10,Chr$(964)
drawtext 10,50,Chr$(931)
~RemoveFontResource(addr(Font$))
' Print goes only, if the Font in windows installs becomes... :-(
StartPrint
usefont "sixpack",30,15,0,0,0
drawtext 10,10,Chr$(964)
usefont "sixpack",30,15,0,0,0
drawtext 10,50,Chr$(931)
EndPrint
WaitInput
??? Why is your Zeichenhöhe always 0 ??? |
|
|
| |
|
|
|
Andreas Koch | I get one large Ä and a englisches Pfundzeichen. thereby are The Fonts different. See Image.
with Zeichenhöhe 0 takes it whom DEFAULT-worth. in the Übrigen ought to I times for your trouble thank, Have somehow code manners today. |
|
|
| |
|
|
|
ByteAttack | now falls me unfortunately neither More plenty one... but I give not yet on
|
|
|
| |
|
|
|
ByteAttack | so! now Have I time self one Font prepares, with whole two characters: large s and small t...
$H windows.ph
$H messages.ph
User Messages ~wm_close
Window Style 31
Window Title "SigmaGabriel & PanTau"
CLS 16777215
var Font$=$PROGDIR+"sigmatau.ttf"
~AddFontResource(addr(Font$))
textcolor 0,-1
usefont "Sigmatau",30,0,0,0,0
drawtext 10,10,"S"
drawtext 10,40,"t"
StartPrint
usefont "Sigmatau",30,0,0,0,0
drawtext 10,10,"S"
usefont "Sigmatau",30,0,0,0,0
drawtext 10,40,"t"
EndPrint
WhileNot (%Umessage = ~wm_close) & (&uWnd = %hWnd)
WaitInput
EndWhile
~RemoveFontResource(addr(Font$))
|
|
|
| |
|
|
|
ByteAttack | and should any cords rip:
cls
var tau&=Create("HPIC",-1,$PROGDIR+"TAU.EMF")
var sigma&=Create("HPIC",-1,$PROGDIR+"SIGMA.EMF")
Proc DrawGText
Parameters fx%,fy%,letter$,fh%
Case letter$="t":DrawSizedPic tau&,fx%,fy%-fh%,fh%;0
Case letter$="S":DrawSizedPic sigma&,fx%,fy%-fh%,fh%;0
ENDPROC
DrawGText 10,10,"t",100
DrawGText 10,120,"S",100
Waitinput
|
|
|
| |
|
|
|
Andreas Koch | Hey thanks, I will tommorrow test times. (goes of home not, I have what against these VPN-connections to work, there can so badly turn off.)
How prepares one because its own Font? the could another couple others Problems solve, The I so have. |
|
|
| |
|
|
|
ByteAttack | Jau - means 'damals" have I Fonts with CorelDraw prepares. You benötigst In any drop one Grafikprogramm with the Vektoren bypass can. CorelDraw Adobe illustrator Inkscape
where Inkscape a Free software ist [...]
around the Vektoren rather To ordnen and detailed Inputs make to recommend I FontForge [...] |
|
|
| |
|
|
|
Andreas Koch | so, a small feedback. its so, that only the first 255 characters by me anwählbar are. The problem have I now therefore resolved, I me a own Font prepares have. I have simply a Standardfont taken, The greek characters of hinten to in front copies and as own Font installs. functions wonderful with FontForge (could I free download).
thanks for eure Help, on The idea would I otherwise never come. |
|
|
| |
|
|
|
ByteAttack | Beautiful! Hauptsache it functions |
|
|
| |
|
|
|
Andreas Koch | so, now have I naturally whom lettuce. there my Font naturally not each computer installs is, becomes hern and Rüben displayed, once I one gedrucktes pdf on one others PC open. white someone, Why it lying could, I only the first 255 address can, during ByteAttack integral More available has? it must Yes really a attitude his, The nothing with the Source To do has. lying it Perhaps on the PC? on the XProfanversion? I bedanke me this time already in the Vorraus for possible endeavours eurerseits, end forget I the again.... |
|
|
| |
|
|
|
Michael W. | Can whom Font not PDF einbetten? then would the still no trouble More. |
|
|
| |
|
|
|
Andreas Koch | |
|
| |
|
|