PWideChar = ^WideChar;
Тип PWideChar содержит указатель на значение WideChar. Это может также использоваться, чтобы указать на символы в пределах WideString, как в коде примера. Как с другими указателями, целочисленная арифметика, типа Inc и Dec может быть использована с PWideChar переменной, как показано в примере.
|
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;
|