Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

ПОМОГИТЕ !!!!!!! (Надо 12 П.10,158-1*2 --> 12П1015812) [D5, IB6.x]


Страницы:   1 2

AALLEEXX ©   (2003-01-15 07:27:00) 

Есть в базе шифры с точками запятами и т.д. вот их всех при сверке или фильтрации надо убирать
(пример 12 П.10,158-1*2 --> 12П1015812)


Alexandr   (2003-01-16 13:36:00) [1]

кому она нужна...


AALLEEXX   (2003-01-16 13:33:00) [2]

Проблема решена всем спасибо

если кого интересует полный код пишите


AALLEEXX   (2003-01-16 06:46:00) [3]

ВОТ МЕТОД ОТСЕКАНИЯ МОЖЕТ КОМУ ПРИГОДИТЬСЯfunction

Tf_New_Kart.proverka(S_Old:string):string;
const K:set of char=["a".."z","A".."Z","0".."9", "


AALLEEXX   (2003-01-16 06:40:00) [4]

Здесь www.micrel.cz/delphi/ и в кладовке нет jbStr


Господа Дельфовичи отсекание я сделал
а как из базы InterBase брать строчку с шифром отсеч все ненуное
и вставить в другую таблицу

т.е беру строчку в переменную обрабатываю скидываю
а как слудующую ?


_______________________________
Всем спасибо наверно


dimis   (2003-01-15 16:32:00) [5]

>>Дмитрий Баранов © (15.01.03 16:29)
>>Задача на Perl решается в одну строчку
в Oracle есть фунцция translate


Дмитрий Баранов   (2003-01-15 16:29:00) [6]

12 П.10,158-1*2 --> 12П1015812

Задача на Perl решается в одну строчку.
Можно прикрутить движок RegExp VBScript (VBScript.RegExp) или поискать портированный под Delphi пакет регулярных выражений.


perl -e "use locale; use POSIX; $a = "12 П.10,158-1*2"; $a =~s/[^\w\d]//g; print $a"


Anatoly Podgoretsky   (2003-01-15 16:26:00) [7]

BlackTiger (15.01.03 15:57)
Это уже вычисляемое поле, а не фильрация, смотреть описание TField или соответствующие реализации на сервере


Дмитрий Баранов   (2003-01-15 16:24:00) [8]

BlackTiger (15.01.03 14:40)

>А действительно, господа, как отфильтровать только цифры и символы
>ЛЮБОГО языка?

Регулярными выражениями.


dimis   (2003-01-15 16:16:00) [9]

PS вопрос реализации зависит от субд и количества серого вещества


dimis   (2003-01-15 16:15:00) [10]

видимо надо работать по аски-коду
тем более что ини все сгрупированы


BlackTiger   (2003-01-15 15:57:00) [11]

Я хотел сказать - оставить в строке-результате только цифры и текстовые символы с учетом языков, выкинув всю абсолютно псевдографику и другие "ненужные" символы (запятые, точки, воскл./вопр. знаки и др.).


Anatoly Podgoretsky   (2003-01-15 14:53:00) [12]

В обработчике OnFilterRecord можно делать все! Только что значит "отфильтровать только цифры и символы"?


BlackTiger   (2003-01-15 14:40:00) [13]

А действительно, господа, как отфильтровать только цифры и символы ЛЮБОГО языка?


MegaBass   (2003-01-15 11:25:00) [14]

функция AnsiReplaceText or AnsiReplaceStr and IsDelimiter


Anatoly Podgoretsky   (2003-01-15 10:33:00) [15]

Подробнее про сверку, но фильтранция через обработчик или просто сканирование набора позволяет сделать все, кроме того есть такое понятие как расчетные поля, тоже позволяет многое.


Иван Брылёв   (2003-01-15 10:20:00) [16]

Если нет оригинальных идей, нужно делать как умеешь:-) Читаешь содержимое поля в строку (или массив строк), парсишь все ненужное (например с помощью указанных компонентов) и, если надо, записываешь в другое поле. То, что нельзя сделать автоматически, можно сделать вручную. Можно попробовать пользоваться TMaskEdit - составить какую-нибудь хттрую маску. Или написать самому компонент, который отфильтровывает эти самые точки.


Sergey13   (2003-01-15 09:27:00) [17]

2Chubais © (15.01.03 09:09)
>ААААААААААААААААААААААААА
У тебя что - запор?
>!!!!!!!!!!!!!!!!!!!
Тогда с облегчением.
8-)


AlexandrN   (2003-01-15 09:11:00) [18]

Привет...
Для осуществления поставленной задачи используй, модуль для парсинга строк возбми его сдесь или посмотри в кладовой:
// Zakladni operace pro manipulaci s retezci
// (c) 1991-2000 J.BENES, All right reserved
micrel@micrel.cz
www.micrel.cz/delphi/

Называется: jbStr - неплохо сделанный.


Chubais   (2003-01-15 09:09:00) [19]

ААААААААААААААААААААААААА!!!!!!!!!!!!!!!!!!!!


Sergey13   (2003-01-15 08:59:00) [20]

2AALLEEXX (15.01.03 08:48)
Заполняй это поле (см. Наталия © (15.01.03 07:56)) тригерами, а не руками.


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо