Do you want to add some pizzazz to your application? Check out our Footer Buttons Demo! This handy cross-platform tool can show you how to create 3 buttons that stick or float at the bottom of your app. No matter what operating system you’re using – Android, iOS, macOS, Windows, or Linux – our Footer Buttons Demo will work seamlessly. And because it’s built in Delphi, you can be sure it’s a high-quality product. So why not give it a try today and see how easy and fun it is to use our Footer Buttons Demo!
Download the full cross-platform Footer Buttons Demo source code on Github.
このデモは、カメラデモ、絵文字デモ、ペイントデモなど、100以上のクロスプラットフォームデモの一部です。
目次
What is a footer button in software development?
A footer button is a user interface element that is typically placed at the bottom of a page or screen. Footer buttons can be used for various purposes, such as to save data or to submit a form. In software development, footer buttons are often used as a way to provide navigation between pages or screens. For example, a footer button may be used to return to the home screen or to open a menu. Footer buttons are also commonly used to display information, such as the current page number or the total number of pages.
画面ショット
デモのソースコード
|
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 |
unit Unit1; interface uses System.SysUtils, System.Types, System.UITypes, System.クラス, System.Variants, FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.Layouts, FMX.StdCtrls, FMX.Effects, FMX.Controls.Presentation; type TForm1 = class(TForm) MaterialOxfordBlueSB: TStyleBook; ToolBar1: TToolBar; ShadowEffect4: TShadowEffect; Label1: TLabel; <strong> Button1: TButton; Button2: TButton; Button3: TButton; Layout1: TLayout;</strong> Label2: TLabel; <strong> procedure FormResize(Sender: TObject);</strong> procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.fmx} procedure TForm1.Button1Click(Sender: TObject); begin Label2.Text := TButton(Sender).Text; end; <strong>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