Тема: Поиск по базе
Показать сообщение отдельно
  #2  
Старый 18.05.2008, 10:41
san-46 san-46 вне форума
Активный
  
Регистрация: 25.04.2008
Сообщения: 383
Репутация: 33
По умолчанию
S := AnsiLowerCase(Edit1.Txt);
S := AnsiUpperCase(S[1])+Copy(S, 2, 999);
Ответить с цитированием