欧美日韩国产精品一区综合在线-亚洲av在线播放网址大全-久久影院午夜伦手机不四虎卡-中文字幕人妻丝袜乱一区三区-97热精品视频免费视频-人妻少妇精彩视品一区二区三区-污污污网站在线免费看-忘忧草社区在线播放日本韩国-亚洲精品一区二区三区婷婷月

停車(chē)場(chǎng)收費(fèi)軟件源代碼

來(lái)源:譽(yù)澄智能 2012/7/6 8:24:51??????點(diǎn)擊:

 begin
        Close;
        SQL.Clear;
        SQL.Add('SELECT * FROM JY_Park_Day_Fstd_Info WHERE 組合類(lèi)型 = ''' + cmbFareStd.Text + '''');
        Open;
        qs1  := FieldByName('起始時(shí)間1').AsDateTime ;
        jz1  := FieldByName('結(jié)束時(shí)間1').AsDateTime ;
        qs2  := FieldByName('起始時(shí)間2').AsDateTime ;
        jz2  := FieldByName('結(jié)束時(shí)間2').AsDateTime ;
        qs3  := FieldByName('起始時(shí)間3').AsDateTime ;
        jz3  := FieldByName('結(jié)束時(shí)間3').AsDateTime ;
        qs4  := FieldByName('起始時(shí)間4').AsDateTime ;
        jz4  := FieldByName('結(jié)束時(shí)間4').AsDateTime ;

        sflx1 :=trim(FieldByName('收費(fèi)類(lèi)型1').AsString);
        sflx2 :=trim(FieldByName('收費(fèi)類(lèi)型2').AsString);
        sflx3 :=trim(FieldByName('收費(fèi)類(lèi)型3').AsString);
        sflx4 :=trim(FieldByName('收費(fèi)類(lèi)型4').AsString);

        btQy1:=FieldByName('有效1').AsBoolean ;
        btQy2:=FieldByName('有效2').AsBoolean ;
        btQy3:=FieldByName('有效3').AsBoolean ;
        btQy4:=FieldByName('有效4').AsBoolean ;
    end;