Серый форум — AHK: Формат числа с разрядностью

Re: AHK: Формат числа с разрядностью

null@example.com (Sgy-x2) — Tue, 07 Dec 2021 20:48:01 +0000

Как, не покажете?

Re: AHK: Формат числа с разрядностью

null@example.com (__Михаил__) — Tue, 07 Dec 2021 20:33:32 +0000

Функция создаётся один раз, одна для всего. Про Gui не было ни слова, следовательно это не было учтено.
Функцию необходимо тогда переделать на возврат данных.

Re: AHK: Формат числа с разрядностью

null@example.com (teadrinker) — Tue, 07 Dec 2021 20:27:37 +0000

Так зачем целый элемент закрывать, закрывайте только сам текст.

Re: AHK: Формат числа с разрядностью

null@example.com (Sgy-x2) — Tue, 07 Dec 2021 20:09:17 +0000

__Михаил__Так смог придумать, но мне кажется что-то не так, закрывать каждый элемент GUI в функцию, такое себе.

Var1 := 15500
Var2 := 10000
Var3 := 20000
Var4 := (Var1+Var2)/1000
Var5 := (Var2+Var3)/1000

Test1(Var4)
Test2(Var5)


Test1(S, L := 1, T := "кг"){	; Число, Округление до N знаков после запятой, Текст.
	Gui, Add, text,, %  StrReplace(Round(S,L),".0") T
}
Test2(S, L := 1, T := "кг"){
	Gui, Add, text,, %  StrReplace(Round(S,L),".0") T
}
Gui,  Show

Re: AHK: Формат числа с разрядностью

null@example.com (Sgy-x2) — Tue, 07 Dec 2021 18:11:56 +0000

В MsgBox выводит хорошо, а как мне применить в тексте GUI?

Re: AHK: Формат числа с разрядностью

null@example.com (__Михаил__) — Tue, 07 Dec 2021 17:29:56 +0000

Можно через функцию сократить до такого:

Var1 := 15500
Var2 := 10000
Var3 := 20000
Var4 := (Var1+Var2)/1000
Var5 := (Var2+Var3)/1000

Test(Var4)
Test(Var5)
Return

Test(S, L := 1, T := "кг"){	; Число, Округление до N знаков после запятой, Текст.
 MsgBox, % RTrim(RTrim(Round(S, L),"0"), ".") T
}

Re: AHK: Формат числа с разрядностью

null@example.com (Sgy-x2) — Tue, 07 Dec 2021 17:19:12 +0000

__Михаил__ Подскажите пожалуйста, в примере ниже в первом сообщении результат 25.5кг, во втором 30.0кг. Как убрать во втором сообщении точку и ноль?

Var1 := 15500
Var2 := 10000
Var3 := 20000
Var4 := (Var1+Var2)/1000
Var5 := (Var2+Var3)/1000
MsgBox, % Round(Var4,1) "кг"
MsgBox, % Round(Var5,1) "кг"

Re: AHK: Формат числа с разрядностью

null@example.com (__Михаил__) — Tue, 07 Dec 2021 17:10:38 +0000

Действительно, не учёл одну проблему - 100 обрежет до 1.

Re: AHK: Формат числа с разрядностью

null@example.com (Sgy-x2) — Tue, 07 Dec 2021 16:59:59 +0000

__Михаил__ Этот вариант вполне подходит, спасибо.

% Round(Var3,1) "кг"

Re: AHK: Формат числа с разрядностью

null@example.com (teadrinker) — Tue, 07 Dec 2021 16:58:17 +0000

__Михаил__ пишет:

MsgBox, % RTrim(Var3,"0") "кг"	; Удалить '0' справа

Так не стоит, нужно удалять нули только после точки.

Re: AHK: Формат числа с разрядностью

null@example.com (__Михаил__) — Tue, 07 Dec 2021 16:56:38 +0000

Выбрать по вкусу:

MsgBox, % Round(Var3,1) "кг"	; Округлить до 1 цифры после запятой.
MsgBox, % RTrim(Var3,"0") "кг"	; Удалить '0' справа.

Re: AHK: Формат числа с разрядностью

null@example.com (Sgy-x2) — Tue, 07 Dec 2021 16:55:15 +0000

Тот что в примере выше так, 35.5кг.

Re: AHK: Формат числа с разрядностью

null@example.com (teadrinker) — Tue, 07 Dec 2021 16:49:03 +0000

А как должен выглядеть результат этого скрипта?

Re: AHK: Формат числа с разрядностью

null@example.com (Sgy-x2) — Tue, 07 Dec 2021 16:45:44 +0000

teadrinker Я немного запутался, использую деление в переменной, а на выходе получаю кучу нулей после запятой. Что не так, скажите пожалуйста?

Var1 := 15500
Var2 := 20000
Var3 := (Var1+Var2)/1000
MsgBox, %Var3%кг

Re: AHK: Формат числа с разрядностью

null@example.com (Sgy-x2) — Tue, 07 Dec 2021 14:30:51 +0000

Хм, интересно, я как-то про это не подумал. Спасибо.