CoderX :: Forums - Показать сообщение отдельно - Кружок нубов(Вопрос-Ответ)

PanAm · 23.03.2009, 15:14

Stasrus,

delphi Код:

var
  tmp1 : string;
begin
  tmp1[2] := char(Ord(tmp1[2]) xor $FF);
end;

23.03.2009, 15:14	#344
PanAm Местный Регистрация: 18.01.2008 Сообщений: 286 Сказал Спасибо: 24 Имеет 133 спасибок в 80 сообщенях	Stasrus, delphi Код: var tmp1 : string; begin tmp1[2] := char(Ord(tmp1[2]) xor $FF); end;