| |
|
|
Roberto | |
|
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 07.03.2009 ▲ |
|
|
|
|
Jörg Sellmeyer | Schreibe einen kleinen Rechner per die Grundrechenfunktionen mit Buttons per die Zahlen und die Rechenarten ( + - * / ) und das = -Zeichen. Außerdem naturalmente noch das Ausgabefeld. |
|
|
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 07.03.2009 ▲ |
|
|
|
|
Roberto | Kannst du mir ein Paar kleine hilfen geben?^^ |
|
|
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 10.03.2009 ▲ |
|
|
|
|
Paul Glatz | Was ist eine *.0 File ????? |
|
|
| |
|
|
|
Jörg Sellmeyer | Du wirst wenig Divertimento mit Deinem Programm haben, wenn alle Elemente die Gleiche Handlevariable benutzen...
Hast Du das Grundgerüst per ein Programm schon verstanden?
a) Deklaration der Variablen b) evtl. Funktionsdefinitionen c) nach Bedarf Prozeduren erstellen d) Hauptfenster erstellen e) Elemente auf dem Haupfenster erstellen f) Hauptprogramm mit Haupt-Whileschleife
Sieht z. B. so aus: KompilierenMarkierenSeparierena)
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
Der Rechner sieht jedenfalls schomn ganz nett aus. Schau Dir aber nochmal die Anordnung der Tasten auf einem echten Rechner an. Das Ausgabefeld kannst Du besser mit einem Textfeld (Create(Text,...) erzeugen. Dann hast Du es mit der Ausgabe leichter. |
|
|
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 10.03.2009 ▲ |
|
|
|
|
Roberto | @Jörg das werd irofan speichert da irgendwas falsch ich weiss auch nicht was das soll |
|
|
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 11.03.2009 ▲ |
|
|
|
|
Paul Glatz | beim Speichern schreibst du statt ROBIN 0.1 ROBIN 0.1.xprf |
|
|
| |
|
|
|
Roberto | Ich hab das tmal so gemacht KompilierenMarkierenSeparierendeclare 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.^^ | 11.03.2009 ▲ |
|
|
|
|
Paul Glatz | @Robin am ende potuto dein Rechner so funktionieren. |
|
|
| |
|
|
|
| Paul Glatz
@Robin am ende potuto dein Rechner so funktionieren.
Hoffentlich nicht! |
|
|
| |
|
|
|
Roberto | Naja ich men. |
|
|
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 11.03.2009 ▲ |
|
|
|