| Class TIconedit (unit Iconsorc) |
TForm
| Constructors |
| Functions |
procedure Bmpsave2Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure Button3Click(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject);
procedure HintsonClick(Sender: TObject);
function Iconlister( szName: PANSICHAR ): BOOLEAN;
procedure Icosave2Click(Sender: TObject);
procedure ListBox1Click(Sender: TObject);
procedure ListBox1DrawItem(Control: TWinControl; Index: Integer;
Rect: TRect; State: TOwnerDrawState);
procedure ListBox2Click(Sender: TObject);
procedure ListBox2DrawItem(Control: TWinControl; Index: Integer;
Rect: TRect; State: TOwnerDrawState);
procedure PicksourceClick(Sender: TObject);
procedure PicktargetClick(Sender: TObject);
procedure UpdateClick(Sender: TObject);
procedure Updateerr(Errindex:Byte);file has no icons
| Properties |
| Events |
| Variables |
BalloonHint1 : TBalloonHint;
Bmpsave1 : TButton;
Bmpsave2 : TButton;
Button2 : TButton;
Button3 : TButton;
CopyOverride : TCheckBox;
GroupBox2 : TGroupBox;
Hintson : TCheckBox;
Iconind1 : TEdit;
Iconind2 : TEdit;
Icosave1 : TButton;
Icosave2 : TButton;
Image1 : TImage;
Label1 : TLabel;
Label10 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
Label4 : TLabel;
Label5 : TLabel;
Label6 : TLabel;
Label7 : TLabel;
Label8 : TLabel;
Label9 : TLabel;
List1Ind : TGroupBox;
ListBox1 : TListBox;
ListBox2 : TListBox;
ListBox3 : TListBox;
ListBox4 : TListBox;
Picksource : TButton;
Picktarget : TButton;
Sourcefile : TEdit;
Targetfile : TEdit;
Update : TButton;| Constructors |
| Functions |
procedure Bmpsave2Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure Button3Click(Sender: TObject);Label3.Caption:=IntToStr(Count)+' Icons in '+S;
procedure FormCreate(Sender: TObject);Ds.Canvas.Fillrect(r1);
procedure FormDestroy(Sender: TObject);Initialize vars for icon types
procedure HintsonClick(Sender: TObject);default extension
function Iconlister( szName: PANSICHAR ): BOOLEAN;
procedure Icosave2Click(Sender: TObject);Last bit of assistance
procedure ListBox1Click(Sender: TObject);
procedure ListBox1DrawItem(Control: TWinControl; Index: Integer;
Rect: TRect; State: TOwnerDrawState);
procedure ListBox2Click(Sender: TObject);
procedure ListBox2DrawItem(Control: TWinControl; Index: Integer;
Rect: TRect; State: TOwnerDrawState);Label8.Caption:=IntToStr(Count)+' Icons in '+S;
procedure PicksourceClick(Sender: TObject);
procedure PicktargetClick(Sender: TObject);
procedure UpdateClick(Sender: TObject);
procedure Updateerr(Errindex:Byte);Private declarations
file has no icons
| Properties |
| Events |
| Variables |
BalloonHint1 : TBalloonHint;
Bmpsave1 : TButton;
Bmpsave2 : TButton;
Button2 : TButton;
Button3 : TButton;
CopyOverride : TCheckBox;
GroupBox2 : TGroupBox;
Hintson : TCheckBox;
Iconind1 : TEdit;
Iconind2 : TEdit;
Icosave1 : TButton;
Icosave2 : TButton;
Image1 : TImage;
Label1 : TLabel;
Label10 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
Label4 : TLabel;
Label5 : TLabel;
Label6 : TLabel;
Label7 : TLabel;
Label8 : TLabel;
Label9 : TLabel;
List1Ind : TGroupBox;
ListBox1 : TListBox;
ListBox2 : TListBox;
ListBox3 : TListBox;
ListBox4 : TListBox;
Picksource : TButton;
Picktarget : TButton;
Sourcefile : TEdit;
Targetfile : TEdit;
Update : TButton;