Используем функцию из SysUtils.pas:
function LowerCase(const S: string): string;
Пример использования:
procedure TForm1.Button1Click(Sender: TObject);
var s:string;
begin
s := LowerCase('DEMO TEXT');
ShowMessage(s);
end;
Единственный минус этой функции это то, что она не переводит в нижний регистр русские символы
![]() |
|
Просмотров: 3041
Copyright © 2008-2010 Программирование на Delphi для начинающих и не только
Полнота авторских прав на все материалы, опубликованные на сервере DelphiDevelop.ru принадлежит их авторам
Перепечатка материалов разрешается с указанием авторства и гиперссылки на первоисточник информации
Хостинг от uCoz