Скачать: CL | DM;

Trial (work while IDE is running)   Найти похожие ветки 

← →
dimich1978 ©   (2002-12-04 13:44) [0]

Как с этим бороться и вообще можно ли?

---

← →
Дмитрий К.К. ©   (2002-12-04 13:47) [1]

Можно. Эмулируя среду.

---

← →
dimich1978 ©   (2002-12-04 13:51) [2]

Каким макаром? Мне это необходимо к компаненту ThemeEngine
вообщем ничего компанентик....все делает в ХР интерфейсе.

---

← →
Дмитрий К.К. ©   (2002-12-04 13:59) [3]

Запусти Delphi и WinSight. Посмотри, какие окна запускаются... и обмани компонентик ;)

---

← →
iZEN ©   (2002-12-04 15:07) [4]

1) Купить компонент;
2) Не покупать компонент и не использовать;
3) Написать свой такой же компонент.
Это честнее и правдивее.

---

← →
Дмитрий К.К. ©   (2002-12-04 15:11) [5]

> iZEN © (04.12.02 15:07)
> 1) Купить компонент;
> 2) Не покупать компонент и не использовать;
> 3) Написать свой такой же компонент.
> Это честнее и правдивее.


На эту тему УЖЕ было сказано много и сломано немало копий.

---

← →
avr555 ©   (2002-12-04 16:23) [6]

Есть бесплатный аналог.
По моему его даже включили в Delphi 7

http://www.delphi-gems.com/ThemeManager.php

---

← →
dimich1978 ©   (2002-12-04 16:40) [7]

Да компанент ThemeEngine неплохо сработан. И вся фишка в том что работает то он постоянно, а вот то что это версия ДЕМО выдает окошко...ну понятно распространять прогу вот с таким окном, как то не интересно.
Да и еще думаю смотрит инсталлирована или нет Delphi.

avr555>Thann`s поюзаем эти компаненты

---

← →
avr555 ©   (2002-12-04 16:44) [8]

Я сам не пробовал, но когда-то видел такое решение:


procedure IDEFake;
var wClass:TWndClass;
function WindowProc(hWnd,Msg,wParam,lParam:Longint):Longint; stdcall;
begin
Result:=DefWindowProc(hWnd,Msg,wParam,lParam);
end;
begin
with wClass do
begin
Style:=CS_PARENTDC;lpfnWndProc:=@WindowProc;hInstance:=hInst(0);
lpszClassName:= "TAlignPalette"; end;
RegisterClass(wClass);
CreateWindow("TAlignPalette","AlignPalette",WS_minimize,10,10,400,300,0,0,hInst(0),nil);
with wClass do
begin
Style:=CS_PARENTDC;lpfnWndProc:=@WindowProc;hInstance:=hInst(0);
lpszClassName:= "TAppBuilder"; end;
RegisterClass(wClass);
CreateWindow("TAppBuilder","AppBuilder",WS_minimize,10,10,400,300,0,0,hInst(0),nil);
Application.Title := "Delphi 5";
End;

---

← →
Игорь Шевченко ©   (2002-12-04 17:17) [9]

Не занимайтесь ерудной. Компоненты, выдающие такие окна надо ПОКУПАТЬ.

---

← →
Torry   (2002-12-04 18:18) [10]

Покупать, тем более, что можно связаться с разработчиками и попробовать договориться о скидках для России. Авторы - наши ребята. Или: "Мы, русские, друг друга не обманываем!"? :-)

---

← →
Кулюкин Олег ©   (2002-12-05 10:13) [11]

2 Torry (04.12.02 18:18)
> Или: "Мы, русские, друг друга не обманываем!"? :-)
"Мы честно воруем" :((((((((((

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.031 c