| Class TForm1 (unit Jpgunit1) |
TForm
| Constructors |
| Functions |
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure Button3Click(Sender: TObject);
procedure Button4Click(Sender: TObject);
procedure Button5Click(Sender: TObject);
procedure Button6Click(Sender: TObject);
procedure Delete1Click(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure ListBox1DblClick(Sender: TObject);
procedure ListBox1KeyPress(Sender: TObject; var Key: Char);
procedure N121Click(Sender: TObject);
procedure N141Click(Sender: TObject);
procedure N181Click(Sender: TObject);
procedure Normal1Click(Sender: TObject);
procedure Rename1Click(Sender: TObject);
procedure Saveas1Click(Sender: TObject);
procedure X161Click(Sender: TObject);
procedure X21Click(Sender: TObject);
procedure X41Click(Sender: TObject);| Properties |
| Events |
| Variables |
Button1 : TButton;
Button2 : TButton;
Button3 : TButton;
Button4 : TButton;
Button5 : TButton;
Button6 : TButton;
Delete1 : TMenuItem;
Image1 : TImage;
Label1 : TLabel;
ListBox1 : TListBox;
N121 : TMenuItem;
N141 : TMenuItem;
N181 : TMenuItem;
Normal1 : TMenuItem;
OpenDialog1 : TOpenDialog;
Panel1 : TPanel;
PopupMenu1 : TPopupMenu;
PopupMenu2 : TPopupMenu;
Rename1 : TMenuItem;
Saveas1 : TMenuItem;
SaveDialog1 : TSaveDialog;
ScrollBox1 : TScrollBox;
X161 : TMenuItem;
X21 : TMenuItem;
X41 : TMenuItem;| Constructors |
| Functions |
procedure Button1Click(Sender: TObject);freemem(p,80);
procedure Button2Click(Sender: TObject);
procedure Button3Click(Sender: TObject);
procedure Button4Click(Sender: TObject);
procedure Button5Click(Sender: TObject);
procedure Button6Click(Sender: TObject);
procedure Delete1Click(Sender: TObject);Delete the bitmap from hard drive and done!
procedure FormCreate(Sender: TObject);
procedure ListBox1DblClick(Sender: TObject);
procedure ListBox1KeyPress(Sender: TObject; var Key: Char);
procedure N121Click(Sender: TObject);
procedure N141Click(Sender: TObject);
procedure N181Click(Sender: TObject);
procedure Normal1Click(Sender: TObject);
procedure Rename1Click(Sender: TObject);
procedure Saveas1Click(Sender: TObject);
procedure X161Click(Sender: TObject);
procedure X21Click(Sender: TObject);
procedure X41Click(Sender: TObject);| Properties |
| Events |
| Variables |
Button1 : TButton;
Button2 : TButton;
Button3 : TButton;
Button4 : TButton;
Button5 : TButton;
Button6 : TButton;
Delete1 : TMenuItem;
Image1 : TImage;
Label1 : TLabel;
ListBox1 : TListBox;
N121 : TMenuItem;
N141 : TMenuItem;
N181 : TMenuItem;
Normal1 : TMenuItem;
OpenDialog1 : TOpenDialog;
Panel1 : TPanel;
PopupMenu1 : TPopupMenu;
PopupMenu2 : TPopupMenu;
Rename1 : TMenuItem;
Saveas1 : TMenuItem;
SaveDialog1 : TSaveDialog;
ScrollBox1 : TScrollBox;
X161 : TMenuItem;
X21 : TMenuItem;
X41 : TMenuItem;