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

Окна программы   Найти похожие ветки 

← →
killer ©   (2003-06-04 21:25) [0]

Как вызвать окно(еще одну форму) так, чтобы текущая форма была тоже активной, т.е. Были две формы и обе активные...

---

← →
Neft ©   (2003-06-04 21:36) [1]

ты прикалываешся походу?

---

← →
killer ©   (2003-06-04 21:42) [2]

почему? нельзя так?

---

← →
Николай Быков ©   (2003-06-04 22:07) [3]

нельзя.

---

← →
TCrash ©   (2003-06-04 23:08) [4]

В FotoShop можно, тогда почему нельзя. нелогично. Мне тоже интересно.
Хотя там окна имеют нестандартный вид(я иммею в виду разные панели инструментов, типа "Кисти", "Слои" и т.д.). Может они както отрисовываются по хитрому.

---

← →
Suntechnic ©   (2003-06-05 06:23) [5]

Это где ты у FotoShop обнаружил два "активных" окна? Ты случайно не путаешь "активность" с "модальностью"?

---

← →
Song ©   (2003-06-05 08:40) [6]

Form1.Show
Form2.Show

---

← →
Song ©   (2003-06-05 09:16) [7]

>>Ты случайно не путаешь "активность" с "модальностью"?
Тоже ещё тот прикол :)

---

← →
Palladin ©   (2003-06-05 09:20) [8]

у фотошопа панели инструментов, и то что у них синий бордюр наверху, говорит только о том что он синий...

---

← →
Спрашивающий   (2003-06-05 09:38) [9]

Анекдот. А ты представь назначение двойной активности. Например два не модальных окна тоже с точки зрения активны в любой момент явлются активными(нужный для пользователя). А твой вариант мне напоминает ситуацию когда одним глазом смотришь в одно окно другим в другое, левая рука работает с левым окном а правая с правым. Да и то даже для этой ситуации два немодальных окна подойдут.

---

← →
Faun ©   (2003-06-05 13:29) [10]

По всей видимости, killer хочет что-то вроде этого:


type
TForm1 = class(TForm)
....
protected
procedure CreateParams(var Params: TCreateParams); override;

end;

implementation

procedure TForm1.CreateParams(var Params: TCreateParams);
begin
inherited CreateParams(Params);
Params.ExStyle := Params.ExStyle or WS_Ex_AppWindow or WS_EX_TOPMOST;
end;


---

← →
Um   (2003-06-06 08:03) [11]

Всем привет!
procedure wm_ncactivate(var message:tmessage);message wm_ncactivate;

procedure TForm1.wm_ncactivate(var message: tmessage);
begin
message.WParam:=1;
inherited;
end;

Но,получать клавиатурные сообщения будет только действительно активное окно

---

← →
Tano ©   (2003-06-07 02:06) [12]

Активной называют форму, имеющую фокус ввода.
Ты определись: либо два окна с синими заголовками надо /рисуй формы сам/, либо, чтобы печатать одновременно в обоих (ну про мышу молчу :)/я бы транслировал кнопки от одной формы другой/.

---

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

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



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