Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.012 c
2-1134757985
dera
2005-12-16 21:33
2006.01.08
Как скрыть прогу в списке процессов (Win98)?


9-1113424295
sergeyshb
2005-04-14 00:31
2006.01.08
Проект "Другой мир"


4-1130909108
Muchacho
2005-11-02 08:25
2006.01.08
взять текст из чужого ListBox-a


1-1134038734
Black Fox
2005-12-08 13:45
2006.01.08
Delphi + Open Office


14-1134247846
LordOfRock
2005-12-10 23:50
2006.01.08
Delphi глючит по страшному




   Наверх