Самый простой способ получить iswin7.dll
библиотеку из Интернета и использовать его с помощью следующего кода:
[Files]
Source: ".\ISWin7.dll"; DestDir: "{tmp}"; Flags: dontcopy nocompression
[Code]
procedure iswin7_add_glass(Handle:HWND; Left, Top, Right, Bottom : Integer; GDIPLoadMode: boolean);
external '[email protected]:iswin7.dll stdcall';
procedure iswin7_add_button(Handle:HWND);
external '[email protected]:iswin7.dll stdcall';
procedure iswin7_free;
external '[email protected]:iswin7.dll stdcall';
procedure InitializeWizard();
begin
iswin7_add_button(WizardForm.BackButton.Handle);
iswin7_add_button(WizardForm.NextButton.Handle);
iswin7_add_button(WizardForm.CancelButton.Handle);
iswin7_add_glass(WizardForm.Handle, 0, 0, 0, ScaleY(47), True);
end;
procedure DeinitializeSetup();
begin
iswin7_free;
end;
Имейте в виду, что iswin7.dll
не является официальным.
Спасибо! Это было именно то, что я хотел, но я добавил некоторый брендинг-текст в нижней части, теперь его невидимый. Вот мой код: http://pastebin.com/CPXZFu9j Итак, любой способ сделать его видимым снова? –
@ the_Ma5TeR - не совсем с Aero, так как это будет выглядеть довольно уродливо. Текстовый фон не будет прозрачным или текст будет выглядеть плохо. Однако было бы неплохо выглядеть, если бы вы создали новую кнопку с вашим «брендинговым текстом» и задали нестандартный размер и положение (кнопка может быть либо «Включена» (отображается MsgBox, например, с полной информацией), либо может быть отключена). – RobeN
неважно, спасибо в любом случае :) –