Текущий архив: 2004.04.11;
Скачать: CL | DM;

Вниз

Функция UpCase   Найти похожие ветки 

← →
dik   (2004-03-24 15:19) [0]

Уважаемые мастера! Не могу понять почему в моем проекте не работает UpCase?

str:=NameEdit.Text;
for i:=1 to length(str) do
 str[i]:=UpCase(str[i]);
NameEdit.Text:=str;

Создаю новый проект, в нем этот кусок кода работает?

---

← →
Defunct ©   (2004-03-24 15:20) [1]

Попробуйте:

NameEdit.Text := UpperCase(NameEdit.Text);

---

← →
dik   (2004-03-24 15:29) [2]

UpperCase тоже игнорирует!
Может несовместимость с каким-нибудь из подключенных модулей?

uses
 Windows, Messages, SysUtils, Variants, Classes, Graphics,   Controls, Forms,Dialogs, StdCtrls, ActnList, ToolWin, ActnMan, ActnCtrls,XPStyleActnCtrls, ExtCtrls, ComCtrls, jpeg, Grids, ValEdit;

Вот список модулей проекта.

---

← →
Романов Р.В. ©   (2004-03-24 15:31) [3]

AnsiUpperCase

---

← →
dik   (2004-03-24 15:37) [4]

Спасибо! С AnsiUpperCase заработало!

---

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

Текущий архив: 2004.04.11;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.034 c