Class Topm_Form_PEdit

Unit

pedit

Declaration

type Topm_Form_PEdit = class(TForm)

Description

Hierarchy

• TForm
• Topm_Form_PEdit

Overview

Fields

	opm_BitBtn_PEditOk: TBitBtn;
	opm_BitBtn_PEditCancel: TBitBtn;
	opm_ImageList_PImg: TImageList;
	opm_PageControl_PEdit: TPageControl;
	opm_TabSheet_PEditMain: TTabSheet;
	opm_TabSheet_PEditDesc: TTabSheet;
	opm_ComboBox_PEditCat: TComboBox;
	opm_ComboBox_PEditMan: TComboBox;
	opm_Edit_PEditModel: TEdit;
	opm_Edit_PEditQuantity: TEdit;
	opm_Edit_PEditPrice: TEdit;
	opm_Edit_PEditSpecial: TEdit;
	opm_Edit_PEditWeight: TEdit;
	opm_label_PeditWeight: TLabel;
	opm_label_PeditSpecial: TLabel;
	opm_label_PeditPrice: TLabel;
	opm_label_PeditQty: TLabel;
	opm_label_PeditModel: TLabel;
	opm_label_PeditMan: TLabel;
	opm_label_PeditCat: TLabel;
	opm_CheckBox_PEditAvailable: TCheckBox;
	opm_TabControl_PEdit: TTabControl;
	opm_label_PeditName: TLabel;
	opm_label_PeditDesc: TLabel;
	opm_label_PeditURL: TLabel;
	opm_Edit_PEditName: TEdit;
	opm_Memo_PEditDescription: TMemo;
	opm_Edit_PEditURL: TEdit;
	opm_ComboBox_PEditTax: TComboBox;
	opm_label_PeditTax: TLabel;
	opm_TabSheet_PEditImg: TTabSheet;
	opm_BitBtn_PEditStopDown: TBitBtn;
	opm_StaticText_PeditImageETA: TStaticText;
	opm_StaticText_PeditImageData: TStaticText;
	opm_StaticText_PeditImageURL: TStaticText;
	opm_BitBtn_PEditDown: TBitBtn;
	opm_BitBtn_PEditDeleteImg: TBitBtn;
	opm_BitBtn_PEditUploadImg: TBitBtn;
	opm_StaticText_PeditCurr1: TStaticText;
	opm_StaticText_PeditCurr2: TStaticText;
	opm_Label_PeditViewed: TLabel;
	opm_StaticText_PeditViewed: TStaticText;
	opm_Memo_UploadDEBUG: TMemo;
	opm_PopupMenu_UploadDebug: TPopupMenu;
	opm_PopMenuItem_HideUploadDebug: TMenuItem;
	opm_BitBtn_PEditSelectImg: TBitBtn;
	opm_BitBtn_PEditStripHTML: TBitBtn;
	opm_DateTimePicker_PEditAvailDate: TDateTimePicker;
	opm_label_PeditAvailDate: TLabel;
	opm_StaticText_PeditCDate: TStaticText;
	opm_StaticText_PeditMDate: TStaticText;
	opm_label_PeditCDate: TLabel;
	opm_label_PeditMDate: TLabel;
	opm_label_PeditPriceTaxed: TLabel;
	opm_Edit_PEditPriceTaxed: TEdit;
	opm_StaticText_PeditCurr3: TStaticText;
	opm_StatusBar_PEdit: TStatusBar;
	opm_Edit_PeditImageURL: TEdit;
	opm_BitBtn_PEditUnlinkImg: TBitBtn;
	opm_ScrollBox_PeditImage: TScrollBox;
	opm_Panel_PeditImage0: TPanel;
	opm_Image_Pedit0: TImage;
	opm_Panel_PeditImage1: TPanel;
	opm_Image_Pedit1: TImage;
	opm_Panel_PeditImage2: TPanel;
	opm_Image_Pedit2: TImage;
	opm_Panel_PeditImage3: TPanel;
	opm_Image_Pedit3: TImage;
	opm_Panel_PeditImage4: TPanel;
	opm_Image_Pedit4: TImage;
	opm_Panel_PeditImage5: TPanel;
	opm_Image_Pedit5: TImage;
	opm_Panel_PeditImage6: TPanel;
	opm_Image_Pedit6: TImage;
	opm_BitBtn_PEditDownAll: TBitBtn;
	opm_SpeedButton_ClearImgCache: TSpeedButton;
	ProductModified : BOOLEAN;

