Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Вместо точки - запятая? / 8 сообщений из 8, страница 1 из 1
21.06.2005, 15:38:17
    #33127011
vallot
vallot
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вместо точки - запятая?
Вот такое выражение:
OutPath = GetFullName(OutputDir, OutputFilename _--------

+ "_" + CStr(SizeY) + "x" + CStr(SizeX))

Мне надо получить название файла = "---- 435,5х2100.dft"
Но вместо запятой в 435,5 я получаю точку 435.5 и
тогда название файла пишется до первой точки = "---- 435."
Как зписать , чтобы вместо точки была запятая???
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
21.06.2005, 16:21:50
    #33127168
Пользователь2
Пользователь2
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вместо точки - запятая?
GetFullName -- это ваша пользовательская функция?

Т.е. у вас есть файл "ABC435,5х2100.dft" и вам нужно получить его полное название?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
21.06.2005, 16:27:49
    #33127195
VirusXP
VirusXP
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вместо точки - запятая?
перед преобразованием нужно переопределить текущий разделитель в числах на точку.

в дельфях это выглядело бы так:

var ldecimalseparator: char;
begin
--------
ldecimalseparator := decimalseparator; // спасаем текущую настройку
decimalseparator := '.';
-------- преобразование строки в число
decimalseparator := ldecimalseparator; // восстанавливаем текущую настройку
--------
end;

-----------------
...и опыт - сын ошибок трудных,
и гений - парадоксов друг...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.06.2005, 00:11:17
    #33127882
vallot
vallot
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вместо точки - запятая?
Имено файл и создается:

OutPath = GetFullName(OutputDir, OutputFilename - это фунции VBScript

"Окно" + "_" + CStr(ширина) + "x" + CStr(длина)) - выражение имя файла

Окно, ширина, x, длина - это переменные

ширина= расчет по формуле
длина= расчет по формуле

эти значения не всегда целые получаются, а пограмма после первой точки
ставит расширение .ДФТ и это поменять нельзя!

Вот такой результат я например ожидаю "Окно_435.5х2100.ДФТ",
А получаю - "Окно_435.ДФТ"!? Поэтому нужна запятая!!!

"Окно_435,5х2100.ДФТ"

Что-то надо записать в CStr(......(ширина)), чтобы была запятая,
но что(?) найти не могу!?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.06.2005, 09:40:52
    #33128121
Пользователь2
Пользователь2
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вместо точки - запятая?
Я попробовал. Все нормально создает.

Код: plaintext
strFile = "D:\1\test" + CStr(Range("ширина")) + "x" + CStr(Range("длина")) + ".txt"

Попробуй так, может поможет.

Код: plaintext
CStr(SizeY) & "x" & CStr(SizeX) & ".dft"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.06.2005, 10:40:51
    #33128254
Пользователь2
Пользователь2
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вместо точки - запятая?
Еще как вариант:

Код: plaintext
CStr(Replace(SizeY,".",","))
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.06.2005, 12:32:06
    #33128600
vallot
vallot
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вместо точки - запятая?
Ничего не прошло, пришлось округлить до целого числа!
Спасибо за участие!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.07.2005, 15:38:01
    #33152501
mihmih
mihmih
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вместо точки - запятая?
Результат этой функции (а также всего семейства Cxxx()) зависит от региональной настройки разделителя целой и дробной частей
(Панель управления - Региональные настройки)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Вместо точки - запятая? / 8 сообщений из 8, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 328ms
Закрыть
start [/forum/topic.php?fid=61&mobile=1&tid=2185937]:
 0ms
get settings:
 9ms
get forum list:
 12ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 44ms
get topic data:
 7ms
get forum data:
 2ms
get page messages:
 29ms
get tp. blocked users:
 1ms
others: 220ms
total:  328ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]