diff --git a/OrangeUI/OrangeShopping/ProductListFrame.pas b/OrangeUI/OrangeShopping/ProductListFrame.pas index da1fc9d0..d741963a 100644 --- a/OrangeUI/OrangeShopping/ProductListFrame.pas +++ b/OrangeUI/OrangeShopping/ProductListFrame.pas @@ -53,11 +53,11 @@ implementation procedure TFrameProductList.btnLoadNextDataClick(Sender: TObject); begin - //���ڼ��� + //正在加载 - loading if not tmrLoading.Enabled then begin tmrLoading.Enabled:=True; - btnLoadNextData.Caption:='��������...'; + btnLoadNextData.Caption:='正在载入...'; end; end; @@ -66,20 +66,18 @@ constructor TFrameProductList.Create(AOwner: TComponent); inherited; tmrLoadingTimer(Self); - end; procedure TFrameProductList.lbProductListClickItem(Sender: TObject); begin if TSkinItem(Sender).ItemType=sitDefault then begin - //�鿴��Ʒ��Ϣ + //查看商品信息 - View product information HideFrame(Self); - //��ʾ��Ʒ��Ϣ���� - ShowFrame(TFrame(GlobalProductInfoFrame),TFrameProductInfo,frmMain,nil,nil,nil,Application); + //显示产品信息界面 - Display product information interface + ShowFrame(TFrame(GlobalProductInfoFrame), TFrameProductInfo, frmMain, Nil, Nil, Nil, Application); GlobalProductInfoFrame.FrameHistroy:=CurrentFrameHistroy; - end; end; @@ -90,8 +88,7 @@ procedure TFrameProductList.tmrLoadingTimer(Sender: TObject); begin Self.tmrLoading.Enabled:=False; btnLoadNextData.Properties.IsPushed:=False; - btnLoadNextData.Caption:='��ʾ��20��'; - + btnLoadNextData.Caption:='显示下20条'; // Show the next 20 Self.lbProductList.Properties.Items.BeginUpdate; try @@ -99,10 +96,9 @@ procedure TFrameProductList.tmrLoadingTimer(Sender: TObject); begin AListBoxItem:=Self.lbProductList.Properties.Items.Insert(Self.lbProductList.Properties.Items.Count-1); - AListBoxItem.Caption:='��������'+IntToStr(I); - AListBoxItem.Detail:='��563($90.00)'; + AListBoxItem.Caption:='测试数据'+IntToStr(I); // Test Data + AListBoxItem.Detail:='¥563($90.00)'; AListBoxItem.Icon.StaticImageIndex:=I Mod 12; - end; finally Self.lbProductList.Properties.Items.EndUpdate;