| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Это опять я, забыл еще один вопрос: ;Сумма ПРОПИСЬЮ [D5, D6, Paradox]
NaPoleOn_IV © (2002-08-20 20:26:00)Помогите пожалуйста еще разок! Исходя из прошлого вопроса (Напоминаю: как перевести цифру из формата 0000,00 в 0000-00 и записать ее в базу) есть еще один вопрос как теперь эту (можно и цифру формата 0000,00) перевестив сумму прописью и опять же записать ее в определенную ячейку базы.
Только пожалуйста поподробнее, а то у меня есть один пример, а я в нем не могу разобраться.
Заранее благодарен.
Sirus (2002-08-22 13:05:00) [1]Если ты не против то можно отправить тебе процедуру на почту...
Skif (2002-08-22 12:55:00) [2]Вообщето надо хелпа читать. Хотя бы по старому Pascal-ю.
Самый простой дедовский способ.
1. Pos(Substr, S: string): byte- осуществляет поиск подстроки Substrв строке Sи возвращает номер первого символа в S, который является первым символом в Substr(номер начинается по моему с 0).
2. Delete(var S:string; Index:integer;Count:integer)- удаляет из строки Sподстроку, начиная с позиции Index, длиной Count.
3. Insert(Source:string, var S: string; Index: integer)-
вставляет строку Sourceв строку S, начиная с позиции Index.
А по поводу суммы прописью пиши сам алгоритм. Он нудный. Но что поделать или читай Kulib-у (к стати, классная вещь. Спасибо Озерову, что он ее организовал). Там собрано куча советов. Если надо пиши на почтовик, вышлю.
fnatali (2002-08-21 07:08:00) [3]UBPFD - http://delphibase.endimus.com/
Строки и символы->Конвертация строк
| |
