SA-MP/exgui/About.pas

55 lines
1005 B
ObjectPascal
Raw Normal View History

2023-11-07 17:10:47 +08:00
unit About;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
2023-11-07 23:44:02 +08:00
TfmAbout = class(TForm)
2023-12-02 19:57:04 +08:00
procedure FormShow(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject);
procedure FormClick(Sender: TObject);
2023-11-07 17:10:47 +08:00
private
{ Private declarations }
public
{ Public declarations }
end;
var
2023-11-07 23:44:02 +08:00
fmAbout: TfmAbout;
2023-11-07 17:10:47 +08:00
implementation
{$R *.dfm}
2023-12-02 19:57:04 +08:00
procedure TfmAbout.FormShow(Sender: TObject);
begin
// TODO: TfmAbout.FormShow
end;
procedure TfmAbout.FormClose(Sender: TObject; var Action: TCloseAction);
begin
// TODO: TfmAbout.FormClose
end;
procedure TfmAbout.FormCreate(Sender: TObject);
begin
// TODO: TfmAbout.FormCreate
end;
procedure TfmAbout.FormDestroy(Sender: TObject);
begin
// TODO: TfmAbout.FormDestroy
end;
procedure TfmAbout.FormClick(Sender: TObject);
begin
// TODO: TfmAbout.FormClick
end;
2023-11-07 17:10:47 +08:00
end.