wahrscheinlich super einfach, aber kreig es nicht hin...

[hoppi1978]

Hi,

Ich möchte eine Temperatur ohne Nachkommastelle auf dem Display anzeigen.

Dim Tempstringpoel As String * 5

Tempstringpoel = Str(temperaturpoel)
Tempstringpoel = Fusing(temperaturpoel , "#.")
Call Lcd_print(tempstringpoel , 74 , 10 , 2 , 1 , 2 , Black , Bright_blue)

Wenn ich es so mache, dann steht hinter der Temperatur immer noch ein Punkt z.B
24. °C voll blöd!

Wahrscheinlich ganz einfach oder? Bitte helft mir!

[radbruch]

Tempstringpoel = Fusing(temperaturpoel , "#.")
------------------------------------------ ^ -

[hoppi1978]

wenn ich den punkt da weg nehme, dann meckert Bascom...

[linux_80]

Hallo,

schau auch mal die Funktion Int() in der Hilfe an, da sind auch Beispiele, und weitere passende Funktionen verlinkt, wie zB Round(). Mit denen könnte man sich was zusammenbauen.

[Christian H]

Nimm halt von temperaturpoel nur die ganze Zahl vor dem Komma mit INT(temperaturpoel). Dann kannst Du aufs formatieren verzichten.

Hoppla, hat sich mit dem letzten Beitrag überschnitten.

[radbruch]

Wäre ja auch zu einfach gewesen...

[hoppi1978]

Int(Temperaturpoel)
Tempstringpoel = Str(temperaturpoel)
Call Lcd_print(tempstringpoel , 74 , 10 , 2 , 1 , 2 , Black , Bright_blue)

Bascom meckert leider bei
Int(Temperaturpoel)

unknown statement, menno klappt nicht

[Christian H]

Dim x as long ' evtl byte

x=Int(Temperaturpoel)
Tempstringpoel = Str(x)

'etc.

[hoppi1978]

jaaaaaaaaaaaaaaaaaaaaaaa
es funzt!
Danke euch allen :-)