zoukankan      html  css  js  c++  java
  • (转载)delphi实例TDBGrid用右键菜单复制行粘贴行

    delphi实例TDBGrid用右键菜单复制行粘贴行

    这个从本质上来说就是DBGrid后台数据库的插入

    右键复制当前行的相关数据到临时变量
    点粘贴时,覆盖数据或插入数据!

    db为数据库: 字段名id,name,string型
    通过adoquery-》datasource->dbgrid,adoquery的SQL中填写select * from db
    在form定义两个变量(全局):var id,name:string;
    复制代码:
    procedure CopyToMem;
    begin
    if not adoquery.active then
    begin
    showmessage('数据库没有打开!');
    exit;
    end;
    id:=adoquery.fieldbyname('id').asstring;
    name:=adoquery.fieldbyname('name').asstring;
    end;

    procedure PasTeFromMem; //覆盖
    begin
    if not adoquery.active then
    begin
    showmessage('数据库没有打开!');
    exit;
    end;
    adoquery.edit;
    adoquery.fieldbyname('id').asstring:=id;
    adoquery.fieldbyname('name').asstring:=name;
    adoquery.post;
    end;

    procedure PasTeFromMem1; //插入
    begin
    if not adoquery.active then
    begin
    showmessage('数据库没有打开!');
    exit;
    end;
    adoquery.insert;
    adoquery.fieldbyname('id').asstring:=id;
    adoquery.fieldbyname('name').asstring:=name;
    adoquery.post;
    end;

  • 相关阅读:
    CS231n 学习笔记(1) Image CLassification
    caffe-winsows封装成dll
    Nuget安装程序包源
    PCA降维demo
    AI方面的国际会议
    caffe solver
    caffe数据层
    一些有意思的技术博客
    js cookie 设置
    knockout.validation.js 异步校验
  • 原文地址:https://www.cnblogs.com/angelbd/p/3373074.html
Copyright © 2011-2022 走看看