Контролы, API Опции

[Unconnected]

Привет всем.

Сейчас начал переводить одно своё приложение на api, весёлое занятие) С механизмами всё понятно, часть проги портировал, а вот с отображением контролов на окне не очень ясно.. Во-первых - всегда ли обязательно создавать, например, label таким образом (для себя в ф-ю обернул):

Procedure createstatic(caption:string;x,y,wid,hei:integer);
begin
  CreateWindow('static', pchar(caption), WS_CHILD or WS_VISIBLE,x,y,wid,hei,hwndmain,10000, hInstance, 0);
end;

, или есть какой-то более простой способ внешнего проектирования? Я читал про добавление информации о контролах в ресурсы; это, в принципе, довольно удобно, если сделать быструю компиляцию .rc в .res батником (ну когда нужно быстро что-то изменить там), но вроде как он (способ) нестабильный какой-то.. Во-вторых - где задавать такие параметры static, как шрифт, цвет, размер текста?
Плохо, что вся инфа в msdn по api во-первых, на английском, а во-вторых, там сишный синтаксис. Вот в msdn, например, было написано ShowWindow(hwndMain, nCmdShow);, а делфи второй параметр не принимает такой, а принимает CmdShow (хотя в мсдн вроде и было указано, что от платформы зависит). И ещё, вот, допустим, в процессе исполнения надо мне изменить что-то, например цвет формы. Для этого достаточно вызвать функцию с параметрами, или надо в оконной функции описывать обработку сообщения CTL_COLOR, а потом когда надо отправлять это сообщение?

Сообщение отредактировано: Unconnected - 28.06.2010 17:22

[volvo]

И ещё, при создании вручную контрола (окна) мы хоть хэндл можем получить и отправить ему стили например, как Client показал, а при таком способе у нас вроде только текстовый идентефикатор и будет..

Ну да, ну да...

А что, вот это сделать тебе какая-то внутренняя преграда запрещает:

// новая функция, которая обрабатывает все команды
// от элементов управления диалога
function DlgProc(hWin: HWND; uMsg: UINT; wp: WPARAM; lp: LPARAM): bool; stdcall;
begin
  Result := False;
  case uMsg of
    // инициализация окна
    WM_INITDIALOG:
    begin
      SendMessage(GetDlgItem(hWin, 51), WM_SETFONT, WPARAM(myFont), 0); // Вот оно, чудо чудное !!!
    end;

    //обрабатываем команды получаемые от пользователя
    WM_COMMAND:
    begin
      case LoWord(wp) of
        // а вот и наша кнопка, с идентификатором 51...
        51: EndDialog(hWin, 0);
      end;
    end;
  end;
end;

?

Я сделал диалог, который описал полностью в RC-файле, и запускаю его по нажатию кнопки на своей форме. Вот результат:


Сам диалог описан вот так:

TestDialog DIALOG  10, 10, 300, 110
STYLE WS_POPUP | WS_BORDER
CAPTION "Test" 
{
    CONTROL "WinAPI. Lesson 2", -1, STATIC, SS_LEFT | WS_CHILD | WS_VISIBLE | WS_GROUP, 8, 10, 180, 30
    CONTROL "Close", 51, BUTTON, BS_PUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 126, 88, 60, 14
}

Никакой перекомпиляции диалога через brcc32.exe на фиг не надо - при внесении изменений в RC-файл Дельфи сама перекомпилирует все, что надо. Для этого нужно самую малость: чтобы RC-файл был корректным, и в правильной кодировке. У меня сложилось впечатление, что если сохранить RC-файл в UTF8, то он компилироваться из Дельфи не будет (надо будет попробовать, а будет ли из ком. строки с использованием brcc32)

Так что ты говоришь нельзя сделать? Сообщение послать? Сравни шрифт на Статик-контроле и на кнопке, ага...

Что там у тебя с изменением чего-то не получается? Ты б приаттачил проект полностью (тестовый, который не отрабатывает так, как нужно) - было бы проще посмотреть, в чем проблема...