Custom Footer Tabsデモは、タブ ボタンをカスタマイズするのに最適な方法です。このデモでは、カスタム アイコンを追加し、TTabControl の現在のページを簡単に変更できます。このクロスプラットフォーム アプリケーションは、単一コードベースと単一UIでDelphiによって構築されており、Android、iOS、macOS、Windows、Linuxに対応してます。ベテランの開発者でも初心者でも、Custom Footer Tabsはニーズに最適なソリューションです。
フルクロスプラットフォームのフッタータブデモのソースコードをGithubからダウンロード
このデモは、カメラデモ、絵文字デモ、ペイントデモなど、100以上のクロスプラットフォームデモの一部です。
目次
ソフトウェア開発におけるタブコントロールとは
タブ コントロールは、ユーザーがそれぞれ独自のコンテンツを含むさまざまなタブを切り替えることができるグラフィカル ユーザー インターフェイス要素です。タブ コントロールは、Web ブラウザーやテキスト エディターで一般的に使用され、情報を整理するのに非常に役立ちます。タブ コントロールでは、各タブは異なるドキュメントまたはページを表し、ユーザーはタブをクリックしてそれらを切り替えることができます。タブ コントロールは情報の整理に非常に役立ちますが、タブが多すぎると適切なタブを見つけるのが難しくなる場合もあります。この問題を回避するには、タブ コントロールを慎重に使用し、ユーザー エクスペリエンスを本当に向上させる場合にのみ使用する必要があります。
画面ショット
サンプルアプリのソースコード
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 |
unit Unit1; interface uses System.SysUtils, System.Types, System.UITypes, System.クラス, System.Variants, FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.ImgList, FMX.TabControl, FMX.StdCtrls, FMX.Layouts, FMX.Effects, FMX.Controls.Presentation, System.ImageList, Math; type TForm1 = class(TForm) MaterialOxfordBlueSB: TStyleBook; ToolBar1: TToolBar; ShadowEffect4: TShadowEffect; Label1: TLabel; Layout1: TLayout; <strong> Button1: TSpeedButton; Button2: TSpeedButton; Button3: TSpeedButton; TabControl1: TTabControl; TabItem1: TTabItem; TabItem2: TTabItem; TabItem3: TTabItem;</strong> Glyph1: TGlyph; Glyph2: TGlyph; Glyph3: TGlyph; Glyph4: TGlyph; Glyph5: TGlyph; Glyph6: TGlyph; Label2: TLabel; Label3: TLabel; Label4: TLabel; ImageList1: TImageList; <strong> procedure FormResize(Sender: TObject); procedure Button1Click(Sender: TObject); procedure Button2Click(Sender: TObject); procedure Button3Click(Sender: TObject);</strong> private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.fmx} <strong>procedure TForm1.Button1Click(Sender: TObject); begin TabControl1.GotoVisibleTab(0); end; procedure TForm1.Button2Click(Sender: TObject); begin TabControl1.GotoVisibleTab(1); end; procedure TForm1.Button3Click(Sender: TObject); begin TabControl1.GotoVisibleTab(2); end; procedure TForm1.FormResize(Sender: TObject); begin Button1.Width := Trunc(Layout1.Width/3); Button2.Width := Button1.Width; Button3.Width := Button1.Width; end;</strong> end. |
クロスプラットフォームアプリのプログラミング手法を学ぶには
今すぐ Coding Boot Camp 2022に登録してください。ゲーム、JavaScript、Web、Python、SQL、データベース、iOS、MacOS、Android、モバイル、Linux、Windows、デスクトップ、サーバー、Arduinoなど、プログラミングに関するさまざまなトピックを学ぶことができます。
Design. Code. Compile. Deploy.
トライアル版をダウンロードいますぐアップグレード！
Delphi Community Edition（無料）C++Builder Community Edition（無料）
Japanese 
English 
French 
Portuguese 
German