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

Вниз

Подскажите алгоритм замены больших букв на маленькие   Найти похожие ветки 

 
garage   (2001-10-02 12:27) [0]

Подскажите алгоритм замены больших букв на маленькие в названии файла и внутри html-файла(ссылки)


 
ZEE ©   (2001-10-02 20:43) [1]

Наверно требуется простое преобразование строк, типа такого (хотя есть стандартные, но они кажись с кирилицей не очень дружат):

function DownCh(ch:char):char;
begin
case ch of
"A".."Z":downch:=chr(ord("a")+ord(ch)-ord("A"));
"А".."Я":downch:=chr(ord("а")+ord(ch)-ord("А"));
else
downch:=ch
end;
end;

function StrDown(str:string):string;
var i:integer;s:string;
begin
s:="";
for i:=1 to length(str) do
s:=s+DownCh(str[k]);
result:=s;
end;


 
garage   (2001-10-04 15:23) [2]

Спасибо, выручил !!!


 
Venom   (2001-10-04 16:28) [3]

А можно еще как -то типа: sourcetext.text:=AnsiReplaceStr(sourcetext.text,"a","a"); - любые "а" независимо от регистра будут заменяться.



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

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

Наверх




Память: 0.47 MB
Время: 0.022 c
1-22165
grab
2001-12-20 20:18
2002.01.08
создание и размещение эмблемы программе на форме


6-22303
maxi
2001-10-11 18:03
2002.01.08
клиент DCOM не видит сервер DCOM на разных машинах.


7-22418
Mikle
2001-09-20 09:06
2002.01.08
Срочно! Комп вместо принтера.


1-22215
VovaKomarov
2001-12-16 13:36
2002.01.08
обновление клиента


3-21982
Dush
2001-12-06 12:37
2002.01.08
Подключение клиента к базе