| |
|
|
E.T. | somehow has by me one simples print Problems with whom space.
Help Print
The expression, or. The expressions go on the screen written. standing between whom squeeze out one Semikolon, so go tappt im dunkeln directly together gehängt, with one comma becomes one space eingefügt.
by me sees The spending differently from (View source from the Help):
Have too time bissel probiert :
too the previous open one Fenster's or one Set("NumWidth",0) (which Yes "By House aus" on 0 stand ought to) bring no remedy.
[OFFTOPIC] would have been Yes a new tree for X3 unzipped, but somehow can ich's not find...[\OFFTOPIC] |
|
|
| 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... | 12/26/15 ▲ |
|
|
|
|
RGH | And if The Listings yet kopierbar eingefügt wären, could I your Examples understand and try.
the following functions by me How expects:
Greeting Roland |
|
|
| Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4 | 12/26/15 ▲ |
|
|
|
|
E.T. | Bitteschön (from the X3 - Help):
'-Begin-----------------------------------------------------------------
Declare n%
N% = 5
Print "Dies is der",n%;". Test"
WaitKey
'-End-------------------------------------------------------------------
End
After your code:
there are m.M. to def. To many space drinne |
|
|
| 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... | 12/26/15 ▲ |
|
|
|
|
RGH | Definitiv. Very strange. by me functions it correctly.. too the example from the Help.
Greeting Roland |
|
|
| Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4 | 12/26/15 ▲ |
|
|
|
|
E.T. | again time so one 64-bit-Syndrom ?? How I see, testest You under Win7 / 32
Nachtrag: too in the .exe see it very so from |
|
|
| 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... | 12/26/15 ▲ |
|
|
|
|
Georg Teles | can I not confirm, use one 64 bit - Win 8.0 per
the Result
exe damaged ? what Perhaps possible would, standardwerte Windows (metrics) for space get umgestellt ? MS has for everything Standardwerte |
|
|
| |
|
|
|
RGH | using You some Zusatzprogramm, that before what with the Sourcecode anstellt, How z.B. XPSE or so?
Greeting Roland |
|
|
| XProfan X3Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4 | 12/26/15 ▲ |
|
|
|
|
E.T. | no XPSE or sonstiges, X3 again new used to working together. The Win-Settings are, so far obviously, too any on standard.
try it then time on 'nem 4:3-Monitor... |
|
|
| XProfan X3Grüß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... | 12/26/15 ▲ |
|
|
|
|
Michael W. | with PRINT and comma is me indeed already get been rather The "+Str$()+" Form take.
by me trod the only Interpreter on... can it now but not any more again find. it was indeed to the Umstellung everything in Butter. |
|
|
| XProfan X3System: Windows 8/10, XProfan X4 Programmieren, das spannendste Detektivspiel der Welt. | 12/26/15 ▲ |
|
|
|
|
E.T. | so, on dissolution or. Monitor kanns well not lying... Getestet on 4:3 with 1024x768 ... |
|
|
| XProfan X3Grüß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... | 12/28/15 ▲ |
|
|
|
|
E.T. | New Test with anderem code:
time consider: String;String;String fit to the first ; to the 2. ; not any more (roter arrow supra)
String;SysVar;String;SysVar fit to the first String not (roter arrow under), to the 2. String already (blauer arrow under) , likewise with decl. variables (w1% , wb% , in the Bsp. "Arbeitsbereich BIS" )
The of me used View source:
DEF SysParameterInfo(4) !"user32","SystemParametersInfoA"
Declare WX%,WY%,WL%,WB%
Proc workarea
Declare Rect#
Dim Rect#,16
SysParameterInfo(48,0,Rect#,0)
wx%=Long(Rect#,0)
wy%=Long(Rect#,4)
wl%=Long(Rect#,8)
wb%=Long(Rect#,12)
Dispose Rect#
endproc
CLS
Set("NumWidth",0)
print "Simpler";"Text"
print "X";"-------------------------";"X"
workarea()
print "Arbeitsbereich OF :";wx%;"-";wy%
print "Arbeitsbereich BIS :";wl%;"-";wb%
print "Mögl. Window-BREITE :";wl%-wx%
print "Mögl. Window-HÖHE :";wb%-wy%
Print "Monitor - dissolution :";%MaxX;"-";%MaxY
Waitinput
end
without XPSE or something...
I were time ex... be ratlos |
|
|
| 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... | 12/28/15 ▲ |
|
|
|
|
E.T. | but nu erscht: Have time everything in a .txt write let. the good: The space fit, only... it'll not everything into File written, one bissel (there, where calculated becomes: row 25 and 26) alights in the Window, not in the File. but only the, what calculated becomes, the String before in the print #1,"Mögl. Window-BREITE (HÖHE):" standing in the File.
DEF SysParameterInfo(4) !"user32","SystemParametersInfoA"
Declare WX%,WY%,WL%,WB%
Proc workarea
Declare Rect#
Dim Rect#,16
SysParameterInfo(48,0,Rect#,0)
wx%=Long(Rect#,0)
wy%=Long(Rect#,4)
wl%=Long(Rect#,8)
wb%=Long(Rect#,12)
Dispose Rect#
ENDPROC
assign #1,"Test.txt"
rewrite #1
CLS
Set("NumWidth",0)
print #1,"Simpler";"Text"
print #1,"X";"-------------------------";"X"
workarea()
print #1,"Arbeitsbereich OF :";wx%;"-";wy%
print #1,"Arbeitsbereich BIS :";wl%;"-";wb%
print #1,"Mögl. Window-BREITE :";wl%-wx%
print #1,"Mögl. Window-HÖHE :";wb%-wy%
Print #1,"Monitor - dissolution :";%MaxX;"-";%MaxY
Close #1
print "...have ready !!"'only the ought to still in the Window come, or ??
Waitinput
end
Oo rather the good st$(...) always using... |
|
|
| XProfan X3Grüß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... | 12/28/15 ▲ |
|
|
|