[Termit-200]

Есть база - все значения в ней начинаются с большой буквы, остальные маленькие. Как сделать так, чтобы значение, которое я ввожу в TEdit для поиска как угодно в конце когда начинается поиск соответствовало это формату (1-я большая, остальные маленькие) ????

[san-46]

S := AnsiLowerCase(Edit1.Txt);
S := AnsiUpperCase(S[1])+Copy(S, 2, 999);

[Termit-200]

Спасибо - не думал, что все настолько элементарно ))))