VPF::создание/управление диалогами из .res

Budy

Дата 21.11.2007, 12:17 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 616
Регистрация: 6.2.2004
Где: Екатеринбург

Репутация: 1
Всего: 2

:Приветствую
Ищу мануал по созданию шаблонов диалогов для Delphi. Так же интерисует как можно управлять объектами даилога, например, как получить/установить значение для COMBOBOX или поставить крыжик в CHECKBOX.

Вот пробовал разобраться со следующей программой:

Исходник диалога:

Код


MYDIALOG DIALOG 0, 0, 186, 95
STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU
CAPTION "Dialog"
FONT 8, "MS Sans Serif"
BEGIN
   DEFPUSHBUTTON "OK", 1, 129, 7, 50, 14, 0, WS_EX_DLGMODALFRAME
   PUSHBUTTON "Cancel", 2, 129, 24, 50, 14, 0, WS_EX_DLGMODALFRAME
   COMBOBOX 3001,7,76,172,30,CBS_DROPDOWN | CBS_SORT | WS_VSCROLL | WS_TABSTOP
END

Сама программа что показывает этот диалог:

Код


program DialogTest;

{$R dialogs.res}

uses
  Windows, Messages;

var
  Res: Integer;

function SettingsDlgProc(Window: HWND; Msg, WParam, LParam: Integer): Integer; stdcall;
var
  S: String;
begin
  Result:=0;
  case Msg of
    // Настраиваем объекты диалога //
    wm_InitDialog: begin
      // Как заполнить список элементов в COMBOBOX ? //
    end; // wm_IniDialog
    // Произошло некое событие //
    wm_Command: begin
      case LoWord(WParam) of
        1:  EndDialog(Window, idOK);              // Click OK
        2:  EndDialog(Window, idCancel);          // Click Cancel
      end;
    end; // wm_Command
    // Происходит закрытие диалога //
    wm_Close:
      DestroyWindow(Window);
    // Происходит удаление диалога //
    wm_Destroy:
      PostQuitMessage(0);
    // Во всех других случаях - нет ошибок //
    else Result:=0;
  end;
end;

begin
  // Запускаем диалог MYDIALOG //
  Res:=DialogBox(hInstance, 'MYDIALOG', 0, @SettingsDlgProc);
  // Как узнать значение в COMBOBOX ? //
  Halt(Res);
end.

Собственно,
• Как заполнить список элементов в COMBOBOX ?
• Как узнать значение в COMBOBOX ?

p.s. Очень буду рад за хороший мануал, где описаны все подробности - параметры, возможные значения, и прочее

Это сообщение отредактировал(а) Budy - 21.11.2007, 12:20

--------------------

Как ты назовешь свой корабль, так на нем и напишут
user posted image

OdesitVadim

Дата 21.11.2007, 14:00 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 40
Регистрация: 9.11.2007
Где: Одесса:)

Репутация: нет
Всего: нет

В www.msdn.com точно есть ответы на ваши вопросы.

Budy

Дата 21.11.2007, 15:56 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 616
Регистрация: 6.2.2004
Где: Екатеринбург

Репутация: 1
Всего: 2

OdesitVadim, мдаа... Что могу сказать точно, что 3 часа там ползал, ничего решающего мою проблему не нашел.
Есть конечно пример с проверкой/установкой крыжика в CHECKBOX, это уже вперед smile

А вот про COMBOBOX ничего.

--------------------

Как ты назовешь свой корабль, так на нем и напишут
user posted image

navodri

Дата 20.12.2007, 14:30 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 173
Регистрация: 26.10.2007

Репутация: нет
Всего: -1

Заходим на сайт: http://lenininc.com/win32api.html и покупаем у автора библиотеку с примерами. там есть всё: и заполнение КомбоБокса и много-много всего...

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: WinAPI и системное программирование \| Следующая тема »