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

Вниз

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

 
alex810   (2007-10-11 18:51) [0]

Здраствуйте. Подскажите пожалуйста есть ли в Делфи стандартная функция для перевода слов состоящего из символов нижнего регистра в верхний и наоборот.


 
Плохиш ©   (2007-10-11 19:05) [1]

Начни поиск в справке с букв upper


 
alex810   (2007-10-11 19:13) [2]

У меня Delphi2007 без справки


 
alex810   (2007-10-11 19:18) [3]

Вот нарыл но ничего не пашет выдает в любом из этих случаев то что я передаю в виде значения.

program StringDemo07;
const
 SourceString="Hello world";
var
 TargetString:String;
begin
 // присвоим TargetString значение SourceString переведенное в нижний регистр
 TargetString:=LowerCase(SourceString);
 // напечатаем содержимое TargetString
 WriteLn(TargetString);
 // напечатаем значение SourceString переведенное в верхний регистр
 WriteLn(UpperCase(SourceString));
 // Возведем первый символ TargetString в верхний регистр
 TargetString[1]:=UpCase(TargetString[1]);
 // возведем последний символ TargetString в верхний регистр
 TargetString[Length(TargetString)]:=UpCase(TargetString[Length(TargetString)]);
 // напечатаем содержимое TargetString
 WriteLn(TargetString);
 // понизим регистр первого символа TargetString
 TargetString[1]:=LoCase(TargetString[1]);
 // напечатаем содержимое TargetString
 WriteLn(TargetString);
 // Ждем нажатия Enter
 ReadLn;
end.



 
Desdechado ©   (2007-10-11 19:32) [4]

AnsiUpperCase


 
alex810   (2007-10-11 19:39) [5]

Спасибо а для перевода в нижний AnsiLowerCase ?


 
alex810   (2007-10-11 19:39) [6]

Спасибо а для перевода в нижний AnsiLowerCase ?


 
alex810   (2007-10-11 19:40) [7]

Извените за глупый вопрос сам попробовал. Получилось. Еще раз спасибо.



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

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

Наверх




Память: 0.48 MB
Время: 0.012 c
15-1191450765
Суслик
2007-10-04 02:32
2007.11.04
adwords от гугл


1-1187521289
аааааа
2007-08-19 15:01
2007.11.04
винчестер


2-1191990597
Al500
2007-10-10 08:29
2007.11.04
Подскажите пожалуйста, возможно ли неявно вызвать процедуру


15-1191493613
Jeer
2007-10-04 14:26
2007.11.04
С праздником !


3-1183014419
azamatufa
2007-06-28 11:06
2007.11.04
ADO SQL SUM(Field) - ошибка в IDE Access violation ... 1B041FC6