if(Form_DB->tab_Live->Locate("ID","AB1234", TLocateOptions() << loPartialKey)){
    pag_Customer->ActivePage = tab_liver;
    Label3->Caption = lab_Year->Caption +"/"+ lab_mday->Caption +"  "+ lab_time->Caption;
    Panel23->Caption = Form_DB->DBEdit2->Text;
    Label1->Caption = Form_DB->DBEdit3->Text;
    Image1->Picture->Assign(Form_DB->DBImage1->Picture);
  }

kenny23 發表在 痞客邦 PIXNET 留言(0) 人氣()