SQLite3 读写 TreeView！

最新推荐文章于 2023-01-29 13:03:12 发布

yangdongxuec123

最新推荐文章于 2023-01-29 13:03:12 发布

阅读量651

点赞数

文章标签： sqlite integer imagelist button string 数据库

本文链接：https://blog.csdn.net/yangdongxuec123/article/details/6774567

版权

这篇博客介绍了如何使用SQLite3数据库中的数据构建并显示在TreeView组件上。通过读取DataTable表，根据Parent字段来确定节点的层级关系，实现数据的树形结构展示。

摘要由CSDN通过智能技术生成

unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, fcTreeView,SQLiteTable3, StdCtrls, ImgList, ComCtrls;

type
TPItem = Record //表中记录的类型
Sign:Integer;
Caption:string;
Parent:Integer;

end;

PItem = ^TPItem; //指向极开路的指针

TForm1 = class(TForm)
fcTreeView2: TfcTreeView;
fcTreeView1: TfcTreeView;
ImageList1: TImageList;
Button1: TButton;
Button4: TButton;
function FindParentNode(Id:Integer):TfcTreeNode;
procedure Button1Click(Sender: TObject);
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;