Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.08.22;
Скачать: [xml.tar.bz2];

Вниз

Регистр символа   Найти похожие ветки 

 
Spooky   (2002-08-13 14:28) [0]

Кто-нибудь знает как определить регистр символа (т.е. маленькая это буква или заглавная)?

Буду благодарна за ответ.
(очень нужно)


 
RV   (2002-08-13 14:31) [1]

if UpCase(a)=a then заглавная


 
MBo   (2002-08-13 14:32) [2]

if achar in ["A".."Z"] then заглавная


 
Skier   (2002-08-13 14:36) [3]

>Spooky


IsUpperCase(const AChar : Char) : Boolean;
begin
Result := (AChar in ["A".."Z"]) or (AChar in ["А".."Я"])
end;


 
Spooky   (2002-08-13 14:57) [4]

Спасибо, это мне пригодится.
А нет универсального способа, без привязки к языку?


 
Skier   (2002-08-13 15:03) [5]

>Spooky

Можно следить за состoянием Shift и Caps Lock...


 
MBo   (2002-08-13 15:03) [6]

RV универсальный привел, только AnsiUpperCase нужно


 
Spooky   (2002-08-13 15:08) [7]

На счет
if UpCase(a)=a then заглавная
я что-то сразу не въехала.

Спасибо.


 
Spooky   (2002-08-13 16:10) [8]

А вы знаете, "if UpCase(a)=a then заглавная" для русских букв не работает!!!


 
Skier   (2002-08-13 16:13) [9]

>Spooky

AnsiUpperCase



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

Форум: "Основная";
Текущий архив: 2002.08.22;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.006 c
7-71408
inc(665)
2002-06-09 11:17
2002.08.22
Explorer.exe


3-71026
NDR
2002-07-31 12:10
2002.08.22
Как проиндексировать базу


1-71141
Kaginava
2002-08-13 13:41
2002.08.22
StringGrid


1-71132
Lena
2002-08-13 00:28
2002.08.22
Чтение дока


6-71295
Timon
2002-06-10 13:54
2002.08.22
Странная ошибка





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский