- Katılım
- 2 Ara 2015
- Tepki puanı
- 343
Rating - 0%
Kendi sesli anlatımımdır
Gerekli Uygulamalar;
RAD Studio XE8
AVD MANAGER
Gerekli Uygulamalar;
RAD Studio XE8
AVD MANAGER
Kod:
unit ewqwqeqwe;[/B][/CENTER]
[B]
[CENTER]interface
uses
System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,
FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs,
FMX.Controls.Presentation, FMX.StdCtrls, FMX.Edit;
type
TForm5 = class(TForm)
Button1: TButton;
yazi2: TLabel;
yazi1: TEdit;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form5: TForm5;
implementation
{$R *.fmx}
{$R *.SmXhdpiPh.fmx ANDROID}
procedure TForm5.Button1Click(Sender: TObject);
begin
yazi2.Text := yazi1.Text;
end;
end.
Kod:
unit ewqwqeqwe;[/B][/CENTER]
[B]
[CENTER]interface
uses
System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,
FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs,
FMX.Controls.Presentation, FMX.StdCtrls, FMX.Edit;
type
TForm5 = class(TForm)
Button1: TButton;
yazi2: TLabel;
yazi1: TEdit;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form5: TForm5;
implementation
{$R *.fmx}
{$R *.SmXhdpiPh.fmx ANDROID}
procedure TForm5.Button1Click(Sender: TObject);
begin
showmessage('asdsasad');
end;
end.