Uaktywnianie okna MDI za pomocą TTabSheet

0

Witam :) Mam prosty problem, który z poczatku myślałem że będzie prosty :) Otóż mam aplikację MDI, w której chciałbym mieć PageControl (i na nim TTabSheety, które określałyby poszczególne okna MDI - ale to nie problem). Chodzi mi tylko o to, co zrobić, że jak kliknę powiedzmy na TabSheet numer 3 to uaktywni mi się okno MDI o numerze 3 (czyli czwarte).
Próbowałem m.in. takim sposobem:

MDIChildren[3].Show;

ale nie działa, jak nalezy :(

Hm... Wie ktoś jak rozwiązać ten problemik?
Z góry thx.

0

nie jestem pewny, czy tak to ma wyglądać :) ale jeśli te TabSheet to mają być jakby linki do okien MDIChild, żeby można było łatwo między nimi nawigować to ściągnij sobie Elegant MDI albo MiTeC MDI Tab Control

Ten pierwszy wygląda tak (to tylko jeden ze styli):
user image

0

Hmm... Elegant MDI mam, jednak i tak mam lepszy - ten co jest do TBX dołączony :)
BTW: chcę nie tyle zwykły PageControl, a ten z JVCL sobie postawić (ten co ma Delphi > 2005) :)

No ale dobra, chodzi mi tylko o sam sposób - jak zrobić np. że jak kliknę na Button, to zaaktywuje mi się jakiś ustalony przeze mnie potomek?

0

to jak dodajesz zakładkę do pagecontrol wpisuj np. do tag handle okna a potem BringWindowsToFront

0

Można też w zdarzeniu OnChange komponentu TPageControl dać coś takiego:

for(int i = MDIChildCount-1; i >= 0; i--)
    if(MDIChildren[i]->Name == "Noname"+IntToStr(PageControl1->TabIndex))
      MDIChildren[i]->Show();

;P

1 użytkowników online, w tym zalogowanych: 0, gości: 1