Methods

	procedure FormShow(Sender: TObject);
	procedure opm_BitBtn_PEditOkClick(Sender: TObject);
	procedure FormCreate(Sender: TObject);
	procedure opm_BitBtn_PEditDownClick(Sender: TObject);
	procedure opm_BitBtn_PEditStopDownClick(Sender: TObject);
	procedure opm_BitBtn_PEditDeleteImgClick(Sender: TObject);
	procedure opm_BitBtn_PEditUploadImgClick(Sender: TObject);
	procedure FormClose(Sender: TObject; var Action: TCloseAction);
	procedure opm_BitBtn_PEditSelectImgClick(Sender: TObject);
	procedure opm_PopMenuItem_HideUploadDebugClick(Sender: TObject);
	procedure opm_TabControl_PEditChange(Sender: TObject);
	procedure opm_TabControl_PEditChanging(Sender: TObject; var AllowChange: Boolean);
	procedure opm_BitBtn_PEditStripHTMLClick(Sender: TObject);
	procedure opm_ComboBox_PEditTaxChange(Sender: TObject);
	procedure opm_Edit_PEditPriceChange(Sender: TObject);
	procedure opm_Edit_PEditPriceTaxedChange(Sender: TObject);
	procedure opm_Edit_PEditPriceTaxedExit(Sender: TObject);
	procedure opm_Edit_PEditPriceTaxedEnter(Sender: TObject);
	procedure opm_Edit_PEditPriceEnter(Sender: TObject);
	procedure opm_Edit_PEditPriceExit(Sender: TObject);
	procedure opm_Edit_PeditImageURLExit(Sender: TObject);
	procedure opm_BitBtn_PEditUnlinkImgClick(Sender: TObject);
	PROCEDURE opm_Control_SetChange (Sender: TObject);
	procedure opm_Image_Pedit0Click(Sender: TObject);
	procedure opm_Image_Pedit1Click(Sender: TObject);
	procedure opm_Image_Pedit2Click(Sender: TObject);
	procedure opm_Image_Pedit3Click(Sender: TObject);
	procedure opm_Image_Pedit4Click(Sender: TObject);
	procedure opm_Image_Pedit5Click(Sender: TObject);
	procedure opm_Image_Pedit6Click(Sender: TObject);
	procedure opm_Image_Pedit0DblClick(Sender: TObject);
	procedure opm_Image_Pedit1DblClick(Sender: TObject);
	procedure opm_Image_Pedit2DblClick(Sender: TObject);
	procedure opm_Image_Pedit3DblClick(Sender: TObject);
	procedure opm_Image_Pedit4DblClick(Sender: TObject);
	procedure opm_Image_Pedit5DblClick(Sender: TObject);
	procedure opm_Image_Pedit6DblClick(Sender: TObject);
	procedure opm_BitBtn_PEditDownAllClick(Sender: TObject);
	procedure opm_Image_Pedit0DragOver(Sender, Source: TObject; X, Y: Integer; State: TDragState; var Accept: Boolean);
	procedure opm_Image_Pedit0MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
	procedure opm_Image_Pedit0DragDrop(Sender, Source: TObject; X, Y: Integer);
	procedure opm_ScrollBox_PeditImageEnter(Sender: TObject);
	procedure opm_ScrollBox_PeditImageExit(Sender: TObject);
	procedure opm_SpeedButton_ClearImgCacheClick(Sender: TObject);

Description

Fields

opm_BitBtn_PEditOk: TBitBtn;

opm_BitBtn_PEditCancel: TBitBtn;

opm_ImageList_PImg: TImageList;

opm_PageControl_PEdit: TPageControl;

opm_TabSheet_PEditMain: TTabSheet;

opm_TabSheet_PEditDesc: TTabSheet;

opm_ComboBox_PEditCat: TComboBox;

opm_ComboBox_PEditMan: TComboBox;

opm_Edit_PEditModel: TEdit;

opm_Edit_PEditQuantity: TEdit;

opm_Edit_PEditPrice: TEdit;

opm_Edit_PEditSpecial: TEdit;

opm_Edit_PEditWeight: TEdit;

opm_label_PeditWeight: TLabel;

opm_label_PeditSpecial: TLabel;

opm_label_PeditPrice: TLabel;

opm_label_PeditQty: TLabel;

opm_label_PeditModel: TLabel;

opm_label_PeditMan: TLabel;

opm_label_PeditCat: TLabel;

opm_CheckBox_PEditAvailable: TCheckBox;

opm_TabControl_PEdit: TTabControl;

opm_label_PeditName: TLabel;

opm_label_PeditDesc: TLabel;

opm_label_PeditURL: TLabel;

opm_Edit_PEditName: TEdit;

opm_Memo_PEditDescription: TMemo;

opm_Edit_PEditURL: TEdit;

opm_ComboBox_PEditTax: TComboBox;

opm_label_PeditTax: TLabel;

opm_TabSheet_PEditImg: TTabSheet;

opm_BitBtn_PEditStopDown: TBitBtn;

opm_StaticText_PeditImageETA: TStaticText;

opm_StaticText_PeditImageData: TStaticText;

opm_StaticText_PeditImageURL: TStaticText;

opm_BitBtn_PEditDown: TBitBtn;

opm_BitBtn_PEditDeleteImg: TBitBtn;

opm_BitBtn_PEditUploadImg: TBitBtn;

opm_StaticText_PeditCurr1: TStaticText;

opm_StaticText_PeditCurr2: TStaticText;

opm_Label_PeditViewed: TLabel;

opm_StaticText_PeditViewed: TStaticText;

opm_Memo_UploadDEBUG: TMemo;

