Teşekkürler
Kod: Tümünü seç
unit ILAN_HARITA_KONUM1;
interface
uses
System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,
FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.StdCtrls,
FMX.Controls.Presentation, FMX.Maps, System.Sensors, System.Sensors.Components,
FMX.Edit, FMX.Objects, FMX.Styles.Objects, FMX.WebBrowser;
type
TILAN_HARITA_KONUM = class(TForm)
Panel2: TPanel;
Panel12: TPanel;
SpeedButton2: TSpeedButton;
ImagePORTFOYLERccc: TImage;
Image5: TImage;
WebBrowser1: TWebBrowser;
procedure SpeedButton2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
ILAN_HARITA_KONUM: TILAN_HARITA_KONUM;
implementation
{$R *.fmx}
procedure TILAN_HARITA_KONUM.SpeedButton2Click(Sender: TObject);
begin
webBrowser1.Navigate('about:blank') ;
close;
end;
end.