Не хватает ItemIndex

отредактировано 12:15 Раздел: FastReport 3.0
В ListBox есть свойство ItemIndex. И в ComboBox есть. А в CheckListBox нет. А очень не хватает. Хочется определить не только поCheckаные записи, но выделенную. ;)

Комментарии

  • SlasherXSlasherX Россия, Магнитогорск
    отредактировано 12:15
    Stranger написал:
    В ListBox есть свойство ItemIndex. И в ComboBox есть. А в CheckListBox нет. А очень не хватает. Хочется определить не только поCheckаные записи, но выделенную. ;)
    Как это нету??? специально посмотрел, все есть.

    1. Кидаю на форму CheckListBox1(TCheckListBox) и Label1 (TLabel).
    2. В обработчике CheckListBox1.OnClick пишу:

    procedure TForm1.CheckListBox1Click(Sender: TObject);
    begin
    Label1.Caption := 'Выделен: '+IntToStr(TCheckListBox(Sender).ItemIndex)
    end;

    Всё замечательно работает.

    Может ты что то другое имел ввиду?

    З.Ы.: Смотрел в Delphi 6
  • отредактировано 12:15
    А может ты невнимательно читал? Это тема по фастрепорту, третьему, а не по дельфе ;)

    Попробуй все тоже самое, но непосредственно в отчете. Типа такого:
    procedure CheckListBox1OnClick(Sender: TfrxComponent);
    begin
      Label1.Caption := IntToStr(TfrxCheckListBoxControl(Sender).ItemIndex);
    end;
    
    А потом, для верности, загляни в исходники. ;)

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

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