Модераторы: Snowy, MetalFan, bems, Poseidon
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> TStringList убрать заглавные буквы, Как убрать верхний регистр? 
V
    Опции темы
Canada
Дата 29.7.2011, 10:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 153
Регистрация: 9.2.2009

Репутация: нет
Всего: нет
Здравствуйте, в TStringList сидит:

"ВОТ ТАКОЙ ТЕКСТ НАПИСАННЫЙ ТОЛЬКО ЗАГЛАВНЫМИ БУКВАМИ", помогите, пожалуйста, перевести в маленькие буквы. CaseSensetive:= False не помогает :(
PM MAIL   Вверх
14SatanA88
Дата 29.7.2011, 10:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 393
Регистрация: 13.5.2010

Репутация: нет
Всего: 5
Canada, ну ты даешь smile

когда StringList наполняешь, используй функцию для работы со строками LowerCase или AnsiLowerCase

в справке все подробно расписано, с примерами
PM MAIL ICQ   Вверх
Canada
Дата 29.7.2011, 10:30 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 153
Регистрация: 9.2.2009

Репутация: нет
Всего: нет
LowerCase - это как? Пример можно показать? Я в справке найти ничего не могу:(
PM MAIL   Вверх
14SatanA88
Дата 29.7.2011, 10:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 393
Регистрация: 13.5.2010

Репутация: нет
Всего: 5
вот пример:

Код

This example uses an edit control, a label, and a button on a form. 
When the user clicks the button, the label shows the text of the edit control in lower case.

procedure TForm1.Button1Click(Sender: TObject);

begin
  Label1.Caption := LowerCase(Edit1.Text);
end;

Я нашел его в справке Delphi

вот тебе пример именно под стринглист:

Код

var list: TStringList;
      s: string;
...
list:=TStringList.Create;
s:='ABCDEFG';
list[0]:=LowerCase(s);
list.Free;


результат:
list[o] = 'abcdefg'

Это сообщение отредактировал(а) 14SatanA88 - 29.7.2011, 10:36
PM MAIL ICQ   Вверх
Canada
Дата 29.7.2011, 10:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 153
Регистрация: 9.2.2009

Репутация: нет
Всего: нет
Ага, прочел, сделал - не работает в D2010. Ни AnsiLowerCase, ни просто LowerCase.

Добавлено через 6 минут и 4 секунды
Пардон, я её как процедуру вызывал по привычке, а она функция. Работает. Спасибо!
PM MAIL   Вверх
14SatanA88
Дата 29.7.2011, 10:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 393
Регистрация: 13.5.2010

Репутация: нет
Всего: 5
Цитата(Canada @  29.7.2011,  10:38 Найти цитируемый пост)
не работает в D2010

быть этого не может
открой справку, напиши туда LowerCase и читай

Добавлено через 6 минут и 1 секунду
SysUtils.LowerCase
вот так попробуй

Добавлено через 7 минут и 15 секунд
и вообще что пишет? ошибка компиляции? просто не работает?

Добавлено через 9 минут и 47 секунд
Цитата(Canada @  29.7.2011,  10:38 Найти цитируемый пост)
 её как процедуру вызывал по привычке, а она функция

омфг) бывает.
PM MAIL ICQ   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Для новичков"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Для новичков | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0450 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.