Скачать: CL | DM;

Замена вункции Uppercase   Найти похожие ветки 

← →
silvestr   (2005-06-13 11:28) [0]

Она переводит в верхний регистр только латиницу :( а как быть с керилицей ?

---

← →
Anatoly Podgoretsky ©   (2005-06-13 11:31) [1]

F1 + Uppercase

---

← →
Antonn ©   (2005-06-13 11:40) [2]

silvestr   (13.06.05 11:28)
function UpCaseRus(ch: Char): Char;
asm
@@Rus:
 CMP   AL,"я"
 JA    @@Exit
 CMP   AL,"а"
 JB    @@yo
 SUB   AL,"я" - "Я"
 RET
@@yo:
 CMP   AL,"ё"
 JNE   @@exit
 MOV   AL,"Ё"
@@exit:
end;

---

← →
ferr ©   (2005-06-13 11:40) [3]

ShowMessage(AnsiUpperCase("Всё нормально"));

---

← →
MakedoneZ ©   (2005-06-13 16:01) [4]

> F1 + Uppercase

Можно было и помочь.

---

← →
GuAV ©   (2005-06-13 16:28) [5]

Antonn ©   (13.06.05 11:40) [2]
CMP   AL,"я"
JA    @@Exit

Это когда выполнится ?

---

← →
Anatoly Podgoretsky ©   (2005-06-13 16:35) [6]

MakedoneZ ©   (13.06.05 16:01) [4]
Вот это и надо было смотреть в справке и там прямо указано что использовать взамен. Или ты предлагаешь сюда скопировать справку7

---

← →
Antonn ©   (2005-06-13 17:22) [7]

GuAV ©   (13.06.05 16:28) [5]
поправте, если не так, буду иметь ввиду (код не мой, но работает)

---

← →
ferr ©   (2005-06-13 18:10) [8]

>CMP   AL,"я"
> JA    @@Exit

:))

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.025 c