XProfan

English

Hello on any
If I one MultiEdit with of/ one type bestücke, must the over a variable happen. example: font%=CREATE(FONT,ARIAL,16,6,0,0,0) - wants I now whom Content print out, must I within STARTPRINT-ENDPRINT The Font with USEFONT ARIAL,16,6,0,0,0 indicate. I had now gladly, if I over my Programmeinstellungen (in the written Program) a type for editor einstelle, that too The Druckroutine this Font recognize and changes. How bring I means the thing with, the font%... same USEFONT... is ? - hopefully Have I verständlich framed

07/02/07 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

...it was Yes only ne question

07/02/07 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Frank
Abbing

Hm. Each Druckseite is too only one HDC, the with Creation whom Standart-Font staid has. therefore must for each Page the Own Font new staid go.
here can well only Roland a expansion install.
with WM_GETFONT/WM_SETFONT Messages can you you but yourself whom Font for a HDC read/settle.

07/02/07 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Thomas
Freier

...then would I it over a procedure organize.
Compile Mark Separation

Proc USE_Font

    USEFONT neufont$,typfont1%,typfont2%,typfont3%,typfont4%,typfont5%
    lfont& = @Create(Font,neufont$,typfont1%,typfont2%,typfont3%,typfont4%,typfont5%)

EndProc

var neufont$=Georgia
var typfont1%=16
var typfont2%=0
var typfont3%=0
var typfont4%=0
var typfont5%=0
DECLARE T&, lfont&
USE_Font                   Font setzen
SETDIALOGFONT 1
T& = CREATE(TABCTRL,%HWND,Tageserfassung,0002,0004,0780,0550)
SetFont T&,lfont&
.......
StartPrint *TrueType

if %printing

    TextColor @RGB(0,0,0),-1
    Orientation 0
    USE_Font                   Font setzen
    .........
    Endprint

Endif

.....