date 和下拉列表
来源:互联网 发布:ubuntu vsftpd 编辑:程序博客网 时间:2024/05/22 00:37
1 unit MainForm;
2
3 interface
4
5 uses
6 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
7 Dialogs, StdCtrls, DB, ADODB, Mask, DBCtrls;
8
9 type
10 TMain = class(TForm)
11 ADOConnection: TADOConnection;
12 ADOQuery: TADOQuery;
13 CmbView: TComboBox;
14 ADOQueryid: TAutoIncField;
15 ADOQueryname: TStringField;
16 ADOQuerymima: TStringField;
17 ADOQueryquanx: TStringField;
18 procedure CmbViewDropDown(Sender: TObject);
19 private
20 list:TStringList;
21 { Private declarations }
22 public
23 { Public declarations }
24 end;
25
26 var
27 Main: TMain;
28
29 implementation
30
31 {$R *.dfm}
32
33 procedure TMain.CmbViewDropDown(Sender: TObject);
34 begin
35 list := TStringlist.Create;
36 ADOQuery.SQL.Text := 'select * from useadmin';
37 ADOQuery.Open ;
38 {fieldname是你要取的字段名,tablename是你要读取的表
39 数据库连接组建的连接字符串我没有做,你自己修改下}
40 with ADOQuery do
41 begin
42 while not Eof do
43 begin
44 {读取每一列的字段值插入list变量}
45 list.Add(ADOQuery.FieldByName('name').Text);
46 ADOQuery.Next;
47 end;
48 end;
49 CmbView.Items := list;
50 end;
51
52 end.
_____________________________________________________________________________________________
向下拉列表添加字段有以下几种方法:
1、在属性栏—>items中,进行字符串的添加
2、一个组件加载另一个组件的字段
cbname.items.assign(combox.items);
3、利用数据集向组件进行字段进行添加
cbname.items.clear; //cbname是下拉列表组件的Name
with 数据查询器 do
begin
Close;
SQL.clear;
SQL.ADD('查询数据字符串');
OPEN;
while not EOF do
begin
cbname.items.add(fieldbyname('字段名').AsString);
Next;
end;
Close;
end;
1、在属性栏—>items中,进行字符串的添加
2、一个组件加载另一个组件的字段
cbname.items.assign(combox.items);
3、利用数据集向组件进行字段进行添加
cbname.items.clear; //cbname是下拉列表组件的Name
with 数据查询器 do
begin
Close;
SQL.clear;
SQL.ADD('查询数据字符串');
OPEN;
while not EOF do
begin
cbname.items.add(fieldbyname('字段名').AsString);
Next;
end;
Close;
end;
_____________________________________________________________________________
formshow事件
datetimepicker1.date=date();
datetimepicker1.date=date();
- date 和下拉列表
- select 下拉框和下拉列表美化
- android中信息列表的下拉刷新和下拉加载
- Jquery操作下拉列表和复选框,自定义下拉
- 下拉列表框的隐藏和显示
- 下拉列表框设置和取值
- 省份和城市数组 下拉列表
- flex复选框和下拉列表
- 可选择和输入的下拉列表框
- jQuery下拉列表框操作和排序
- [note]表格,列表和下拉菜单
- 下拉列表的赋值,和默认选中
- 无限极下拉列表数据库和代码
- 可选择和输入的下拉列表框
- html的下拉列表和表格
- HTML下拉列表和隐藏域
- vue表单绑定:多选框和下拉列表
- 下拉列表数据展示和导出
- linux下用phpize给PHP动态添加扩展
- linq to sql 中从dbml文件中创建数据库
- 安定的日子
- 2010年3月10日星期三
- PHP学习系列$第三章:IF基本循环
- date 和下拉列表
- 分手后·1天,1周,1季,半年,1年,最后…
- 添加用XXX打开
- 学习C++的一些注意事项
- 拷贝构造函数
- 惭愧
- Attention
- 汇编语言学习记录
- 汇编语言学习程序