| |
|
|
- page 1 - |
|
Gary12345 | Salut, KompilierenMarqueSéparationWindow 0,0-400,400
Proc Hauptprogramm
declare wert%, wert2%, wert3%, wert4%, wert5%, wert6%, wert7%, wert8%, wert9%, wert10%
var Button1& = CREATE("Button",%HWND,"1", 50, 50, 50, 50)
var Button2& = CREATE("Button",%HWND,"2",50, 100, 50, 50)
var Button3& = CREATE("Button",%HWND,"3",50,150,50,50)
var Button4& = CREATE("Button",%HWND,"4",50,200,50,50)
var Button5& = CREATE("Button",%HWND,"5",50,250,50,50)
var Button6& = CREATE("Button",%HWND,"6",100,50,50,50)
var Button7& = CREATE("Button",%HWND,"7",100,100,50,50)
var Button8& = CREATE("Button",%HWND,"8",100,150,50,50)
var Button9& = CREATE("Button",%HWND,"9",100,200,50,50)
var Button10& = CREATE("Button",%HWND,"0",100,250,50,50)
var Button11& = CREATE("Button",%HWND,"+",200,50,50,50)
var Button12& = CREATE("Button",%HWND,"-",200,100,50,50)
var Button13& = CREATE("Button",%HWND,":",200,150,50,50)
var Button14& = CREATE("Button",%HWND,"*",200,200,50,50)
var Button15& = CREATE("Button",%HWND,"=>",200,250,50,50)
var ButtonClear& = CREATE("Button", %HWND, "TEST100", 250,100,100,100)
While 1
WaitInput
If clicked(Button1&)
wert% = 1
Print wert%
EndIf
If clicked(Button2&)
wert2% = 2
print wert2%
EndIf
If clicked(Button3&)
wert3% = 3
print wert3%
EndIf
If clicked(Button4&)
wert4% = 4
print wert4%
EndIf
If clicked(Button5&)
wert5% = 5
print wert5%
EndIf
If clicked(Button6&)
wert6% = 6
print wert6%
EndIf
If clicked(Button7&)
wert7% = 7
print wert7%
EndIf
If clicked(Button8&)
wert8% = 8
print wert8%
EndIf
If clicked(Button9&)
wert9% = 9
print wert9%
EndIf
If clicked(Button10&)
wert10% = 0
print wert10%
EndIf
If clicked(Button11&)
var Ergebnis$[wert1%,wert2%,wert3%,wert4%,wert5%,wert6%,wert7%,wert8%,wert9%,wert10%] = wert%+wert2%+wert3%+wert4%+wert5%+wert6%+wert7%+wert8%+wert9%+wert10%
print Ergebnis$
EndIf
If clicked(ButtonClear&)
cls
EndIf
EndWhile
EndProc
While 1
WaitInput
Hauptprogramm
Endwhile
comment je vorgegangen suis:
1. Habe überlegt, si je Buttons verwenden soll ou bien seulement un Editierfeld. j'ai mich pour qui schwierigere variante entschieden, nämlich qui Buttons. 2. cela Hauptprogramm dans un Procédure gestellt. Externe Funktionen volonté dans einem Extra-Proc behandelt. 3. Alle Buttons une Wert zuweisen (naturellement integer) => wert% - wert10% 4. si Button "+" gedrückt wurde, alle Werte addieren. trop bon letzt vous avec imprimer représenter laisser (cela Ergebnis naturellement)
mon Problem:
1. Es addiert alles richtig, seulement si je cela zweite la fois addiert habe (alors cela zweite la fois rechne sans ClearUp) venez une Fehlermeldung, dass je qui Variable Ergebnis doppelt deklariert habe. peux cette faute pas nachvollziehen. 2. si je seulement einmal deux Werte addiere et ensuite trop bon Letzt sur den Button100 klicke, venez beim zweiten le calcul aussi une Fehlermeldung. c'est wiederum qui gleiche comment dans Problem1 beschrieben. 3. je peux seulement Werte 0-9 représenter. aucun Werte sur 9. pourquoi? pourquoi hängt es toujours une numéro drunter statt près de qui numéro? peux je aussi pas nachvollziehen.
comment son mir aider könntet
je veux keinen Lösungscode. je veux seulement Hinweise sur qui Ursache cet Fehlers. quoi je oui c'est ca faux gemacht habe et encore weitere autre Sachen. en supplément serait je cela Problem pas alles sur einmal faire, mais alles Schritt pour Schritt. j'étais es früher gewohnt simple seulement Codes trop bekommen, mais diesmal veux je wirklich apprendre. si je quoi pas verstehe, ensuite frag je plan pour. mais Hinweise statt qui ganzen Solution ist souvent sinnvoller comme on denkt.
Daher vielen Dank déjà dans vorraus! |
|
|
| |
|
|
| |
|
- page 3 - |
|
|
| Pour cette gibts oui cet Bereiche, avec cela chacun quoi présenter peux. |
|
|
| |
|
|
|
Gary12345 | là isset: [...]
la fois voyons, si cet Include mon travail erleichtert.
LG |
|
|
| |
|
|
|
| Hab cela Posting [...] la fois abgeändert -
externe File-Uploader faire ici keinen Sinn, là ici chacun unendlich viele Dateianhänge à Posts anhängen peux. Zudem la hâte Du absolute Kontrolle sur Votre Anhänge et Zähler, qui on aussi serverseitig abrufen peux. Ausserdem sommes erfahrungsgemäß externe Seiten moins zuverlässig et echte Beständigkeit/ disponibilité de Downloads ist meist seulement sur directe Dateianhänge à Beiträgen gewährleistet. Es spricht cependant rien dagegen, zusätzliche weitere Télécharger- Opportunités trop z.B. externe Seiten anzubieten mais comme Dateianhang ist sozusagen "Pflicht" avec cela zukünftige Interessenten pas irgendwann seulement encore sur Deadlinks zurückgreifen doit. So bietet qui Rubrik "Includes" beispielsweise Comprend statt à gauche trop Comprend. |
|
|
| |
|
|
|
Gary12345 | Es wird oui toujours geiler dans Deinem Forum Nochmals vielen Dank.
suis beim Taschenrechnercode (neuen Code) sur un Problem gestoßen, werde es hoffentlich alleine créer, cela trop beseitigen |
|
|
| |
|
|
|
| Weiterführendes zum Thema findest Du aussi ici [...] et ici [...] . ^ ^ |
|
|
| |
|
|
|
Gary12345 | Include dans Action: KompilierenMarqueSéparation $I MatheLeicht.inc
cls
declare Summe!
var edit1! = CREATE("Edit",%HWND,"",0,0,100,100)
var edit2! = CREATE("Edit",%HWND,"",100,0,100,100)
var button& = CREATE("Button",%HWND,"Rechnen",100,100,100,100)
While 1
WaitInput
If clicked(button&)
Summe! = Summe(edit1!,edit2!)
print Summe!
EndIf
MfG Gary12345 | 27.01.2013 ▲ | |
|
|
|
|
| |
|
| |
|
|
|
Gary12345 | et tu as chez getText quoi faux
gettext ist faux, richtig wäre gettext$
Vielen Dank! |
|
|
| |
|
|
|
| Stimmt, cela hat on en si mans ungetestet direct dans den Beitragseditor pinselt.
trop meiner Ehrenrettung hätte getText sans Dollarzeichen im nativen Profan (nProcs) absolu suffisant. |
|
|
| |
|
|
|
Gary12345 | Darf je savons, quoi NProcs sommes? Ist cela déjà important pour mich? ou bien seulement später? |
|
|
| |
|
|
|
| qui peut später la fois durchaus important son pour toi.
avec cela peux Du native Funktionen programmieren, qui avons viele Vorteile z.B. vous êtes um un Vielfaches plus rapide et thread- et APC ( [...] ) -sûrement et Du peux aussi direct dans Assembler programmieren et Funktionen programmieren qui z.B. plus rapide sommes comme wären vous avec C programmiert.
tu peux avec cela alors Dein XProfan "pimpen" dans dem Du den Präkompilierer XPSE avant den réel Kompilierer schaltest: [...]
Beispiel: [...]
aussi joli: [...] , [...] |
|
|
| |
|
|
|
Gary12345 | OK je versag déjà beim Verständnis qui Begriffe. mais peux sûrement später pour mich important son. maintenant progge je erstmal am calculette plus
PS: BKA Remover peux quelque chose dauern |
|
|
| |
|
|