Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Делфи _ string

Автор: :-)~ 17.06.2007 17:29

есть процедура, которая заменяет буквы нижнего регистра в верхний и наоборот??
например: a --> A или B --->b

Автор: Mete0 17.06.2007 17:34

function StrUpper(Str: PChar): PChar;

function UpCase(Ch: Char): Char;

Автор: volvo 17.06.2007 17:36

Есть...
UpperCase/LowerCase или AnsiUpperCase/AnsiLowerCase

Автор: :-)~ 17.06.2007 18:11

А как ими правильно пользоваться?
допустим у меня есть строка: sdAFAdFw fd d
мне надо получить: Sdafadfw fd d

как правильно сделать?

Автор: volvo 17.06.2007 18:29

s := 'sdAFAdFw fd d';
s := Upcase(s[1]) + LowerCase(copy(s, 2, length(s))); // <-- Если только с латинскими символами

Автор: :-)~ 17.06.2007 18:59

спасиба, разобрался....

Автор: :-)~ 17.06.2007 19:31

у меня ещё один вопрос есть: как к множеству прибавить букву из строки?
например:


s:string;
d:set of char;





d:=d+s[i]



или


d:=s[i];



как сделать?

Автор: volvo 17.06.2007 19:37

d := d + [s[i]];

или
Include(d, s[i]);

Автор: :-)~ 17.06.2007 19:46

а как вывести в Memo множество?


Memo1.Lines.Add(floatTostr(d));


????????

Автор: volvo 17.06.2007 19:55

Посимвольно:

for ch := #0 to #255 do
if ch in d then memo1.lines.add(ch);