Инструменты пользователя

Инструменты сайта


programmirovanie_v_dx:okno_spiska

Различия

Здесь показаны различия между двумя версиями данной страницы.

Ссылка на это сравнение

Предыдущая версия справа и слева Предыдущая версия
programmirovanie_v_dx:okno_spiska [2019/03/06 22:19]
jurist23rus [Создание и уничтожение окна списка]
programmirovanie_v_dx:okno_spiska [2019/03/14 13:23] (текущий)
7bit
Строка 9: Строка 9:
   * FormView – компонент представления формы,   * FormView – компонент представления формы,
   * Buttons – панель кнопок.   * Buttons – панель кнопок.
 +
 +===== Управление окном списка объекта =====
 +Для управления окном списка объекта надо подключиться к событию объекта OnCreateListWindow. ​
 +
 +Пример:​
 +
 +<code delphi>
 +procedure ListWindowCreate(Sender:​ TObject; aWindow: TForm);
 +var
 +  LWnd: TListWindow;​
 +begin
 +  LWnd := TListWindow(aWindow);​
 +  LWnd.FormView.Form.EditWindow.OnShow := @EditWindowShow;​
 +  LWnd.Caption := '​…';​
 +end;
 +
 +procedure Form_Create;​
 +begin
 +  dxLookupComboBox1.OnCreateListWindow := @ListWindowCreate;​
 +end;
 +</​code>​
  
 ===== Создание и уничтожение окна списка ===== ===== Создание и уничтожение окна списка =====
Строка 37: Строка 58:
 ListWnd.Free; ​      // Уничтожение окна списка ListWnd.Free; ​      // Уничтожение окна списка
 </​code>​ </​code>​
- 
-===== Управление окном списка объекта ===== 
-Для управления окном списка объекта надо подключиться к событию объекта OnCreateListWindow. ​ 
- 
-Пример:​ 
- 
-<code delphi> 
-procedure ListWindowCreate(Sender:​ TObject; aWindow: TForm); 
-var 
-  LWnd: TListWindow;​ 
-begin 
-  LWnd := TListWindow(aWindow);​ 
-  LWnd.FormView.Form.EditWindow.OnShow := @EditWindowShow;​ 
-  LWnd.Caption := '​…';​ 
-end; 
- 
-procedure Form_Create;​ 
-begin 
-  dxLookupComboBox1.OnCreateListWindow := @ListWindowCreate;​ 
-end; 
-</​code>​ 
- 
- 
programmirovanie_v_dx/okno_spiska.txt · Последние изменения: 2019/03/14 13:23 — 7bit