Schwieriger Titel, hoffentlich leichte Frage: Wie finde ich bei einem TMulitView, das als Mode := NavigationPane hat, heraus, ob es gerade zusammengeschoben ist, oder eben erweitert? Anbei zwei Bilder, was ich meine.

Sherlock

IsShowed heisst die Methode... meine Güte, war das schwer zu finden.

Sherlock

markieren

Delphi-Quellcode:

procedure TForm3.Button4Click(Sender: TObject);
var
   isOpened: Boolean;
begin
   isOpened := TPresentationState.Opened in MultiView1.Presenter.State;
   if isOpened then Caption := 'is opened' else Caption := 'is closed';
end;

Edit:

Du warst schneller. IsShowed, wtf. IsShown wenn schon.

Oha, über den Presenter abgefragt. Und wenn man in die Eingeweide (FMX.MultiView) blickt so findet man:

markieren

Delphi-Quellcode:

function TCustomMultiView.IsShowed: Boolean;
begin
  Result := HasPresenter and (TPresentationState.Opened in Presenter.State);
end;

Sherlock