PostHeaderIconDelphi. Функция StringToCursor( const S: string ): TCursor;

Функция StringToCursor( const S: string ): TCursor;

Модуль: Controls

type TCursor = -32768...32767;

Описание
Функция преобразовывает строковое значение S, определяющее вид курсора, в значение типа TCursor. Функция обратна по функциональности функции CursorToString. Параметр S должен представлять собой либо предопределенную константу вида курсора, либо строковое представление соответствующего ему числового значения, в противном случае возникнет исключение EConvertError.

Пример
var
   I1,I2: Longint;
begin
   I1:= StringToCursor('crHelp');     // I1:= -20
   I2:= StringToCursor('-20');         // I2:= -20
end;

 
Copyright © 2007-2010 IsIProg.ru. All Rights Reserved.