Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2011.02.13;
Скачать: CL | DM;

Вниз

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

 
Irisss   (2010-11-24 12:25) [0]

Нужно привести текст к верхнему регистру и убрать пробелы
почему-то все коплиться, но не отрабатывает
что делаю не так?
function TForm1.getText(): string;
var AText: AnsiString;
begin
//    AText := Self.LabelEditText.Text;
   AText := "Прилетаю восьмого";
   UpperCase(AText);
   AnsiReplaceText(AText, " ", "");
   Result := AText;
end;


 
И. Павел ©   (2010-11-24 12:33) [1]

UpperCase(AText);
Попробуйте заменить на AnsiUpperCase


 
Irisss   (2010-11-24 12:36) [2]


> AnsiUpperCase

не сработало


 
Медвежонок Пятачок ©   (2010-11-24 12:38) [3]

UpperCase(AText);

Прелестно, прелестно.
А куда результат? В форточку?


 
Irisss   (2010-11-24 12:51) [4]

спасибо!


 
Anatoly Podgoretsky ©   (2010-11-24 13:04) [5]


> почему-то все коплиться

Это текст сообщения об ошибке?


 
Jeer ©   (2010-11-24 13:53) [6]

Это из Даля :)
"Коплиться - сидеть над чем и копаться, коптеть, корпеть."


 
Anatoly Podgoretsky ©   (2010-11-24 14:01) [7]

Хм, не знал, а ты правду говоришь?


 
Jeer ©   (2010-11-24 15:22) [8]

В современном варианте "коплиться" == "компилиться".

А в Дале "коплиться" - от корня "коп":
Производные:
копить, копиться, копал, копление, копилка, копище, коплиться



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

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

Наверх




Память: 0.48 MB
Время: 0.009 c
2-1290462726
Sarg77
2010-11-23 00:52
2011.02.13
Создание битовых массивов произвольной длинны


2-1290612582
Денис2
2010-11-24 18:29
2011.02.13
Серийный номер монитора


15-1288906198
Юрий
2010-11-05 00:29
2011.02.13
С днем рождения ! 5 ноября 2010 пятница


15-1288646999
Юрий
2010-11-02 00:29
2011.02.13
С днем рождения ! 2 ноября 2010 вторник


15-1288467409
Novi4ok
2010-10-30 23:36
2011.02.13
Дельфи или Си?