以下问题请给出代码,谢谢!!!问题1:
怎么实现将Form1中的任何组件用鼠标进行随意拖动?问题2:
我想用鼠标随意在Form 或组件上画联线,比如我要将Image1用一根线连到另一Image2
画错了我又要随意擦除,怎么实现?问题3:3.1 如何判断TreeView选中的节点的序号(I的值)? Treeview.item[I] 3.2 如果选中的是父节点,怎么改变父节点的图标(当奇数次选中时,父节点的图标为tu1,
当偶数次选中时,父节点的图标为tu2) if treeview1.Selected.getFirstChild <> nil then
begin
加入代码
end;
请给我加入代码,谢谢!
怎么实现将Form1中的任何组件用鼠标进行随意拖动?问题2:
我想用鼠标随意在Form 或组件上画联线,比如我要将Image1用一根线连到另一Image2
画错了我又要随意擦除,怎么实现?问题3:3.1 如何判断TreeView选中的节点的序号(I的值)? Treeview.item[I] 3.2 如果选中的是父节点,怎么改变父节点的图标(当奇数次选中时,父节点的图标为tu1,
当偶数次选中时,父节点的图标为tu2) if treeview1.Selected.getFirstChild <> nil then
begin
加入代码
end;
请给我加入代码,谢谢!
解决方案 »
- 类似360安全卫士的800多K的安装包是怎么做成的?
- idtcpclient发送固定长度数据
- 请教:C 语言中 unsigned char com_port 在 DELPHI 中应该定义为什么呢?谢谢!
- 准备离开现在的公司,找工作了~
- TreeView控件中如何设置动态加入结点的图标???
- 关于数据库应用程序打包问题!!!!!!!!
- 在DELPHI中怎样从字符串中间截取字符串?是否有相应的函数?
- SQL存储过程高手们
- 歌曲上传功能怎么做
- 很棘手的问题.急需解决.望关注
- *_*,请教诸位大虾,SQL SERVER的出错提示,100 分
- 同一个SQL SERVER存储过程序的问题,我问了四次,每次数100分,如果有人答对,将现在就给400分
select i=conut(*) from ly_user_Login
一句改用游标
即:
select conut(*) from ly_user_Login
into cursor_name
fetch cursor_name into i
即可
select i=conut(*) from ly_user_Login
一句改用游标
即:
select conut(*) from ly_user_Login
into cursor_name
fetch cursor_name into i
即可