TabBar

Language: Oxygene, Platform: Toffee, Category: UIKit
https://github.com/remobjects/ElementsSamples/tree/master/Oxygene/Toffee/UIKit/TabBar

• TabBar
  • References
    • CoreGraphics
    • Foundation
    • UIKit
    • rtl
    • libToffee
  • Source Files
    • AppDelegate.pas
    • Program.pas
    • RootViewController.pas
  • Other Files
    • Resources\301-alien-ship@2x.png
    • Resources\301-alien-ship.png
    • Resources\Info.plist
    • Resources\App Icons\App-29.png
    • Resources\App Icons\App-48.png
    • Resources\App Icons\App-57.png
    • Resources\App Icons\App-58.png
    • Resources\App Icons\App-72.png
    • Resources\App Icons\App-96.png
    • Resources\App Icons\App-114.png
    • Resources\App Icons\App-144.png
    • Resources\App Icons\App-512.png
    • Resources\App Icons\App-1024.png
    • Resources\Launch Images\Default.png
    • Resources\Launch Images\Default@2x.png
    • Resources\Launch Images\Default-568h@2x.png
    • Resources\Launch Images\Default-Portrait.png
    • Resources\Launch Images\Default-Portrait@2x.png
    • Resources\Launch Images\Default-Landscape.png
    • Resources\Launch Images\Default-Landscape@2x.png
    • RootViewController~ipad.xib
    • RootViewController~iphone.xib

RootViewController.pas

namespace TabBar;

interface

uses
  UIKit;

type
  [IBObject]
  RootViewController = public class(UIViewController, IUITabBarDelegate)
  private
    fSelectedTab: weak UITabBarItem;
  public
    method init: id; override;

    method viewDidLoad; override;
    method didReceiveMemoryWarning; override;

    {$REGION IUITabBarDelegate}
    method tabBar(aTabBar: UITabBar) didSelectItem(aItem: UITabBarItem);
    //method tabBar(aTabBar: UITabBar) willBeginCustomizingItems(aItem: NSArray);
    //method tabBar(aTabBar: UITabBar) willEndCustomizingItems(aItem: NSArray) changed(aChanged: Boolean);
    {$ENDREGION}

    [IBOutlet] property label: weak UILabel;
    [IBOutlet] property button: weak UIButton;
    [IBOutlet] property tabBar: weak UITabBar;
    [IBAction] method buttonClick(aSender: id);

  end;

implementation

method RootViewController.init: id;
begin
  self := inherited initWithNibName('RootViewController') bundle(nil);
  if assigned(self) then begin

    title := 'TabBar';

    // Custom initialization

  end;
  result := self;
end;

method RootViewController.viewDidLoad;
begin
  inherited viewDidLoad;

  label.text := 'Select a Tab';
  button.hidden := true;

  // Do any additional setup after loading the view.
end;

method RootViewController.didReceiveMemoryWarning;
begin
  inherited didReceiveMemoryWarning;

  // Dispose of any resources that can be recreated.
end;

method RootViewController.tabBar(aTabBar: UITabBar) didSelectItem(aItem: UITabBarItem);
begin
  NSLog('tabbar:%@ didSelectItem:%@', aTabBar, aItem);
  fSelectedTab := aItem;

  label.text := 'Selected tab '+tabBar.items.indexOfObject(aItem);
  button.hidden := false;
end;

method RootViewController.buttonClick(aSender: id);
begin
  if assigned(fSelectedTab) then
    fSelectedTab.badgeValue := coalesce((fSelectedTab.badgeValue:integerValue+1):stringValue, "1");
end;

end.