Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.05.02;
Скачать: CL | DM;

Вниз

Получение строки из Ворда   Найти похожие ветки 

 
Olivka ©   (2002-04-20 19:09) [0]

В одну ячейку таблицы - вставляю формулу суммы
olevariant(FWordApp).ActiveDocument.Tables.Item(TableNumber).Cell(Row,Column).Range.Select;
olevariant(FWordApp).Selection.InsertFormula(formula,"0,00");
- сумма вышестоящих ячеек, все работает класно

Потом хочу получить это значение в переменную - Real, для этого:

text:=olevariant(fwordapp).ActiveDocument.tables.item(TableNumber).cell(Row,Column).range.Text;

это в переменную типа string - тоже вроде делается.
в переменную text попадает строка типа "1,98#D#F"(не помню точно символы), я так понимаю - это всего лишь признаки конца строки или ячейки.

Мне нужно получить 1,98 и я хочу сделать

val(text,realValue,code);

передается только первая цифра числа, например, из 1,98 получается RealValue=1, при этом code=2, т.е. запинается на запятой.
Но в ворде формула понимает у меня только запятую(иначе не суммирует), а не точку. Но замена на точку ничего не решает, code становится равным уже 5, но в RealValue попадает все равно первая цифра!
Я думала - может это и не запятая вовсе, но pos(text,",")=2. Я ничего не понимаю! Щас выйду из себя! как мне получить это число?


 
drpass ©   (2002-04-20 20:27) [1]

В русской винде запятая используется для разделения дробной и целой части, и Word ее использует. Древняя фукнция val, будучи англоязычным творением, понимает только точку. Возьми функцию StrToFloat вместо val, которая пользуется установками винды, и забудь об этой проблеме.


 
Olivka ©   (2002-04-20 22:13) [2]

не получается, потому что строка в этом случае обязана быть числом, а у меня вместо числа
"0,12"#$D#7 - проверила - вот такого типа.


 
Olivka ©   (2002-04-20 22:43) [3]

Я ошиблась в вопросе - pos(text,",")=0, как и #
я могу взять часть ээтой строки - 4 цифры первые и тогда StrToFloat работает, но почему позиция запятой, точки или решетки в этой строке равны 0? странно.



Страницы: 1 вся ветка

Текущий архив: 2002.05.02;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.008 c
1-2559
_igorok
2002-04-19 10:22
2002.05.02
помогите !


3-2472
Леонид
2002-04-11 11:09
2002.05.02
Поле просмотра в TDBGrid


7-2691
ikar101
2002-02-06 15:59
2002.05.02
EAccessViolation


7-2695
Королев
2002-02-07 09:04
2002.05.02
мне все же нужна цоколевка разъема СС208


1-2597
BlackGrin
2002-04-19 19:59
2002.05.02
Gif & Delphi