Einsteigerfragen zur PROFAN Programmierung

| Suchen
| Zurück zur Übersicht

Autor | Thema: Rechnen mit Komma
Tilo Mayer
| Datum:30.05.02 15:48 (Tilo.Mayer@gmx.de) |
Hallo, ich habe mir die Version 4.5 runtergeladen und bin nun ein bischen am Probieren. Nun meine Frage: wie bekomme ich hin das in einem Dialogfeld mit 3 Editfeldern ( wobei das 3 zur Ausgabe dienen soll ) duch betätigen des Button " Berechnen " die Berechnung und Ausgabe mit Kommastellen erfolgt. Ich komme da irgendwie nicht weiter. Für eure Hilfe wäre ich dankbar. MFG Tilo
Jörg Sellmeyer
| Datum:30.05.02 17:41 (joerse@gmx.de) |
Hallo Tilo, Du mußt die Werte aus den ersten Editfeldern auslesen und in Zahlen umwandeln. Dann kannst Du damit weiterrechnen. declare wert1!,wert2!,Ergebnis! let wert1!=Val(GetText$(Edit1&)) let wert2!=Val(GetText$(Edit2&)) Let Ergebnis!=Mul(Wert1!,Wert2!) SetText Edit3&,Str$(Ergebnis!) Gruß Jörg
Horst Horn
| Datum:04.06.02 21:09 (info@web-treffpunkt.de) |
Hallo Tilo hallo Jörg Bekannt ist, dass PROFAN.- sehr gut rechnen kann. Jörg hat recht mit den Declarationen - 'bat' fehlt hier DECIMALS % zum Zweiten würde ich kein Editfeld für das Ergebnis nehmen CREATE("TEXT"...usw... bringt das besser Vorher wegen der Optik CREATE("GROUPBOX....? Im Moment habe ich grade ein etwas aufwendiges Rechenprogramm 'in der Mache', wenn Du, Tilo interessiert bist - meine E-Mail-Adresse steht hier. Ich bin nicht der beste PROFANer, aber in den Rechenoptionen ganz gut CU horst
Gerd Telzerow
| Datum: 04.06.02 22:47 (GTelzerow@T-Online.de) |
Hallo Tilo, Decimals 2 Declare Edit1&,Edit2&,Edit3& Declare wert1!,wert2!,Ergebnis! 'und..... let wert1!=@Val(@Translate$(GetText$(Edit1&),",",".")) let wert2!=@Val[@Translate$(GetText$(Edit2&),",",".")) let Ergebnis!=@Mul(Wert1!,Wert2!) SetText Edit3&,@Translate$(@Str$(Ergebnis!),".",",") MFG Gerd

| Zurück zur Übersicht

| Ein kostenloses WebMart Forum WebMart Homepage Tools kostenlos |