Облака / Clouds
    Go to Copy.com
    Copy.com
    The bast cloud service
    Get 20 GB free!!!
    Support WebDav.
    Show more >>

    Go to Dropbox.com
    Dropbox.com
    time-tested cloud storage
    Support WebDav.
Все бесплатно
    Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.



Вопросы
  Удаление файла в корзину
   Категория: Файловая система
  Удалить пробелы в начале и конце
   Категория: Текст и строки
  Вывод текста на канву Canvas
   Категория: Компоненты
  Перекодировка в DBASE
   Категория: Базы данных
  Как произвести поиск файлов во вложенных папках
   Категория: Файловая система
  Поиск по EasyTable
   Категория: Базы данных
  Находится ли мышь над формой
   Категория: Компоненты
  Компонент StatusBar
   Категория: Компоненты
  Процедуры и функции для рабты с файлами
   Категория: Файловая система

Delphi - Справочник: SetString

ABCDEFGHIJKLMNOPQRSTUVWXYZ

  << Вернуться  

 SetString
procedure SetString ( var TargetString : string; BufferPointer : PChar; Length : Integer ) ;
Процедура (Unit System)
Копирует символы из буфера в строку
Описание:
Процедура SetString меняет длину TargetString на Length перед копированием этого количества символов из буфера, заданного переменной BufferPointer.

Длина меняется только в том случае, если строка не типа ShortString. Фактически, память под строку перераспределяется - ссылка на TargetString указывает на эту новую строку.
Пример кода: Простой пример

var target : string; source : array[1..5] of Char; srcPtr : PChar; i : Integer; begin // Заполнение массива символов for i := 1 to 5 do source[i] := Chr(i+64); // Копирование этих символов в строку srcPtr := Addr(source); SetString(target, srcPtr, 5); // Показываем, что мы имеем ShowMessage('target теперь = '+target); end;


  << Вернуться