Форум: "Прочее";
Текущий архив: 2007.01.07;
Скачать: [xml.tar.bz2];
ВнизVista Manifest и Vista Style Components Найти похожие ветки
← →
TIF © (2006-12-14 15:51) [0]Всем привет. Кто считает меня сумасшедшим (из-за названия темы) - пусть считают. Не жалко. Но тема актуальная. Пока ещё :-)
А всё-таки, где достать такой компонент? Или что-то в таком роде? Есть ссылка
http://www.installationexcellence.com/articles/VistaWithDelphi/Index.html
тут описано, как подключить всё это, если у тебя стоит Vista. А если ХР? Или 2000? Или вообще 98? Поэтому компоненты в стиле Vista всё-таки лучше. Подскажите, где достать, плз
← →
Eraser © (2006-12-14 16:02) [1]> [0] TIF © (14.12.06 15:51)
при чем тут манифест?
доп. манифест нужно будет делать, если, к примеру, понадобится при старте приложения запросить админские права.
← →
Игорь Шевченко © (2006-12-14 16:03) [2]Автор ты читать умеешь ?
← →
TIF © (2006-12-14 16:04) [3]
> при чем тут манифест?
А про XP Manifest ты забыл?
← →
Eraser © (2006-12-14 16:12) [4]> [3] TIF © (14.12.06 16:04)
см. [2].With Windows Vista, as long as our applications were developed to work with Windows XP, we will automatically benefit from our applications matching the new visual style found in Windows Vista.
← →
TIF © (2006-12-14 16:17) [5]а как такой дизайн-то сделать??????
← →
Игорь Шевченко © (2006-12-14 16:26) [6]
> а как такой дизайн-то сделать??????
Висту свою написать
← →
TIF © (2006-12-14 16:29) [7]
> Висту свою написать
плз EXEмпл! В студию!
А всё-таки, как? Винчестером об косяк?
← →
Сало © (2006-12-14 16:33) [8]
unit VistaForms;
interface
uses
Windows, Messages, SysUtils, Classes, Controls, StdCtrls, Forms;
type
TVistaForm = class(TForm)
protected
procedure CreateParams(var Params: TCreateParams); override;
procedure WMSyscommand(var Message: TWmSysCommand);
message WM_SYSCOMMAND;
public
constructor Create(AOwner: TComponent); override;
end;
implementation
procedure TVistaForm.CreateParams(var Params: TCreateParams);
begin
inherited CreateParams(Params);
Params.ExStyle := Params.ExStyle and not WS_EX_TOOLWINDOW or
WS_EX_APPWINDOW;
end;
procedure TVistaForm.WMSyscommand(var Message: TWmSysCommand);
begin
case (Message.CmdType and $FFF0) of
SC_MINIMIZE:
begin
ShowWindow(Handle, SW_MINIMIZE);
Message.Result := 0;
end;
SC_RESTORE:
begin
ShowWindow(Handle, SW_RESTORE);
Message.Result := 0;
end;
else
inherited;
end;
end;
constructor TVistaForm.Create(AOwner: TComponent);
begin
inherited Create(AOwner);
ShowWindow(Application.Handle, SW_HIDE);
SetWindowLong(Application.Handle, GWL_EXSTYLE,
GetWindowLong(Application.Handle, GWL_EXSTYLE) and not
WS_EX_APPWINDOW or WS_EX_TOOLWINDOW);
ShowWindow(Application.Handle, SW_SHOW);
end;
end.
← →
Игорь Шевченко © (2006-12-14 16:36) [9]TIF © (14.12.06 16:29) [7]
> А всё-таки, как?
Висту свою написать.
← →
@BraIN © (2006-12-14 16:41) [10]Автор, у тебя каша в голове.
1. Манифест нужен для того, чтобы элементы управления соответствовали стилю системы.
2. Используется, начиная с Windows XP, до этого не применялся.
3. Чтобы программа выглядела в Vista в соответствии со стилистикой системы манифеста для XP достаточно (они аналогичны за исключением блока trustInfo, сообщающего системе о привилегиях запуска).
4. Манифест не способствует обратной совместимости со старыми системами. Т.е его использование не поможет сделать в Windows 98 элементы управления «как в Vista». Для некоторых вещей даже ручная отрисовка будет неактуальна.
Сумбурно, но где-то так.
← →
DVM © (2006-12-14 16:44) [11]
> Подскажите, где достать, плз
http://www.tmssoftware.com/ тут есть кое-что. В частности, очень красивый ribbon bar (помесь меню и тулбаров как в офисе 2007).
← →
Anatoly Podgoretsky © (2006-12-14 18:52) [12]> TIF (14.12.2006 16:29:07) [7]
> плз EXEмпл! В студию!
Даже EXEмпл будет стоить пару миллиардов, а не то чтобы рабочая версия.
Страницы: 1 вся ветка
Форум: "Прочее";
Текущий архив: 2007.01.07;
Скачать: [xml.tar.bz2];
Память: 0.47 MB
Время: 0.01 c