Главная страница
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.018 c
11-1116305139
uli
2005-05-17 08:45
2006.01.08
Сворачивание вторичной формы на панель задач


2-1134862647
Neiroman
2005-12-18 02:37
2006.01.08
Memo и строки


14-1134450960
begin...end
2005-12-13 08:16
2006.01.08
С Днём рождения! 13 декабря


3-1132041195
Id
2005-11-15 10:53
2006.01.08
Замена компонента IBTable


14-1134497873
Yerlan Dossanov
2005-12-13 21:17
2006.01.08
Объект или субъект