Jump to content
Korean Random

Создание инсталляторов для модпаков на базе Inno Setup


Recommended Posts

Переходите на VCL, там в плане редактирования интерфейса очень много возможностей.

И как в ней редактировать?

Заменил цвета для теста. Как теперь эту PNGшку обратно записать? Сохраняю скин , открываю а там никаких изменений

post-8756-0-09363600-1439409753_thumb.jpg
Link to comment
Short link
Share on other sites

глючная

Например?

 

Заменил цвета для теста. Как теперь эту PNGшку обратно записать?

Для цветов есть разделы Colors/SysColors.

Edited by Kotyarko_O
Link to comment
Short link
Share on other sites

 

 

а пнгшка для чего?
Из неё берётся стиль прорисовки всех компонентов. Заменив цвет PNG-шки изменится и цвет контрола. НО если кроме цвета ничего заменять не нужно, в принципе, можно обойтись и отдельными цветовыми разделами.

 

 

 

Как теперь эту PNGшку обратно записать?
В дизайнере:

Images > style.png > Update > Выбор_изменённого изображения > Ok. Затем Save. И тестером можно просмотреть что вышло.

 

 

 

У меня задумка полностью дизайн переделать
Ну тогда нужно и png, и цвета подбирать.
Link to comment
Short link
Share on other sites

Подскажите пож. как сделать прокрутку окна колесом мыши без выбора модов, а то не скролит колесом если нечо не выбрал. И второе окно тоже не хочет прокручиватся пока не тыкнешь в надписи. :que:

 

Edited by zekan
Link to comment
Short link
Share on other sites

Подскажите пож. как сделать прокрутку окна колесом мыши без выбора модов, а то не скролит колесом если нечо не выбрал. И второе окно тоже не хочет прокручиватся пока не тыкнешь в надписи

А они и не должны.

@AtotIK уже ответил. Но у меня валялся подобного рода пример, так что прикреплю, пусть висит:

[Code]
Const
 WM_MOUSEWHEEL = $20A;

Function GetWindowRect(hWnd: HWND; var lpRect: TRect): Boolean; external '[email protected] stdcall';

Procedure AppOnMessage(var Msg: TMsg; var Handled: Boolean);
var
 Rt: TRect;
begin
 case Msg.Message of
 WM_MOUSEWHEEL:
  begin
   if WizardForm.CurPageID = wpSelectComponents then
    GetWindowRect(WizardForm.ComponentsList.Handle, Rt);
  end;
 end;
end;

Procedure InitializeWizard();
begin
 Application.OnMessage := @AppOnMessage;
end;

Edited by Kotyarko_O
  • Upvote 2
Link to comment
Short link
Share on other sites

procedure ComponentsSetFocus(CurPageID: Integer);
begin
  If CurPageID=wpSelectComponents then
begin
  WizardForm.ComponentsList.SetFocus;
end;
end;
 
procedure CurPageChanged(CurPageID: Integer);
begin
  ComponentsSetFocus(CurPageID);
end;

Вроде так. Хотя странно, ведь у меня всё прокручивается и без этого.

Edited by AtotIK
  • Upvote 1
Link to comment
Short link
Share on other sites

procedure ComponentsSetFocus(CurPageID: Integer);
begin
  If CurPageID=wpSelectComponents then
begin
  WizardForm.ComponentsList.SetFocus;
end;
end;
 
procedure CurPageChanged(CurPageID: Integer);
begin
  ComponentsSetFocus(CurPageID);
end;

Вроде так. Хотя странно, ведь у меня всё прокручивается и без этого.

 

 

Может потому, что у вас автовыбор на модах стоит)

немного перефразирую вопрос:

 

Как сделать прокрутку на стр. Ready  :que:

Edited by zekan
Link to comment
Short link
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...