Delphi справочник - Форум программистов - Навигация  
 A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z      По первой букве  
System     SysUtils     StrUtils     DateUtils     FileCtrl     ConvUtils     StdConvs     Math     Classes     Dialogs     Types     Variants    ПО Unit   Compiler directives     Directives     Keywords     Types     Variables     Constants     Functions     Procedures    По категории  


Основы Delphi
PWideChar
Тип
Указатель на PWideChar System unit
  PWideChar = ^WideChar;
Описание
Тип PWideChar содержит указатель на значение WideChar. Это может также использоваться, чтобы указать на символы в пределах WideString, как в коде примера.

Как с другими указателями, целочисленная арифметика, типа Inc и Dec может быть использована с PWideChar переменной, как показано в примере.
Примечания
PWideChar используется преимущественно при обработке строк с нулевым символом в конце.
Похожие команды
$ExtendedSyntax  Контроль обработки некоторых расширений Паскаля

Dec  Декремент порядковой переменной

Inc  Увеличивает порядковую переменную

PAnsiChar  Указатель на значение AnsiChar

PChar  Указатель на значение символа (Char)

PWideString  Указатель на значение WideString

WideChar  Тип переменной содержащий отдельный Интернациональный символ

WideString  Тип данных, который содержит строку, состоящую из WideChar

 
Пример кода : Показ всех символов в строке
var
  myWideString  : WideString;
  myWideCharPtr : PWideChar;
  i : Integer;

begin
  // Создание строки WideChar
  myWideString  := 'Hello';

  // Указатель на первый символ в строке
  myWideCharPtr := Addr(myWideString[1]);

  // Показ строки
  ShowMessage(myWideCharPtr);

  // Теперь приращиваем указатель
  Inc(myWideCharPtr,2);

  // И смотрим, что он показывает сейчас
  ShowMessage(myWideCharPtr);

  // Показ всех символов в строке
  while i <= length(mywidestring) do
  begin
    ShowMessage(myWideCharPtr^);
    Inc(i);
    Inc(myWIdeCharPtr);
  end;
end;
Hello
llo
 



© Форум Delphi   |  Блог программистов   |  Создание и продвижение сайтов - "Веб сателлит"  |  Ссылки   |  Английская версия