opm_PopupMenu_UploadDebug: TPopupMenu;

opm_PopMenuItem_HideUploadDebug: TMenuItem;

opm_BitBtn_PEditSelectImg: TBitBtn;

opm_BitBtn_PEditStripHTML: TBitBtn;

opm_DateTimePicker_PEditAvailDate: TDateTimePicker;

opm_label_PeditAvailDate: TLabel;

opm_StaticText_PeditCDate: TStaticText;

opm_StaticText_PeditMDate: TStaticText;

opm_label_PeditCDate: TLabel;

opm_label_PeditMDate: TLabel;

opm_label_PeditPriceTaxed: TLabel;

opm_Edit_PEditPriceTaxed: TEdit;

opm_StaticText_PeditCurr3: TStaticText;

opm_StatusBar_PEdit: TStatusBar;

opm_Edit_PeditImageURL: TEdit;

opm_BitBtn_PEditUnlinkImg: TBitBtn;

opm_ScrollBox_PeditImage: TScrollBox;

opm_Panel_PeditImage0: TPanel;

opm_Image_Pedit0: TImage;

opm_Panel_PeditImage1: TPanel;

opm_Image_Pedit1: TImage;

opm_Panel_PeditImage2: TPanel;

opm_Image_Pedit2: TImage;

opm_Panel_PeditImage3: TPanel;

opm_Image_Pedit3: TImage;

opm_Panel_PeditImage4: TPanel;

opm_Image_Pedit4: TImage;

opm_Panel_PeditImage5: TPanel;

opm_Image_Pedit5: TImage;

opm_Panel_PeditImage6: TPanel;

opm_Image_Pedit6: TImage;

opm_BitBtn_PEditDownAll: TBitBtn;

opm_SpeedButton_ClearImgCache: TSpeedButton;

ProductModified : BOOLEAN;

Methods

procedure FormShow(Sender: TObject);

procedure opm_BitBtn_PEditOkClick(Sender: TObject);

procedure FormCreate(Sender: TObject);

procedure opm_BitBtn_PEditDownClick(Sender: TObject);

procedure opm_BitBtn_PEditStopDownClick(Sender: TObject);

procedure opm_BitBtn_PEditDeleteImgClick(Sender: TObject);

procedure opm_BitBtn_PEditUploadImgClick(Sender: TObject);

procedure FormClose(Sender: TObject; var Action: TCloseAction);

procedure opm_BitBtn_PEditSelectImgClick(Sender: TObject);

procedure opm_PopMenuItem_HideUploadDebugClick(Sender: TObject);

procedure opm_TabControl_PEditChange(Sender: TObject);

procedure opm_TabControl_PEditChanging(Sender: TObject; var AllowChange: Boolean);

procedure opm_BitBtn_PEditStripHTMLClick(Sender: TObject);

procedure opm_ComboBox_PEditTaxChange(Sender: TObject);

procedure opm_Edit_PEditPriceChange(Sender: TObject);

procedure opm_Edit_PEditPriceTaxedChange(Sender: TObject);

procedure opm_Edit_PEditPriceTaxedExit(Sender: TObject);

procedure opm_Edit_PEditPriceTaxedEnter(Sender: TObject);

procedure opm_Edit_PEditPriceEnter(Sender: TObject);

procedure opm_Edit_PEditPriceExit(Sender: TObject);

procedure opm_Edit_PeditImageURLExit(Sender: TObject);

procedure opm_BitBtn_PEditUnlinkImgClick(Sender: TObject);

PROCEDURE opm_Control_SetChange (Sender: TObject);

procedure opm_Image_Pedit0Click(Sender: TObject);

procedure opm_Image_Pedit1Click(Sender: TObject);

procedure opm_Image_Pedit2Click(Sender: TObject);

procedure opm_Image_Pedit3Click(Sender: TObject);

procedure opm_Image_Pedit4Click(Sender: TObject);

procedure opm_Image_Pedit5Click(Sender: TObject);

procedure opm_Image_Pedit6Click(Sender: TObject);

procedure opm_Image_Pedit0DblClick(Sender: TObject);

procedure opm_Image_Pedit1DblClick(Sender: TObject);

procedure opm_Image_Pedit2DblClick(Sender: TObject);

procedure opm_Image_Pedit3DblClick(Sender: TObject);

procedure opm_Image_Pedit4DblClick(Sender: TObject);

procedure opm_Image_Pedit5DblClick(Sender: TObject);

procedure opm_Image_Pedit6DblClick(Sender: TObject);

procedure opm_BitBtn_PEditDownAllClick(Sender: TObject);

procedure opm_Image_Pedit0DragOver(Sender, Source: TObject; X, Y: Integer; State: TDragState; var Accept: Boolean);

procedure opm_Image_Pedit0MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);

procedure opm_Image_Pedit0DragDrop(Sender, Source: TObject; X, Y: Integer);

procedure opm_ScrollBox_PeditImageEnter(Sender: TObject);

procedure opm_ScrollBox_PeditImageExit(Sender: TObject);

procedure opm_SpeedButton_ClearImgCacheClick(Sender: TObject);