| |
| |
|
Roberto | |
| |
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 03/07/09 ▲ |
|
| |
|
|
Jörg
Sellmeyer | | write a small computer for Grundrechenfunktionen with Buttons for numbers and the Rechenarten ( + - * / ) and the = -characters. Also naturally yet the Ausgabefeld. |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ...  | 03/07/09 ▲ |
|
| |
|
|
Roberto | | can you me one couple small hilfen give?^^ |
|
| |
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 03/10/09 ▲ |
|
| |
|
|
Paul
Glatz | |
| |
| |
| |
|
|
Jörg
Sellmeyer | you become little Fun of your program having, if any items The same Handlevariable using...
have You, the Grundgerüst for a Program already understood?
a) Deklaration the variables
b) evtl. Funktionsdefinitionen
c) to want Procedures create
d) Mainwindow create
e) items on the Haupfenster create
f) Hauptprogramm with master-Whileschleife
sees z. B. so from:
CompileMarkSeparationa)
Declare txt&,button&
b) ist hier nicht nötig
c)
Proc Ausgabe
Parameters txt$
MessageBox(txt$,Ausgabe,0)
EndProc
d)
Cls
e)
txt& = Create(Text,%hwnd,ein Text,10,10,60,24)
button& = Create(Button,%hwnd,Ausgabe,10,50,60,24)
f)
While 1
WaitInput
If Clicked(button&)
Ausgabe(GetText$(txt&))
EndIf
Wend
The computer sees anyway schomn integrally nice from. look you but again The order the Keys on one real computer on. the Ausgabefeld can You rather with a Text box (Create(Text,...) produce. then have You it with the spending leichter. |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 03/10/09 ▲ |
|
| |
|
|
Roberto | | @Jörg the werd irofan save there something wrong I know neither what the should |
|
| |
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 03/11/09 ▲ |
|
| |
|
|
Paul
Glatz | | at Save write You instead of ROBIN 0.1 ROBIN 0.1.xprf |
|
| |
| |
| |
|
|
Roberto | I Have the tmal so made
CompileMarkSeparationdeclare exit&,text&25)
exit& = Create(Button,%HWnd,=,40,100,55,25)
exit& = Create(Button,%HWnd,+,10,70,25,25)
exit& = Create(Button,%HWnd,-,100,70,25,25)
text& = Create(Text,%hwnd, ERGEBNIS,10,130,115,24)
Waitinput
e
|
|
| |
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 03/11/09 ▲ |
|
| |
|
|
Paul
Glatz | | @Robin latterly could your computer so functions. |
|
| |
| |
| |
|
|
 | Paul Glatz
@Robin latterly could your computer so functions.
hopefully not!  |
|
| |
| |
| |
|
|
Roberto | Well I men.  |
|
| |
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 03/11/09 ▲ |
|
| |
|
(270)
Deutsch
English
Français
Español
Italia