永发信息网

delphi中关于动态生成memo和button问题,怎么将对应记录加到数据库里???

答案:2  悬赏:0  手机版
解决时间 2021-03-02 17:55
  • 提问者网友:末路
  • 2021-03-02 10:35
delphi中关于动态生成memo和button问题,怎么将对应记录加到数据库里???
最佳答案
  • 五星知识达人网友:孤独的牧羊人
  • 2021-03-02 11:38
请描述清楚,是memo和button动态生成后,把memo和button的各种信息,比如位置,大小,命名等信息记录到数据库,还是button生成后,点击事件入库?
全部回答
  • 1楼网友:野味小生
  • 2021-03-02 12:58
1我晕 你append后没有post?那数据照样在缓存的吧?然后又用了next,那数据能保存成功吗?你说的那个保存 可以经由过程这个方法 :1 动态创建memo的时刻可以如许设置:memo1.name := 'memo1';button1.name := 'button1';2 在myclick中可以如许设置:var aname, atext : string;begin aname := (sender as tbutton).name; //获取当前按钮控件名称 aname := copy(aname,pos('button',aname)+6,length(aname)); //获取后缀的数字 aname := 'memo'+aname; //这个就是memo的名称啦 if assigned(findcomponent(aname)) then //搜刮控件 如不雅存在就取其文字 else showmessage('没有搜刮到响应的memo控件!无法保存!'); with query_tj do begin atext := tmemo(findcomponent(aname)).lines.text close; sql.text := 'select * from cs_table where 1=2'; //加where 1=2 ,避免搜刮全部表 按你本来的代码,如不雅今后你数据变多时,搜刮就会很慢 open; append; fieldbyname('memotext').value := atext; post; end; connection := conn;end;以上代码为手打,没有效delphi调试过,意思差不多是如许,本身看着办啦
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