Dies ist eine alte Version des Dokuments!

LSOFT Code-Snippets

Variable mit richtiger Anzahl von Nachkommastellen

  w19 = val(var.i,length(var.i)-pos(',',var.i))

Zahlenvariable mit edit richtig ausgeben

Hierbei wird die Zahl durch edit() richtig formatiert, mit Komma als Trennzeichen und OHNE die nervigen führenden Leerzeichen

  strip(edit(w12,'--9V,99'))

Zahl mit edit richtig formatiert ausgeben

/* Ausgabe Arbeitspreis mit 2 Nachkommastellen */
say cursor(rpos, 285) textright(strip(edit(w110,'--9V,99')),'B')

Datumse

substr(datum.i,7,4)+substr(datum.i,4,2)+substr(datum.i,1,2)

Textboxen

set textbox to "BLOCK", @FALSE, @TRUE
say textbox(rpos,cpos,rpos,430,'Viel Text; Variablen mit Plus (+) anfügen!!!: ' + variable + ' << !!! ')

rpos+=rpi
do while @TBTEXT <> ''
    say textbox(rpos,cpos,rpos,430,@TBTEXT)
    rpos+=rpi
enddo