+//! \83A\83C\83R\83\93\93Ç\82Ý\8d\9e\82Ý
+procedure TGikoForm.LoadIcon();
+const
+ ICONI6 = 'icon16.bmp';
+ ICON32 = 'icon32.bmp';
+ ICONSTAT = 'state_icon.bmp';
+ ICONMES = 'message_icon.bmp';
+ ICONADD = 'address_icon.bmp';
+ ICONITEM = 'item_icon.bmp';
+ ICONTOOL = 'hottoolbar_icon.bmp';
+begin
+ if FileExists(GikoSys.Setting.GetAppDir + ICONI6) then begin
+ ItemIcon16.Clear;
+ ItemIcon16.FileLoad(rtBitmap,
+ GikoSys.Setting.GetAppDir + ICONI6, clPurple);
+ end;
+ if FileExists(GikoSys.Setting.GetAppDir + ICON32) then begin
+ ItemIcon32.Clear;
+ ItemIcon32.FileLoad(rtBitmap,
+ GikoSys.Setting.GetAppDir + ICON32, clPurple);
+ end;
+ if FileExists(GikoSys.Setting.GetAppDir + ICONSTAT) then begin
+ StateIconImageList.Clear;
+ StateIconImageList.FileLoad(rtBitmap,
+ GikoSys.Setting.GetAppDir + ICONSTAT, clPurple);
+ end;
+ if FileExists(GikoSys.Setting.GetAppDir + ICONMES) then begin
+ MessageImageList.Clear;
+ MessageImageList.FileLoad(rtBitmap,
+ GikoSys.Setting.GetAppDir + ICONMES, clPurple);
+ end;
+ if FileExists(GikoSys.Setting.GetAppDir + ICONADD) then begin
+ AddressImageList.Clear;
+ AddressImageList.FileLoad(rtBitmap,
+ GikoSys.Setting.GetAppDir + ICONADD, clPurple);
+ end;
+ if FileExists(GikoSys.Setting.GetAppDir + ICONITEM) then begin
+ ItemImageList.Clear;
+ ItemImageList.FileLoad(rtBitmap,
+ GikoSys.Setting.GetAppDir + ICONITEM, clPurple);
+ end;
+ if FileExists(GikoSys.Setting.GetAppDir + ICONTOOL) then begin
+ HotToobarImageList.Clear;
+ HotToobarImageList.FileLoad(rtBitmap,
+ GikoSys.Setting.GetAppDir + ICONTOOL, clPurple);
+ end;
+end;
+//! \83|\83b\83v\83A\83b\83v\83\81\83j\83\85\81[\93Ç\82Ý\8d\9e\82Ý
+procedure TGikoForm.LoadPopupMenu();
+begin
+
+
+end;