Ist es möglich im SmartPart, mit TEXT2, eine Hochzahl auszugeben?
i7-12700 - Win10/x64 - 16GB - NVIDIA RTX A2000 (12GB) - Allplan 2023 Ing./Workgroup
TEXT2 0 , 0 , runden ( ref_x )
END
FUNC runden ( x )
x = ROUND_INT ( x * 200 ) / 200
x_str = STR ( "%4.3" , x )
IF STRSUB ( x_str , STRLEN(x_str) , 1 ) = "5" THEN RETURN STRSUB ( x_str , 1 , STRLEN(x_str)-1 ) + "%^{5%^}" ELSE RETURN STRSUB ( x_str , 1 , STRLEN(x_str)-1 )
FUNC_END
Passt! Dankeschön nemo!
Inzwischen hatte ich auch eine Lösung gefunden mit n=SPLIT (x_str,"%s.%s",vorp,punkt,nachp). Das war aber eine Zeile mehr und umständlicher