1.添加
treeview.Items.Insert(nil,'factory');
删除:
var
t:Ttreenode;
begin
t:=treeview2.selected;
if t=nil then exit;
t.Delete;
end;
2.在一个类的public下定义或在一个窗体单元的var
Form1: TForm1;处的form1之前写。
treeview.Items.Insert(nil,'factory');
删除:
var
t:Ttreenode;
begin
t:=treeview2.selected;
if t=nil then exit;
t.Delete;
end;
2.在一个类的public下定义或在一个窗体单元的var
Form1: TForm1;处的form1之前写。
解决方案 »
- 关于delphi 7图表第三方控件,急用,望相助!
- 新手求问第一贴,if和case 这两个语句有什么区别吗?
- 关于delphi indy进行tcp传输的问题
- 怎样打开一个WORD文档,并且要知道文档什么时候完全打开``````
- 西安的程序员留下qq!!!
- report machine问题
- 求求大家了,给多少分都愿意!!哪有注册版的FastReport下载啊!!
- 字符定位
- 奇怪,为什么我就是不能加入我从网上下载的控件呢??
- 怎样用NMSmtp控件通过Exchange Server转发Email?
- 问几个socks代理的问题???
- 请问,在SQLSERVER中有没有管理用户表的系统表。比如在ORACLE中就有SYS.USER_TABLE_COMMENTS等等的系统表
3. ADODataSet1.Fields[1].FieldName
4。delphi的书很多,精品到少,推荐,那本最厚的delphi5,呵呵,真的不错
procedure TFilterSelecter.GetColumns(const Rs: TAdoDataSet);
var
i: Integer;
begin
Self.m_ComboColumn.Clear;
For i:= 0 To Rs.FieldCount -1 Do
Begin
Self.m_ComboColumn.Items.Add(Rs.Fields[i].FieldName);
End;
Self.m_ComboColumn.ItemIndex := 0;
end;
4.上www.51delphi.com上去down本Delphi5开发人员指南吧,
那是学delphi的经典。顺便说,俺也是写vb开始的。