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

Вниз

Генерация строки по маске...   Найти похожие ветки 

 
MetalFan ©   (2005-12-08 16:31) [0]

нужно нечто следующее:
в маске могут быть русские(R,r) и латинские(L,l) буквы в нижнем и верхнем регистре и арабские цыфры(0)...
примеры масок: "RRR0", "LL-RR-00" и т.п.
необходимы след.функции
1) Проверка маски на правильность
function CheckMask( const AMask: string): boolean
2) Проверка строки на соответствие маске
function CheckMaskMatch( const AMask, AString: string): boolean;
3) Генерация первой последовательнсти по маске
function GenFirst( const AMask: string ): string
типа: маска "LL-rr-00". Result := "AA-аа-01"
4) получение следующей последовательности по маске:
function GenNext( const AMask, AString: string): string;
пример: маска "LL-rr-00" строка "BD-кл-99", Result := "BD-км-01"

подскажите как реализовать или где подсмотреть или взять!!!

Заранее спасибо за подсказки и советы!!!!


 
Игорь Шевченко ©   (2005-12-08 16:34) [1]


> или где подсмотреть


в masks.pas ?


 
MetalFan ©   (2005-12-08 16:48) [2]

посмотрел) но генерации там нет. да и маски там для файлов


 
Leonid Troyanovsky ©   (2005-12-08 16:51) [3]


> MetalFan ©   (08.12.05 16:48) [2]
> посмотрел) но генерации там нет. да и маски там для файлов


Генерация - Format.
А для проверки TMask.Matches вполне годится, читай примечание.

--
Regards, LVT.


 
MetalFan ©   (2005-12-08 16:59) [4]

ладно, спасибо и на том) буду разбираться



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

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

Наверх




Память: 0.47 MB
Время: 0.013 c
14-1134631855
vecna
2005-12-15 10:30
2006.01.08
Путин хочет запретить иностранные банки в России


3-1131922025
mfender
2005-11-14 01:47
2006.01.08
Empty Dataset, новая запись и Stack Overflow...


3-1131972061
solenko
2005-11-14 15:41
2006.01.08
Выполнение хранимой процедуры по имени


14-1134386643
Mike Kouzmine
2005-12-12 14:24
2006.01.08
Путин начинает рабочую неделю в Чечне.


3-1131691195
irq
2005-11-11 09:39
2006.01.08
IB компоненты и Firebird