| |
| |
|
| - Página 1 - |
|
Andreas
Koch | ¡Hola zusammen,
Yo una Cuestión a diesem Quellcode:
cls
Font 1
Imprimir Chr$(231), Chr$(229)
StartPrint
@Conjunto("Charset",1)
UseFont Arial,0,0,0,0,0
DrawText 0,80,Chr$(231)
DrawText 0,100,Chr$(229)
EndPrint
WaitInput
¿Por qué se en el Bildschirm Tau y Sigma ausgegeben y beim Drucken irgendwelche seltsamen Signo?
Schönen Saludo
Andreas Koch |
|
| |
| |
| |
|
| |
| |
| - Página 2 - |
|
 |
« Dieser Contribución wurde como Solución gekennzeichnet. » |
|
| - Página 2 - |
|
Andreas
Koch | So, una kleine Rückmeldung. Es así, dass sólo el ersten 255 Signo en me anwählbar son. Das Problema Yo ahora dadurch gelöst, dass Yo una eigenen Font erstellt habe. Yo habe simplemente una Standardfont genommen, el griechischen Signo de hinten después de vorne kopiert y como eigenen Font installiert. Funktioniert wunderbar con FontForge (podría Yo libre downloaden).
Gracias para eure Ayuda, en el Concepto wäre Yo sonst nie gekommen. |
|
| |
| |
| |
|
|
|
ByteAttack | Probiere Por favor, el veces de...
$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$))
' Drucken va sólo, si la Font en Windows installiert se... :-(
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
??? ¿Por qué es deine Zeichenhöhe siempre 0 ??? |
|
| |
| |
| |
|
|
Andreas
Koch | Yo bekomme una großes Ä y una englisches Pfundzeichen. Dabei son el Schriftarten unterschiedlich. Siehe Bild.
En Zeichenhöhe 0 nimmt él el DEFAULT-Valor. Im Übrigen debería Yo mich veces para deine Mühe bedanken, tener irgendwie schlechte Manieren heute. |
|
| |
| |
| |
|
|
ByteAttack | Jetzt fällt me desafortunadamente auch no mehr viel una... 
Aber Yo dar todavía no en
 |
|
| |
| |
| |
|
|
ByteAttack | So! Jetzt tener Yo veces incluso una Font erstellt, con ganzen zwei Signo:
Großes S y kleines t...
$H Windows.ph
$H messages.ph
Usermessages ~wm_close
Ventana de Estilo 31
Título de la ventana "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
Sinestar encargado (%Umessage = ~wm_close) & (&uWnd = %hWnd)
WaitInput
EndWhile
~RemoveFontResource(addr(Font$))
|
|
| |
| |
| |
|
|
ByteAttack | y debería todos Stricke reißen:
cls
var tau&=Crear("HPIC",-1,$PROGDIR+"TAU.EMF")
var sigma&=Crear("HPIC",-1,$PROGDIR+"SIGMA.EMF")
Proc DrawGText
Parámetros 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 Gracias, voluntad Yo morgen veces testen.
(Geht de zuhause no, Yo qué gegen esta VPN-Verbindungen a Arbeit, como puede ser así schlecht abschalten.)
Como erstellt uno porque seinen eigenen Font? Das podría todavía unos pocos otro Problemas lösen, el Yo así habe. |
|
| |
| |
| |
|
|
ByteAttack | Jau - Also 'damals" Yo Fonts con CorelDraw erstellt.
Usted necesidad en cada Fall una Grafikprogramm el con Vektoren umgehen kann.
CorelDraw
Adobe Illustrator
Inkscape
wobei Inkscape una kostenlose Software ist [...] 
Um el Vektoren mejor a ordnen y detaillierte Eingaben hacer a puede empfehle Yo FontForge [...] |
|
| |
| |
| |
|
|
Andreas
Koch | So, una kleine Rückmeldung. Es así, dass sólo el ersten 255 Signo en me anwählbar son. Das Problema Yo ahora dadurch gelöst, dass Yo una eigenen Font erstellt habe. Yo habe simplemente una Standardfont genommen, el griechischen Signo de hinten después de vorne kopiert y como eigenen Font installiert. Funktioniert wunderbar con FontForge (podría Yo libre downloaden).
Gracias para eure Ayuda, en el Concepto wäre Yo sonst nie gekommen. |
|
| |
| |
| |
|
|
ByteAttack | Schön! Hauptsache lo funktioniert  |
|
| |
| |
| |
|
|
Andreas
Koch | So, ahora Yo natürlich el Salat. Como mein Font natürlich no en cada Computer installiert es, se Kraut y Rüben adecuado, sobald Yo una gedrucktes pdf en una otro PC öffne. Weiß alguien, woran lo mentira podría, dass Yo sólo el ersten 255 ansprechen kann, während ByteAttack wesentlich mehr disponible ha? Lo muss sí eigentlich una Einstellung ser, el nichts con el Quellcode a tun ha. Liegt lo tal vez al PC? An el XProfanversion?
Yo bedanke mich diesmal ya en el Vorraus para eventuelle Bemühungen eurerseits, al Ende vergesse Yo el otra vez.... |
|
| |
| |
| |
|
|
Michael
W. | | Kann uno el Font no en el PDF einbetten? Dann wäre el doch kein Problema mehr. |
|
| |
| |
| |
|
|
Andreas
Koch | |
| |
| |
| |
|
(942)
Deutsch
English
Français
Español
Italia
