Upload files to "/"
This commit is contained in:
57
impostazioni.pas
Normal file
57
impostazioni.pas
Normal file
@@ -0,0 +1,57 @@
|
||||
unit impostazioni;
|
||||
|
||||
{$mode ObjFPC}{$H+}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
Classes, SysUtils, Forms, Controls, Graphics, Dialogs, ExtCtrls, Spin,
|
||||
StdCtrls, ButtonPanel, LazNumEdit;
|
||||
|
||||
type
|
||||
|
||||
{ TSettings }
|
||||
|
||||
TSettings = class(TForm)
|
||||
ButtonPanel1: TButtonPanel;
|
||||
CheckBox1: TCheckBox;
|
||||
ComboBox1: TComboBox;
|
||||
FloatSpinEdit1: TFloatSpinEdit;
|
||||
FloatSpinEdit2: TFloatSpinEdit;
|
||||
GroupBox1: TGroupBox;
|
||||
GroupBox2: TGroupBox;
|
||||
Label1: TLabel;
|
||||
Label2: TLabel;
|
||||
Label3: TLabel;
|
||||
Label4: TLabel;
|
||||
Label5: TLabel;
|
||||
SpinEdit1: TSpinEdit;
|
||||
procedure FormCreate(Sender: TObject);
|
||||
procedure GroupBox2Click(Sender: TObject);
|
||||
private
|
||||
|
||||
public
|
||||
|
||||
end;
|
||||
|
||||
var
|
||||
Settings: TSettings;
|
||||
|
||||
implementation
|
||||
|
||||
{$R *.lfm}
|
||||
|
||||
{ TSettings }
|
||||
|
||||
procedure TSettings.FormCreate(Sender: TObject);
|
||||
begin
|
||||
|
||||
end;
|
||||
|
||||
procedure TSettings.GroupBox2Click(Sender: TObject);
|
||||
begin
|
||||
|
||||
end;
|
||||
|
||||
end.
|
||||
|
||||
Reference in New Issue
Block a user