| |
| |
|
Walter
Meidl | nachfolgend una Beispieltext encima más que sólo una Página.
como kann Yo el texto komplett drucken.
con StartPrint, o. EndPrint se sólo una Página gedruckt.
una NextPage zieht para jede zeile una neues Blatt una.
Für eure Ayuda wäre Yo muy Dankbar
Walter Meidl
WM9999 erstellt am: 21.06.2007
==========================
*** ACHTUNG !!! PRISMA - AUFNAHME ***
=====================================
M9999B1.EX1 --> B - Bohrprogramm
=================================
T01 Durchmesser 0.20 4222
T02 Durchmesser 0.40 216
T03 Durchmesser 0.65 76
T04 Durchmesser 0.80 118
T05 Durchmesser 1.50 72
T06 Durchmesser 1.80 36
T07 Durchmesser 2.00 4
T08 Durchmesser 2.99 12
T09 Durchmesser 3.00 13
T10 Durchmesser 3.10 72
M9999B2.EX1 --> B - Bohrprogramm
=================================
T01 Durchmesser 0.20 16200
T02 Durchmesser 0.40 720
T03 Durchmesser 0.80 216
T04 Durchmesser 0.85 144
T05 Durchmesser 1.15 144
T06 Durchmesser 1.50 216
T07 Durchmesser 1.80 216
T08 Durchmesser 3.10 72
M9999B3.EX1 --> B - Bohrprogramm
=================================
T01 Durchmesser 0.20 16200
T02 Durchmesser 0.40 720
T03 Durchmesser 0.80 216
T04 Durchmesser 0.85 144
T05 Durchmesser 1.15 144
T06 Durchmesser 1.50 216
T07 Durchmesser 1.80 216
T08 Durchmesser 3.10 72
M9999F1.EX1 --> F - Fraesprogramm
==================================
T01 Durchmesser 1.01 8.76 m
T02 Durchmesser 0.61 0.66 m
M9999FL2.EX1 --> F - Fraesprogramm L - Lenz
=============================================
T01 Durchmesser 0.50 1904
T02 Durchmesser 0.51 9.15 m
M9999F3.EX1 --> F - Fraesprogramm
==================================
T01 Durchmesser 2.30 136
T02 Durchmesser 2.41 6.24 m
M9999D1.EX1 --> D - Deckfolie
==============================
T01 Durchmesser 3.00 80
T02 Durchmesser 3.50 100
T03 Durchmesser 0.80 720
T04 Durchmesser 1.90 144
T05 Durchmesser 2.00 72
T06 Durchmesser 2.01 7.58 m
M9999PK1.EX1 --> P - Prepregaussparung K - Klein
==================================================
T01 Durchmesser 3.00 11
T02 Durchmesser 1.01 8.65 m
M9999PG1.EX1 --> P - Prepregaussparung G - Gross
==================================================
T01 Durchmesser 2.00 4
T02 Durchmesser 3.00 8
T03 Durchmesser 4.60 4
T04 Durchmesser 0.90 323
T05 Durchmesser 2.01 0.06 m
T06 Durchmesser 1.01 9.84 m
M9999R1.EX1 --> R - Ritzung ---> VHF = M9999R11.DXF
====================================================
T01 Durchmesser 1.01 3.68 m
|
|
| |
| |
| |
|
|
 | Zeig veces el Ver código fuente el Usted para Drucken nimmst - Luego se el fix umgeschrieben y lo se trabajo. 
Pro Línea sólo el Y Valor des Drawtext  erhöhen - si Y a bestimmter Position: nextpage y y otra vez en (z.B.) 0 conjunto. |
|
| |
| |
| |
|
|
Walter
Meidl | Hola si,
Por favor, verzeih, si yo Namen oder Anreden falso verwende,
pero yo bin neu en el Xprofan Club.
wäre schön si du me helfen könntest.
nachfolgend el Programmteil el Yo para drucken
uso quería.
Übrigens se después de el NextPage una así kleine Schriftart
verwendet, el uno sólo una strich en el Papier sieht.
vielen dank en el Voraus
Walter
KompilierenMarcaSeparaciónliste betrachten
declare name_edit$, name_zeige$, zeile$, fenster_1&, fenster_2&
declare ende%, titel$, zeile%
zeile% = 20
proc drucken
startprint
assign #1, name_edit$
reset #1
whilenot @eof(#1)
input #1, zeile$
DrawText 10,zeile%,zeile$
zeile% = zeile% + 15
if zeile% > 500
nextpage
endif
wend
endprint
close #1
ENDPROC
|
|
| |
| |
| |
|
|
| @Walter
Übrigens se después de el NextPage una así kleine Schriftart
verwendet, el uno sólo una strich en el Papier sieht.
Usted musst después de Startprint con Usefont Schriftart,h%,b%,f%,k%,u% una Schriftart festlegen y esta Angabe después de NextPage wiederholen. Vor NextPage valor zeile%=20 otra vez eintragen. Dann dürfte lo klappen. |
|
| |
| |
| |
|
|
| @Horst: Jupp!
@Walter: [tb]usecodetag[/tb]
Yo habe Su obiges Posting dahingehend bearbeitet. |
|
| |
| |
| |
|
(2.017)
Deutsch
English
Français
Español
Italia