Foro & Ayuda | | | | | | - Página 1 - |
|  | Bitte en Fuente el Eurer Meinung después de trabajo müssten,
lo aber offensichtlich no tun.
Sozusagen es dies una vorab-Thema a Infinity-Bugs etc. |
| | | | | | |
| | | | | | - Página 6 - |
| | 
HofK | Dieses fehlerhafte Progrämmchen offenbart una pequeña Effekt.
$alias f1 rgb 50 50 250 // Konstante (Präkompilierer)
p=2 q=7
test p q
proc test a b
global f1
cls f1
imprimir a + b
ENDPROC
En Syntax prüfen es liso por, pero la Kompilierer bekommt natürlich una Problema y meckert, porque el Präkompilierer ihm el Línea
global rgb 50 50 250 vorsetzt.
Offenbar es el Syntaxprüfung antes $alias Ersetzung - oder? |
| | | | | | |
| | | Sorry, Usted había no el bastante neuen Kompilierer - el reagiert ahora anders.
Seither sin embargo así, dass sólo $alias durchwirkt y luego de:
natürlich dies:
y dies se "korrekt" bemängelt con unexpected keyword rgb at global en main: test.
El Syntaxprüfung kommt sólo después de $alias. |
| | | | | | |
| | | | mist siempre todavía bug en el kompi, möcht Yo heute todavía ran |
| | | | | | |
| | | | So, ahora sólo otra vez algo Tiempo en el Kompilierer a stecken, el todavía hier y como Bugs ha. Tiempo schauen Yo heute hinbekomme. RC kommt jedenfalls siempre näher y scheint erstmals greifbar. Libs- Schnittstelle fehlt todavía así uno Infinity unendlich erweitern kann. |
| | | | | | |
| | | | Apéndice: Wenn algo no funktioniert después de como antes Por favor, informe! |
| | | | | | |
| | 
Micha12334 | ¡Hola Profaner,
Yo brauche Eure Ayuda.El ya gezeigte, aber con Eurer Ayuda geänderten Expediente "neu_g" (Gewichtseingabe) möchte Yo verbinden con uno pequeño Auflistung el letzten eingegeben Daten; Expediente aufzaehlung (aufzaehlung)
Beide Archivos trabajo einzeln en Samsung S6 y Lenovo tab2 bien.
Entweder de el Ende el Expediente Eingabe igual übergehen en Date Aufzaehlung oder
beide Archivos greifen en el gleichen gespeicherten Archivos masse.txt y heute.txt zurück.
Was wäre el beste Concepto y cómo podría Yo dies realisieren?
anbei beide Daeien
/ /
// InfinityProfan Program
// neu-g v0.0.2
// created 2016-02-29
grid =gui.grid(gui.hwnd,[2,5])
texto1 = " Kontrolle \n en kg al: "
zeit
altg = 0
neug = 0.00
zeit1 = time(7)
altg = file.read("masse.txt")
zeit2= file.read("heute.txt")
gui.background(grid,rgb(0,0,100))
gui.background([grid,1,2],rgb(90,90,90))
gui.background([grid,2,2],rgb(90,90,90))
gui.background([grid,1,3],rgb(130,130,130))
gui.background([grid,2,3],rgb(50,150,50))
gui.background([grid,1,4],rgb(150,150,150))
gui.background([grid,2,4],rgb(150,150,150))
gui.background([grid,1,5],rgb(130,130,130))
gui.background([grid,2,5],rgb(0,0,100))
gui.texto [grid,1,1] texto1
gui.texto [grid,2,1] zeit1
gui.texto [grid,1,2] "Gewicht al \n"+zeit2
gui.texto [grid,2,2] altg
gui.texto [grid,1,3] " Neueingabe:"
gui.texto [grid,2,3] "HIER drücken" @proc1
gui.texto [grid,1,4] "Differenz"
gui.texto [grid,2,5] "E N D E " @proc2
proc proc1 ctrl state
global grid
if state==1
gui.background([grid,2,3],rgb(255,255,255))
msg.box null,null,["kg eingegeben"],"",@neu
endif
ENDPROC
proc neu btn txt
global grid,neug,altg,zeit1
if btn==1
if txt!=""
neug = txt
diff = neug - altg
diff = round(diff,[3])
gui.texto[grid,2,4] diff
if diff < 0
gui.background([grid,1,4],rgb(50,150,50))
gui.background([grid,2,4],rgb(50,150,50))
gui.texto[grid,2,4] "\n\nabgenommen"
endif
if diff > 0
gui.background([grid,1,4],rgb(150,50,50))
gui.background([grid,2,4],rgb(150,50,50))
gui.texto[grid,2,4] "\n\nzugenommen"
endif
file.write("masse.txt",neug)// komplette adresse eingeben?
file.write("heute.txt",zeit1)
gui.texto[grid,1,5] "Neugewicht \n= "+neug +" kg" @go
endif
endif
ENDPROC
proc go btn
caso btn==1 : proc2
ENDPROC
proc proc2
msg.box " Gewicht es gespeichert ",neug,["weiter"]
end
ENDPROC
y Expediente Aufzaehlung:
/ /
// InfinityProfan Program
// Aufzählung v0.0.2
// created 2016-02-28
// en cobalt
//imprimir screen.rotation screen.rotation.top
gd = gui.grid gui.hwnd,[2,14]
//gui.height gui.grid 1020
global grid, gd, gewicht, date, x, b, a,d,t
texto1 = "Eingaben:"
texto2 = " Gewicht / kg"
texto5 = " Daten löschen"
texto6 = " E N D E "
x=str(x)
gewicht = file.read("masse.txt")// hier komplette adresse eingeben?
date = file.read("heute.txt")
gui.background gd, rgb 130 130 130
gui.background [gd, 1,1], rgb 0 0 255
gui.background [gd, 2,1], rgb 125 125 255
gui.background [gd, 1,2], rgb 130 130 130
gui.background [gd, 2,2], rgb 125 125 125
gui.background [gd, 1,3], rgb 255 255 255
gui.background [gd, 2,3], rgb 255 255 255
gui.background [gd, 1,4], rgb 255 0 0
gui.background [gd, 2,4], rgb 0 0 255
gui.height [gd,1,1] 3500
gui.height [gd,2,1] 46000
gui.height [gd,3,1] 200
gui.height [gd,4,1] 3500
gui.texto[gd,1,1] texto1
gui.texto[gd,2,1] texto2
gui.texto[gd,1,4] texto5 @loesch
gui.texto[gd,2,4] texto6 @de
z = gui.texto [gd,1,2] date
gui.gravity z,1,0
t = gui.texto [gd,2,2] gewicht
gui.gravity t,1,0
// gewicht1 = 80.123 sólo para tests
x = "\n" + gewicht1
y = "\n" + time(7)
file.write("masse.txt",x,true)//später löschen, como Daten de neu-g kommen debería
file.write("heute.txt",y,true)// - el gleiche --
proc loesch
gui.background [gd, 1,4], rgb 90 90 150
gui.background [gd, 1,4], rgb 90 90 150
file.del("masse.txt")
file.del("heute.txt")
msg.toast " Daten gelöscht"
de
ENDPROC
proc de
gui.background [gd, 2,4], rgb 150 90 90
msg.toast " ENDE UND ZURÜCK "
end
ENDPROC
Was wäre el beste Solución? |
| | | | | | |
| |
HofK | Micha12334 (09.03.2016)
... oder
beide Archivos greifen en el gleichen gespeicherten Archivos masse.txt y heute.txt zurück.
Dazu puede ser con el Dateisystem trabajo y a incluso gewähltem Ort speichern/invitar, siehe Bsp. [...]  |
| | | | | | |
| |
Micha12334 | Dankeschön,
Yo voluntad lo veces así ausprobieren, como du lo en el Ejemplo gezeigt hast. |
| | | | | | |
| |
Micha12334 | Gracias Klaus,
dein Vorschlag con el Dateisystem a trabajo es erfolgreich.
Nun kann Yo de zwei unterschiedlichen Programmen en Daten zurück-
greifen.
En Gelegenheit möchte I folgendes Problemchen hinweisen:
En Zuweisung el Variables en gravity muss en cada Fall una Leerzeichen posición. Lo lässt se zwar kompilieren, stürzt aber beim Programmstart (abierto) de.
Ejemplo: X = gui.text__ [grid,1,2] algo => gui.gravity X,1,0 |
| | | | | | |
| |
Micha12334 | ¡Hola Personas,
Yo hätte kurz una Cuestión.
¿Cómo se puede Yo erzwingen, dass una todo Zahl con Nachkommazahlen, also Nullen aufgefüllt se:
Mit 'round' kann Yo zwar para Ejemplo 5,6789 en 2 Stellen runden (5,68), aber como 5 en 5,00 ? |
| | | | | | |
| |
Micha12334 | Mi Solución funktioniert no, Yo pensamiento:
if X = long(X)
X = str(X)
X = float(X+",00")
endif |
| | | | | | |
| | 
Michael
W. | | | | | XProfan X3System: Windows 8/10, XProfan X4 Programmieren, das spannendste Detektivspiel der Welt. | 20.03.2016 ▲ |
| | |
|
RespuestaTema opciones | 50.480 Views |
ThemeninformationenDieses Thema ha 5 subscriber: |
(1.285)
Deutsch
English
Français
Español
Italia