Prüfen, ob ein Tab (Frame) gerade offen ist

[Freyr77]

Hallo.

Folgendes Problem - ich habe einen Frame, auf dem 3 "Tools" anwählbar sind(Anwendungen liegen auf Panels).

In dem einen Tool wird mit BalloonHints und einem IconBar-Event gearbeitet. Das Programm soll aber die Prüfungen, die zum balloonHint führen nur machen, wenn auch der Tab aktiv ist.

Wie prüfe ich, ob der Tab gerade offen ist?

Danke.

[Aviator]

Hallo Freyr77,

das ist eine sehr dürftige Fragestellung. Liegen die Panels wiederum auf Tabs in einem TabSheet oder werden die nur (In)Visible geschaltet?

Bei einem PageControl gibt es die Eigenschaft ActivePage. Wenn nur der VisibleStatus geändert wird, dann musst du eben den Status der 3 Panels abfragen.

[nahpets]

Ist es ein Tab auf 'nem TPageControl?

Dann frag' vor der Prüfung ab, ob vom PageControl der ActivePageIndex = 2 ist.

Oder:

Wenn ob vom PageControl ActivePage = "Name des Tab 3 ist".

Delphi-Quellcode:

...
  pc : TPageControl;
  ts3 : TTabSheet;
...
  if pc.ActivePageIndex = 2 then begin
    // Prüfungen machen.
  end;
...
// Alternative:
  if pc.ActivePage = ts3 then begin
    // Prüfungen machen.
  end;