Update Radio Button Demoは、データ テーブルを最新の状態に保つのに最適なサンプルです。このクロスプラットフォーム デモアプリは、Live Bindingを使用して、ラジオボタンが変更されるたびにメモリ内データ テーブルを自動的に更新します。Android、iOS、macOS、Windows、Linux をサポートしているため、どのプラットフォームでも優れた外観と操作性を備えた単一コードベースアプリを構築できます。
フルクロスプラットフォームのラジオボタン データバインディングのサンプルコードをGithubからダウンロード
このデモは、カメラデモ、絵文字デモ、ペイントデモなど、100以上のクロスプラットフォームデモの一部です。
目次
ソフトウェア開発におけるラジオボタンコントロール
A radio button is a type of graphical user interface (GUI) element that allows the user to choose one option from a group of mutually exclusive options. The radio button control consists of a round button that can be selected or deselected. When the user selects an option, the button becomes “filled” or “checked.” Radio buttons are typically used when there are a limited number of choices to be made, such as choosing a gender or selecting a answer to a yes-or-no question. In software development, radio buttons are often used in preference over other types of GUI elements, such as checkboxes, because they take up less screen space and can be easier for the user to understand.
画面ショット
データバインド ラジオボタン デモのソースコード
|
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 75 76 77 78 79 |
unit Unit1; interface uses System.SysUtils, System.Types, System.UITypes, System.クラス, System.Variants, FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FireDAC.Stan.Intf, FireDAC.Stan.Option, FireDAC.Stan.Param, FireDAC.Stan.Error, FireDAC.DatS, FireDAC.Phys.Intf, FireDAC.DApt.Intf, FireDAC.Stan.StorageBin, Data.Bind.EngExt, Fmx.Bind.DBEngExt, System.Rtti, System.Bindings.Outputs, Fmx.Bind.Editors, FMX.StdCtrls, FMX.Layouts, Data.Bind.Components, Data.Bind.DBScope, Data.DB, FireDAC.Comp.DataSet, FireDAC.Comp.Client, FMX.Effects, FMX.Controls.Presentation; type TForm1 = class(TForm) MaterialOxfordBlueSB: TStyleBook; ToolBar1: TToolBar; ShadowEffect4: TShadowEffect; Label1: TLabel; Label2: TLabel; <strong> FDMemTable1: TFDMemTable; BindSourceDB1: TBindSourceDB; BindingsList1: TBindingsList; LinkPropertyToFieldText: TLinkPropertyToField; </strong> Layout1: TLayout;<strong> RadioButton1: TRadioButton; RadioButton2: TRadioButton; RadioButton3: TRadioButton; LinkPropertyToFieldIsChecked: TLinkPropertyToField; LinkPropertyToFieldIsChecked2: TLinkPropertyToField; LinkPropertyToFieldIsChecked3: TLinkPropertyToField; procedure RadioButton1Click(Sender: TObject);</strong> private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.fmx} <strong>procedure TForm1.RadioButton1Click(Sender: TObject); begin if Sender=RadioButton1 then begin if ない TRadioButton(Sender).IsChecked then begin FDMemTable1.Edit; FDMemTable1.FieldByName('Value').AsString := 'Delphi'; FDMemTable1.Post; end; end else if Sender=RadioButton2 then begin if ない TRadioButton(Sender).IsChecked then begin FDMemTable1.Edit; FDMemTable1.FieldByName('Value').AsString := 'Is'; FDMemTable1.Post; end; end else if Sender=RadioButton3 then begin if ない TRadioButton(Sender).IsChecked then begin FDMemTable1.Edit; FDMemTable1.FieldByName('Value').AsString := 'Awesome'; FDMemTable1.Post; end; end; end;</strong> end. |
Formコンポーネントのデータバインディング オブジェクトの設定
|
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 |
object BindSourceDB1: TBindSourceDB DataSet = FDMemTable1 ScopeMappings = <> Left = 144 Top = 224 end object BindingsList1: TBindingsList Methods = <> OutputConverters = <> Left = 20 Top = 5 object LinkPropertyToFieldText: TLinkPropertyToField Category = 'Quick Bindings' DataSource = BindSourceDB1 FieldName = 'Value' Component = Label2 ComponentProperty = 'Text' end object LinkPropertyToFieldIsChecked: TLinkPropertyToField Category = 'Quick Bindings' DataSource = BindSourceDB1 FieldName = 'Value' Component = RadioButton1 <strong> CustomFormat = 'IfThen(ToStr(%s)="Delphi",True, False)'</strong> ComponentProperty = 'IsChecked' end object LinkPropertyToFieldIsChecked2: TLinkPropertyToField Category = 'Quick Bindings' DataSource = BindSourceDB1 FieldName = 'Value' Component = RadioButton2 <strong> CustomFormat = 'IfThen(ToStr(%s)="Is",True, False)'</strong> ComponentProperty = 'IsChecked' end object LinkPropertyToFieldIsChecked3: TLinkPropertyToField Category = 'Quick Bindings' DataSource = BindSourceDB1 FieldName = 'Value' Component = RadioButton3 <strong> CustomFormat = 'IfThen(ToStr(%s)="Awesome",True, False)'</strong> ComponentProperty = 'IsChecked' end end |
What does the data bindings through LiveBindings look like?
クロスプラットフォームアプリのプログラミング手法を学ぶには
今すぐ Coding Boot Camp 2022に登録してください。ゲーム、JavaScript、Web、Python、SQL、データベース、iOS、MacOS、Android、モバイル、Linux、Windows、デスクトップ、サーバー、Arduinoなど、プログラミングに関するさまざまなトピックを学ぶことができます。
