Forum | | | | | | - Page 1 - |
| 
Andre
Hilprecht | Hello Profaner,
can it his, the one Profanfenster on 30 Editfields dull is?
in the Interpretermodus go any 72 boxes displayed, create I
The Exe then are it only yet 30!
Greeting André |
| | | | Ein PC ist die beste Möglichkeit Fehler zu beheben, die ohne PC gar nicht passiert wären. -frei aus Murphy's Computergesetzen
XProfan X2, Win8 Pro 64bit Update von Win7
i5 / 3,2GHz 4 GB RAM
Treibstoff: Radeberger Pils | 03/04/07 ▲ |
| | |
| | | | | | | - Page 1 - |
|  | means with this Source:
cls
DECLARE F&
DECLARE TEXT100&, TEXT101&, TEXT102&, TEXT103&, Text104&, TEXT105&, TEXT106&, TEXT107&
DECLARE TEXT108&, TEXT109&, TEXT110&, TEXT111&, TEXT112&, TEXT113&, TEXT114&, TEXT115&
DECLARE TEXT116&, TEXT117&, TEXT118&, TEXT119&, TEXT120&
DECLARE EDIT100&, EDIT101&, EDIT102&, EDIT103&, EDIT104&, EDIT105&, EDIT106&, EDIT107&
DECLARE EDIT200&, EDIT201&, EDIT202&, EDIT203&, EDIT204&, EDIT205&, EDIT206&, EDIT207&
DECLARE EDIT300&, EDIT301&, EDIT302&, EDIT303&, EDIT304&, EDIT305&, EDIT306&, EDIT307&
DECLARE EDIT400&, EDIT401&, EDIT402&, EDIT403&, EDIT404&, EDIT405&, EDIT406&, EDIT407&
DECLARE EDIT500&, EDIT501&, EDIT502&, EDIT503&, EDIT504&, EDIT505&, EDIT506&, EDIT507&
DECLARE EDIT600&, EDIT601&, EDIT602&, EDIT603&, EDIT604&, EDIT605&, EDIT606&, EDIT607&
DECLARE EDIT700&, EDIT701&, EDIT702&, EDIT703&, EDIT704&, EDIT705&, EDIT706&, EDIT707&
DECLARE EDIT800&, EDIT801&, EDIT802&, EDIT803&, EDIT804&, EDIT805&, EDIT806&, EDIT807&
DECLARE EDIT900&, EDIT901&, EDIT902&, EDIT903&, EDIT904&, EDIT905&, EDIT906&, EDIT907&
DECLARE BUTTON100& , BUTTON101&
F& = @Create(dialog,%Hwnd,input,0,220,%maxX,500)
Startpaint F&
UseBrush 1,@RGB(150,200,250)
Rectangle 0095,0100-0194,0130
Rectangle 0195,0100-0294,0130
Rectangle 0295,0100-0394,0130
Rectangle 0395,0100-0494,0130
Rectangle 0495,0100-0594,0130
Rectangle 0595,0100-0694,0130
Rectangle 0695,0100-0724,0130
Text Color @RGB (0,0,0),-1
USEFONT MS Sans Serif,13,0,0,0,0
DRAWTEXT 0100,0108, Time: of - To
DRAWTEXT 0205,0108, Gerätefahrer
DRAWTEXT 0305,0108, Personalkosten
DRAWTEXT 0402,0108, Arbeitsauftrag
DRAWTEXT 0505,0108, Arbeitsort
DRAWTEXT 0605,0108, Zielkosten
DRAWTEXT 0702,0108, manner
EndPaint
SETDIALOGFONT 1
TEXT104& = CREATE(TEXT,F&,late shift on the:,0020,0135,0200,0019)
TEXT105& = CREATE(TEXT,F&,night shift on the:,0020,0220,0200,0019)
TEXT106& = CREATE(TEXT,F&,Frühschicht on the:,0020,0305,0200,0019)
TEXT107& = CREATE(TEXT,F&,here becomes planned what the stuff holds ...!!!,0020,0020,0200,0019)
TEXT108& = CREATE(TEXT,F&,and of course for the wheeler:,0095,0050,0130,0019)
TEXT100& = CREATE(TEXT,F&,Merc 1,0250,0050,0070,0019)
TEXT109& = CREATE(TEXT,F&,with the pol. mark:,0095,0075,0130,0019)
TEXT101& = CREATE(TEXT,F&,CB - AT 714,0250,0075,0070,0019)
TEXT110& = CREATE(TEXT,F&,and the Equipment-Nr.:,0330,0075,0110,0019)
TEXT102& = CREATE(TEXT,F&,52 15 03 11,0450,0075,0060,0019)
TEXT111& = CREATE(TEXT,F&,Funk-Nr:,0530,0075,0040,0019)
TEXT103& = CREATE(TEXT,F&,k 417,0580,0075,0030,0019)
TEXT112& = CREATE(TEXT,F&,order 1,0020,0155,0050,0019)
TEXT113& = CREATE(TEXT,F&,order 2,0020,0175,0050,0019)
TEXT114& = CREATE(TEXT,F&,order 3,0020,0195,0050,0019)
TEXT115& = CREATE(TEXT,F&,order 1,0020,0240,0050,0019)
TEXT116& = CREATE(TEXT,F&,order 2,0020,0260,0050,0019)
TEXT117& = CREATE(TEXT,F&,order 3,0020,0280,0050,0019)
TEXT118& = CREATE(TEXT,F&,order 1,0020,0325,0050,0019)
TEXT119& = CREATE(TEXT,F&,order 2,0020,0345,0050,0019)
TEXT120& = CREATE(TEXT,F&,order 3,0020,0365,0050,0019)
EDIT100& = CREATE(EDIT,F&,13:15,0095,0155,0049,0019)
EDIT101& = CREATE(EDIT,F&,14:45,0145,0155,0049,0019)
EDIT102& = CREATE(EDIT,F&,Hilprecht, A.,0195,0155,0099,0019)
EDIT103& = CREATE(EDIT,F&,15313125,0295,0155,0099,0019)
EDIT104& = CREATE(EDIT,F&,removal,0395,0155,0099,0019)
EDIT105& = CREATE(EDIT,F&,F60 HAE,0495,0155,0099,0019)
EDIT106& = CREATE(EDIT,F&,15311311,0595,0155,0099,0019)
EDIT107& = CREATE(EDIT,F&,01,0695,0155,0029,0019)
EDIT200& = CREATE(EDIT,F&,14:45,0095,0175,0049,0019)
EDIT201& = CREATE(EDIT,F&,15:45,0145,0175,0049,0019)
EDIT202& = CREATE(EDIT,F&,Hilprecht, A.,0195,0175,0099,0019)
EDIT203& = CREATE(EDIT,F&,15313125,0295,0175,0099,0019)
EDIT204& = CREATE(EDIT,F&,Gleisbau,0395,0175,0099,0019)
EDIT205& = CREATE(EDIT,F&,F60 HAE,0495,0175,0099,0019)
EDIT206& = CREATE(EDIT,F&,15311321,0595,0175,0099,0019)
EDIT207& = CREATE(EDIT,F&,01,0695,0175,0029,0019)
EDIT300& = CREATE(EDIT,F&,,0095,0195,0049,0019)
EDIT301& = CREATE(EDIT,F&,,0145,0195,0049,0019)
EDIT302& = CREATE(EDIT,F&,,0195,0195,0099,0019)
EDIT303& = CREATE(EDIT,F&,,0295,0195,0099,0019)
EDIT304& = CREATE(EDIT,F&,,0395,0195,0099,0019)
EDIT305& = CREATE(EDIT,F&,,0495,0195,0099,0019)
EDIT306& = CREATE(EDIT,F&,,0595,0195,0099,0019)
EDIT307& = CREATE(EDIT,F&,,0695,0195,0029,0019)
EDIT400& = CREATE(EDIT,F&,,0095,0240,0049,0019)
EDIT401& = CREATE(EDIT,F&,,0145,0240,0049,0019)
EDIT402& = CREATE(EDIT,F&,,0195,0240,0099,0019)
EDIT403& = CREATE(EDIT,F&,,0295,0240,0099,0019)
EDIT404& = CREATE(EDIT,F&,,0395,0240,0099,0019)
EDIT405& = CREATE(EDIT,F&,,0495,0240,0099,0019)
EDIT406& = CREATE(EDIT,F&,,0595,0240,0099,0019)
EDIT407& = CREATE(EDIT,F&,,0695,0240,0029,0019)
EDIT500& = CREATE(EDIT,F&,,0095,0260,0049,0019)
EDIT501& = CREATE(EDIT,F&,,0145,0260,0049,0019)
EDIT502& = CREATE(EDIT,F&,,0195,0260,0099,0019)
EDIT503& = CREATE(EDIT,F&,,0295,0260,0099,0019)
EDIT504& = CREATE(EDIT,F&,,0395,0260,0099,0019)
EDIT505& = CREATE(EDIT,F&,,0495,0260,0099,0019)
EDIT506& = CREATE(EDIT,F&,,0595,0260,0099,0019)
EDIT507& = CREATE(EDIT,F&,,0695,0260,0029,0019)
EDIT600& = CREATE(EDIT,F&,,0095,0280,0049,0019)
EDIT601& = CREATE(EDIT,F&,,0145,0280,0049,0019)
EDIT602& = CREATE(EDIT,F&,,0195,0280,0099,0019)
EDIT603& = CREATE(EDIT,F&,,0295,0280,0099,0019)
EDIT604& = CREATE(EDIT,F&,,0395,0280,0099,0019)
EDIT605& = CREATE(EDIT,F&,,0495,0280,0099,0019)
EDIT606& = CREATE(EDIT,F&,,0595,0280,0099,0019)
EDIT607& = CREATE(EDIT,F&,,0695,0280,0029,0019)
EDIT700& = CREATE(EDIT,F&,,0095,0325,0049,0019)
EDIT701& = CREATE(EDIT,F&,,0145,0325,0049,0019)
EDIT702& = CREATE(EDIT,F&,,0195,0325,0099,0019)
EDIT703& = CREATE(EDIT,F&,,0295,0325,0099,0019)
EDIT704& = CREATE(EDIT,F&,,0395,0325,0099,0019)
EDIT705& = CREATE(EDIT,F&,,0495,0325,0099,0019)
EDIT706& = CREATE(EDIT,F&,,0595,0325,0099,0019)
EDIT707& = CREATE(EDIT,F&,,0695,0325,0029,0019)
EDIT800& = CREATE(EDIT,F&,,0095,0345,0049,0019)
EDIT801& = CREATE(EDIT,F&,,0145,0345,0049,0019)
EDIT802& = CREATE(EDIT,F&,,0195,0345,0099,0019)
EDIT803& = CREATE(EDIT,F&,,0295,0345,0099,0019)
EDIT804& = CREATE(EDIT,F&,,0395,0345,0099,0019)
EDIT805& = CREATE(EDIT,F&,,0495,0345,0099,0019)
EDIT806& = CREATE(EDIT,F&,,0595,0345,0099,0019)
EDIT807& = CREATE(EDIT,F&,,0695,0345,0029,0019)
EDIT900& = CREATE(EDIT,F&,,0095,0365,0049,0019)
EDIT901& = CREATE(EDIT,F&,,0145,0365,0049,0019)
EDIT902& = CREATE(EDIT,F&,,0195,0365,0099,0019)
EDIT903& = CREATE(EDIT,F&,,0295,0365,0099,0019)
EDIT904& = CREATE(EDIT,F&,,0395,0365,0099,0019)
EDIT905& = CREATE(EDIT,F&,,0495,0365,0099,0019)
EDIT906& = CREATE(EDIT,F&,,0595,0365,0099,0019)
EDIT907& = CREATE(EDIT,F&,,0695,0365,0029,0019)
BUTTON100& = CREATE(BUTTON,F&,Übernahme the planning in The Anzeigemappe,0120,0400,0250,0030)
BUTTON101& = CREATE(BUTTON,F&,Cancel - Closing without Save,0400,0400,0250,0030)
@SetFocus(F&)
waitinput
end
go any Controls by me prepares - no track of a trouble. |
| | | | | | |
| | 
RGH | time a Zwischenbemerkung:
would be not sinnvoller, longer Listings first of all always eingeklappt (means so How to the Click the suitable Icon) view? the would The Ladezeit some pages vastly telescope. and who it complete see wants, can it still ausklappen.
Greeting
Roland
(the otherwise no Einschränkungen with Edit-Feldern in actually XProfan- and Windowsversionen famous are) |
| | | | 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 | 03/05/07 ▲ |
| | |
| | 
Frank
Abbing |
would be not sinnvoller, longer Listings first of all always eingeklappt (means so How to the Click the suitable Icon) view? the would The Ladezeit some pages vastly telescope. and who it complete see wants, can it still ausklappen.
the power still anyhow eachone, ausklappen my I. Fände I do not well, if any Source code zugeklappt wären. lasts then in the Endeffekt still longer as as now is. |
| | | | | | |
| |
Andre
Hilprecht | Hi IF,
How already said, as long as I the in the interpreter mode of XProfan 9 walk let, is everything fine, compiliere I and beget a Exe - there were it of 72 only yet 30 Edit´s
Hi Roland,
How bring I the because eingeklappt To paper, äh screen?
have You a others editor for these Posts? I can still only my
code between (code) and (/code) settle and then ... How einklappen now?
In others Programmier-Forums, there there a Bildschirmvorschau, there can to the send its Untaten see.
is Perhaps time a Why stay.
Greeting André |
| | | | Ein PC ist die beste Möglichkeit Fehler zu beheben, die ohne PC gar nicht passiert wären. -frei aus Murphy's Computergesetzen
XProfan X2, Win8 Pro 64bit Update von Win7
i5 / 3,2GHz 4 GB RAM
Treibstoff: Radeberger Pils | 03/05/07 ▲ |
| | |
| |
Frank
Abbing |
How already said, as long as I the in the interpreter mode of XProfan 9 walk let, is everything fine, compiliere I and beget a Exe - there were it of 72 only yet 30 Edit´s
using You GOTO in your Program or spring You sonstwie a While/Whileloop-Loop? Überkreuzen itself such creep?
Compiliere your code time with XPSE or investigate your code with Sebastian Königs Tool.
Perhaps suffering your system too on Speichermangel. everything is possible.
whom worth report because The lever the not dargestellten Controls? zero? |
| | | | | | |
| | | The Preview comes again! because of the Bauarbeiten and the Umstellung of BBCode on iFBBCode  temporär except Betrüp.
Einklappen can only the Visitors through whom Pfeilknöpfen right supra on eachone CodeBox - the can You means not over one day to determine. |
| | | | | | |
| |
Andre
Hilprecht | Hi Frank,
no GOTO
no überkreuzten creep
certainly no Speichermangel
and to the Handles .... How ... no idea.
Greeting André |
| | | | Ein PC ist die beste Möglichkeit Fehler zu beheben, die ohne PC gar nicht passiert wären. -frei aus Murphy's Computergesetzen
XProfan X2, Win8 Pro 64bit Update von Win7
i5 / 3,2GHz 4 GB RAM
Treibstoff: Radeberger Pils | 03/05/07 ▲ |
| | |
| | | Well, Control 31 what not displayed becomes - which lever save You Yes in a variable. print  e time these Variable before the Waitinput from and look what you displayed becomes. Sozusagen The simplest shape the Debuggings. |
| | | | | | |
| | | | | | - Page 2 - |
| | 
Rolf
Koch | Hello Andre, besorg you time Winspy there kannste investigating whether The pair really not prepares get or just The Koordianten go crazy.
[...]
with Handles Show is simply meant:
z,B,;
Print edit100& and if there now 0 standing watts it from irgendwelchen Found not created. |
| | | | | | |
| |
Andre
Hilprecht | I hope, I Have the right made:
Print Edit406&
there come nobodies, but even if I one angezeigtes Edit Printe |
| | | | Ein PC ist die beste Möglichkeit Fehler zu beheben, die ohne PC gar nicht passiert wären. -frei aus Murphy's Computergesetzen
XProfan X2, Win8 Pro 64bit Update von Win7
i5 / 3,2GHz 4 GB RAM
Treibstoff: Radeberger Pils | 03/05/07 ▲ |
| | |
| |
Andre
Hilprecht | | write I one Waitinput into Proc self mere and before it Print Edit 406& then comes a 7-stellige number |
| | | | Ein PC ist die beste Möglichkeit Fehler zu beheben, die ohne PC gar nicht passiert wären. -frei aus Murphy's Computergesetzen
XProfan X2, Win8 Pro 64bit Update von Win7
i5 / 3,2GHz 4 GB RAM
Treibstoff: Radeberger Pils | 03/05/07 ▲ |
| | |
| | | | try still simply time the kleinst-lauffähige example produce what whom bow aufzeigt. Perhaps Better get going so what... |
| | | | | | |
|
AnswerTopic-Options | 10.957 Views |
Themeninformationenthis Topic has 6 subscriber: |
(267)
Deutsch
English
Français
Español
Italia