property Cell[ARow, ACol: Word]: TCell

отредактировано 14:29 Раздел: FastScript
Как можно объявить индексные проперти с двумя индексами?

property Cell[ARow, ACol: Word]: TCell

Комментарии

  • отредактировано 14:29
    Да вроде все просто:

    constructor TFunctions.Create;
    begin
    with fsGlobalUnit do
    begin
    with AddClass(TMyClass, 'TObject') do
    begin
    AddDefaultProperty('Cell', 'Word, Word', 'TCell ', CallMethod, True);
    end;
    end;

    function TFunctions.CallMethod(Instance: TObject; ClassType: TClass;
    const MethodName: string; var Params: Variant): Variant;
    begin
    Result := 0;
    if ClassType = TMyClass then
    begin
    if MethodName = 'CELL.GET' then
    Result := Integer(TMyClass(Instance).Cell[Params[0], Params[1]])
    end;
    end;

Оставить комментарий

Многофункциональный текстовый редактор. Чтобы отредактировать стиль параграфа, нажмите TAB, чтобы перейти к меню абзаца. Там вы можете выбрать стиль. По умолчанию не выбран ни один стиль. Когда вы выберете текст, появится встроенное меню форматирования. Нажмите TAB, чтобы войти в него. Некоторые элементы, такие как многофункциональные вставки ссылок, картинок, индикаторов загрузки и сообщений об ошибок могут быть вставлены в редактор. Вы можете перемещаться по ним, используя стрелки внутри редактора и удалять с помощью клавиш delete или backspace.