Форум: "Начинающим";
Текущий архив: 2013.03.22;
Скачать: [xml.tar.bz2];
ВнизСвойство для поля array[0..20] of char Найти похожие ветки
← →
Очень злой (2012-03-14 00:16) [0]Имеется поле типа packed array[0..20] of char
и нужно в компоненте приделать к нему свойство
Желательно (но в крайнем случае можно и по другому, если посоветуете), чтобы его значение в инспекторе объектов отображалось в виде, например: 5F 3B 35 2E 5D 39 34 2D 33 31 3D 3D 2D 25 78 54 21 5E 5B 24 00
Делаю так:TLС4 = class (TComponent)
private
...
FToken:packed array[0..20] of char;
...
procedure SetToken(Value:string);
function GetToken:string;
public
...
published
...
property Token:string read GetToken write SetToken;// default "5F 3B 35 2E 5D 39 34 2D 33 31 3D 3D 2D 25 78 54 21 5E 5B 24 00";
end;
...
procedure TLС4.SetToken(Value:string);
var
i,k:integer;
begin
k:=(length(value)+1) div 3;
for i:=0 to k-1 do FToken[i]:=chr(strtointdef("$"+value[i*3+1]+value[i*3+2],0));
for i:=k to 20 do FToken[i]:=chr(0);
end;
function TLС4.GetToken:string;
var
i:integer;
begin
result:=IntToHex(ord(Ftoken[0]),2);
for i:=1 to 20 do result:=result+" "+IntToHex(ord(Ftoken[i]),2);
end;
Но не получается приделать ему дефолтное значение.
Как лучше это сделать? присваивать в конструкторе?
← →
Очень злой (2012-03-14 00:17) [1]И вообще, какие типы данных поддерживаются в инспекторе объектов?
← →
_oxffff (2012-03-14 00:41) [2]http://www.drbob42.com/delphi/property.htm
← →
Германн © (2012-03-14 02:01) [3]
> Имеется поле типа packed array[0..20] of char
Какой нафиг "packed array" в Д7?
← →
Очень Злой (2012-03-14 02:14) [4]
> Какой нафиг "packed array" в Д7?
Один раз когда-то наступил на грабли. Теперь всегда пишу packed, в любом случае, надо или не надо, но чтобы быть на 100% уверенным, что компилятор меня правильно понял. :)
← →
Anatoly Podgoretsky © (2012-03-14 07:58) [5]> Очень злой (14.03.2012 00:16:00) [0]
Инициализация свойств по умолчанию делается в Create
← →
Slym © (2012-03-14 15:20) [6]default отвечает за сохранение в DFM
если совпало - не сохранять
иначе сохранить
← →
Anatoly Podgoretsky © (2012-03-14 15:59) [7]> Slym (14.03.2012 15:20:06) [6]
Только за значение по умолчанию, а сохранение или нет побочный фактор
За сохранение отвечает Stored (Storage specifiers)
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2013.03.22;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.075 c