Entwickler-Ecke

Grafische Benutzeroberflächen (VCL & FireMonkey) - Eigenes Event hinzufügen


Delete - Mi 20.05.15 12:23
Titel: Eigenes Event hinzufügen
- Nachträglich durch die Entwickler-Ecke gelöscht -


Nersgatt - Mi 20.05.15 14:22

Du müsstest eigentlich nur noch im OnClick des CloseButtons reagieren.

Irgendwie so (aus dem Kopf getippt):


Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
var 
  CanClose : Boolean;
begin
  CanClose := True;
  if Assigned(FOnCloseTab) then
    FOnCloseTab(Self, TabIndex, CanClose);

  if CanClose then
  begin
     {Tab Page schließen}
  end;

end;


Edit: Die Property würde ich in den Published-Bereich verschieben, damit man sie im Objektinspektor benutzen kann.


Delete - Do 21.05.15 01:24

- Nachträglich durch die Entwickler-Ecke gelöscht -