| |
|
|
Roberto | |
|
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 07.03.2009 ▲ |
|
|
|
|
Jörg Sellmeyer | Schreibe una pequeña Rechner para el Grundrechenfunktionen con Buttons para los números y el Rechenarten ( + - * / ) y el = -Signo. Außerdem natürlich todavía el Ausgabefeld. |
|
|
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 07.03.2009 ▲ |
|
|
|
|
Roberto | ¿Puede du me una Paar kleine hilfen geben?^ ^ |
|
|
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 10.03.2009 ▲ |
|
|
|
|
Paul Glatz | Was es una *.0 Expediente ????? |
|
|
| |
|
|
|
Jörg Sellmeyer | Usted wirst wenig Spaß de su programa haben, si todos Elemente el Gleiche Handlevariable benutzen...
Hast Usted el Grundgerüst para una Programa ya verstanden?
a) Deklaration el Variables b) evtl. Funktionsdefinitionen c) después de Bedarf Prozeduren redactar d) Ventana principal redactar e) Elemente en el Haupfenster redactar f) Hauptprogramm con Haupt-Whileschleife
Sieht z. B. así de: KompilierenMarcaSeparacióna)
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 bastante nett de. Schau Usted aber otra vez el Anordnung el Tasten en una echten Rechner a. Das Ausgabefeld kannst Usted mejor con un Textfeld (Crear(Texto,...) erzeugen. Dann hast Usted lo con el Edición leichter. |
|
|
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 10.03.2009 ▲ |
|
|
|
|
Roberto | @Jörg el werd irofan speichert como algo falso Sé que auch no qué el se |
|
|
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 11.03.2009 ▲ |
|
|
|
|
Paul Glatz | beim Guardar schreibst du en lugar de ROBIN 0.1 ROBIN 0.1.xprf |
|
|
| |
|
|
|
Roberto | Yo el tmal así gemacht KompilierenMarcaSeparacióndeclare 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 al ende podría dein Rechner así trabajo. |
|
|
| |
|
|
|
| Paul Glatz
@Robin al ende podría dein Rechner así trabajo.
Hoffentlich no! |
|
|
| |
|
|
|
Roberto | Naja Yo men. |
|
|
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 11.03.2009 ▲ |
|
|
|