Новые книги

Трудно переоценить ту роль, которую играет складской учет в учетно-управленческой системе современного предприятия. Данная книга будет интересна и полезна читателям, чья профессиональная деятельность имеет отношение к складскому хозяйству компании: кладовщики, бухгалтеры, экономисты, и т. д. Непринужденный и доступный стиль изложения, а также большое количество наглядных иллюстраций способствуют быстрому и легкому усвоению предлагаемого материала.
Данную книгу можно назвать практической энциклопедией. В ней дан максимальный охват проблематики обеспечения информационной безопасности, начиная с современных подходов, обзора нормативного обеспечения в мире и в России и заканчивая рассмотрением конкретных направлений обеспечения информационной безопасности (обеспечение ИБ периметра, противодействие атакам, мониторинг ИБ, виртуальные частные сети и многие другие), конкретных аппаратно-программных решений в данной области. Книга будет полезна бизнес-руководителям компаний и тем, в чью компетенцию входит решение технических вопросов обеспечения информационной безопасности.

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

mailto:%[email protected]

[email protected]

.

Вопрос и Ответ 51

Вопросы и Ответы


      51. Можно ли программно установить произвольную строку в первую позицию TListBox?

      Для установки любой строки в произвольную позицию в окне TListBox можно послать сообщение:

      SendMessage(ListBox1.Handle, lb_SetTopIndex, SpinEdit1.Value-1, 0);

      где первым параметром передается указатель на компонент, вторым - сообщение, третьим - номер устанавливаемой строки и позиция в окне на которую перемещается указанная строка.

      Строки нумеруются с нуля.

      Пример:

      ............

      procedure TForm1.SpinEdit1Change(Sender: TObject);
      begin

        TRY

          SendMessage(ListBox1.Handle, lb_SetTopIndex, SpinEdit1.Value-1,0);

        FINALLY
        END;

      end;

      ............


...предыдущая страница следующая...
оглавление



"Вопрос и Ответ 51"
Copyright © "В помощь Веб-Мастеру" (Alexander D. Belyaev) 2005-2024 .
При перепечатке любого материала видимая ссылка на источник "В помощь Веб-Мастеру" и все имена, ссылки авторов обязательны!
Время генерации страницы: 0.006