91午夜免费视频-91午夜视频-91午夜影院-91系列在线-91线上观看-91香蕉视频在线

with qryData do
    begin
        close;
        SQL.Clear;
        SQL.Add('SELECT * FROM JY_Park_Mech_info');
        Open;
        lvDev.Clear;
        while not Eof do
        begin
            Item := lvDev.Items.Add;
            Item.Caption := FieldByName('編號').AsString;
            Item.SubItems.Add(trim(FieldBYName('設備名稱').AsString));
            Item.SubItems.Add(FieldBYName('出入').AsString);
            Item.SubItems.Add(FieldByName('設備類型').AsString);
            Item.SubItems.Add(FieldBYName('所屬網絡').AsString);
            Item.SubItems.Add(FieldBYName('所屬停車場編號').AsString);
            Item.SubItems.Add(FieldBYName('視頻編號').AsString);
            Item.SubItems.Add(FieldByName('圖像編號').AsString);
            Item.SubItems.Add(boa[FieldBYName('暫停使用').AsBoolean]);
            Next;
        end;
    end;