Class TForm2 (unit Immetti) |
Inherits from
TForm
procedure Copy1Click(Sender:TObject);
procedure Cut1Click(Sender:TObject);
I created this prog : do You mind if I remember it to You as soon as I can ?
procedure Edit1Click(Sender:TObject);
procedure EsciClick(Sender:TObject);
procedure Form2KeyDown(Sender:TObject; var Key:Word; Shift:TShiftState);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure FormDragDrop(Sender,Source:TObject; X,Y:Integer);
procedure FormDragOver(Sender,Source:TObject; X,Y:Integer;
State:TDragState; var Accept:Boolean);
procedure FormShow(Sender:TObject);
procedure LabelDragDrop(Sender,Source:TObject; X,Y:Integer);
Find the position on the board
procedure LabelDragOver(Sender,Source:TObject; X,Y:Integer;
State:TDragState; var Accept:Boolean);
procedure OkClick(Sender:TObject);
procedure Paste1Click(Sender:TObject);
procedure Show1Click(Sender:TObject);
If You have canceled all Your previous work there is nothing more to Cancel.
procedure UndoClick(Sender:TObject);
Every time please clear everything
Copy1 : TMenuItem;
Cut1 : TMenuItem;
Edit1 : TMenuItem;
Esci : TSpeedButton;
Label0 : TLabel3DBorder;
Label1 : TLabel3DBorder;
Label10 : TLabel3DBorder;
Label100 : TLabel3DBorder;
Label11 : TLabel3DBorder;
Label12 : TLabel3DBorder;
Label13 : TLabel3DBorder;
Label14 : TLabel3DBorder;
Label15 : TLabel3DBorder;
Label16 : TLabel3DBorder;
Label17 : TLabel3DBorder;
Label18 : TLabel3DBorder;
Label19 : TLabel3DBorder;
Label2 : TLabel3DBorder;
Label20 : TLabel3DBorder;
Label21 : TLabel3DBorder;
Label22 : TLabel3DBorder;
Label23 : TLabel3DBorder;
Label24 : TLabel3DBorder;
Label3 : TLabel3DBorder;
Label3D1 : TLabel3D;
Label4 : TLabel3DBorder;
Label5 : TLabel3DBorder;
Label6 : TLabel3DBorder;
Label7 : TLabel3DBorder;
Label8 : TLabel3DBorder;
Label9 : TLabel3DBorder;
MainMenu1 : TMainMenu;
Nullo : TMenuItem;
OK : TSpeedButton;
Panel3 : TPanel;
Paste1 : TMenuItem;
Show1 : TMenuItem;
Undo : TSpeedButton;
procedure Copy1Click(Sender:TObject);
procedure Cut1Click(Sender:TObject);
I created this prog : do You mind if I remember it to You as soon as I can ?
procedure Edit1Click(Sender:TObject);
procedure EsciClick(Sender:TObject);
procedure Form2KeyDown(Sender:TObject; var Key:Word; Shift:TShiftState);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure FormDragDrop(Sender,Source:TObject; X,Y:Integer);
procedure FormDragOver(Sender,Source:TObject; X,Y:Integer;
State:TDragState; var Accept:Boolean);
procedure FormShow(Sender:TObject);
procedure LabelDragDrop(Sender,Source:TObject; X,Y:Integer);
Find the position on the board
procedure LabelDragOver(Sender,Source:TObject; X,Y:Integer;
State:TDragState; var Accept:Boolean);
procedure OkClick(Sender:TObject);
procedure Paste1Click(Sender:TObject);
procedure Show1Click(Sender:TObject);
If You have canceled all Your previous work there is nothing more to Cancel.
procedure UndoClick(Sender:TObject);
Every time please clear everything
Copy1 : TMenuItem;
Cut1 : TMenuItem;
Edit1 : TMenuItem;
Esci : TSpeedButton;
Label0 : TLabel3DBorder;
Label1 : TLabel3DBorder;
Label10 : TLabel3DBorder;
Label100 : TLabel3DBorder;
Label11 : TLabel3DBorder;
Label12 : TLabel3DBorder;
Label13 : TLabel3DBorder;
Label14 : TLabel3DBorder;
Label15 : TLabel3DBorder;
Label16 : TLabel3DBorder;
Label17 : TLabel3DBorder;
Label18 : TLabel3DBorder;
Label19 : TLabel3DBorder;
Label2 : TLabel3DBorder;
Label20 : TLabel3DBorder;
Label21 : TLabel3DBorder;
Label22 : TLabel3DBorder;
Label23 : TLabel3DBorder;
Label24 : TLabel3DBorder;
Label3 : TLabel3DBorder;
Label3D1 : TLabel3D;
Label4 : TLabel3DBorder;
Label5 : TLabel3DBorder;
Label6 : TLabel3DBorder;
Label7 : TLabel3DBorder;
Label8 : TLabel3DBorder;
Label9 : TLabel3DBorder;
MainMenu1 : TMainMenu;
Nullo : TMenuItem;
OK : TSpeedButton;
Panel3 : TPanel;
Paste1 : TMenuItem;
Show1 : TMenuItem;
Undo : TSpeedButton;