Создаю формы динамически

← →
NoName123 (2002-11-28 11:57) [0]

Всем привет!

сабж следующим образом:

procedure TfrmMain.DoShowTalk(S: String);
var
f:TForm;
fr:TframeTalk;
begin
f:=TForm.Create(Application);
f.Name:="frm"+S;
fr:=TframeTalk.Create(f);
fr.Parent:=f;
f.OnClose:=DoFreeTalk;
f.OnDestroy:=DoNilTalk;
f.Show;
end;

Как сделать чтоб они появлялись на TaskBar"e (как у аськи)?
Главная форма - SDI
если можно: "на пальцах" обьясните..

СПАСИБО!

← →
TaskBar (2002-11-28 12:20) [1]

SetWindowLong(f.Handle, GWL_EXSTYLE,
GetWindowLong(f.Handle, GWL_EXSTYLE) or WS_EX_APPWINDOW);

← →
NoName123 (2002-11-28 14:12) [2]

Спасибо!

← →
dinn (2002-11-28 17:18) [3]

А вот можно ли, чтобы созданные таким образом формы отображались в диспетчере задач как отдельные задачи и было доступно переключение между ними по Alt-Tab?

← →
NoName123 (2002-11-29 09:13) [4]

Именно так и происходит

← →
dinn (2002-11-29 11:51) [5]

Да вроде не так. Вот такой код:

var
f:TForm;
begin
f:=TForm.Create(Nil);
f.Name:="qqq";
SetWindowLong(f.Handle, GWL_EXSTYLE,
GetWindowLong(f.Handle, GWL_EXSTYLE) or WS_EX_APPWINDOW);
f.Show;

дает отдельную задачу на таскбаре, но не в списке задач.
Может, что-не так делаю?

← →
NoName123 (2002-11-29 12:26) [6]

так в списке задач отражаются вроде только задачи.. и формы тут не причем (имхо).
а по Alt-Tab они переключаются..

Создаю формы динамически Найти похожие ветки