zoukankan      html  css  js  c++  java
  • dbgrideh 中的keylist,picklist的用法

    dbgrideh

    procedure TForm1.FormCreate(Sender: TObject);

    begin

    DBGridEh1.DataSource:=DataSource1;

    DataSource1.DataSet:=MemTableEh1;

    MemTableEh1.DataDriver:=DataSetDriverEh1;

    MemTableEh1.FetchAllOnOpen:=True;

    DataSetDriverEh1.ProviderDataSet:=ADOQuery1;

    ADOQuery1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;'+ 'Data Source=f:mcmygs.mdb;'+

    'Persist Security Info=False;'+

    'Jet OLEDB:Database Password=123456';

    ADOQuery1.Close;

    ADOQuery1.SQL.Text:='Select 自编号,合同号,币种,金额 from dzb'; ADOQuery1.Open;

    MemTableEh1.Active:=True;

    DBGridEh1.Flat:=True; //平面

    DBGridEh1.TitleHeight:=20; //标题栏行高

    DBGridEh1.OptionsEh:=DBGridEh1.OptionsEh+[dghShowRecNo]; //显示序号 DBGridEh1.ColumnDefValues.AlwaysShowEditButton:=True; //显示DropDowm图标

    DBGridEh1.Columns[2].ImageList:=ImageList1;

    DBGridEh1.Columns[2].ShowImageAndText:=True;

    //PickList为显示出来的值,与ImageList中的图标顺序相对应

    DBGridEh1.Columns[2].PickList.Add('美元');

    DBGridEh1.Columns[2].PickList.Add('欧元');

    DBGridEh1.Columns[2].PickList.Add('港币');

    DBGridEh1.Columns[2].PickList.Add('日元');

    DBGridEh1.Columns[2].PickList.Add('韩元');

    //KeyList为数据库表中实际储存值,与PickList中值设置好相对应

    DBGridEh1.Columns[2].KeyList.Add('USD');

    DBGridEh1.Columns[2].KeyList.Add('EUR');

    DBGridEh1.Columns[2].KeyList.Add('HKD');

    DBGridEh1.Columns[2].KeyList.Add('JPY');

    DBGridEh1.Columns[2].KeyList.Add('KRW');

    DBGridEh1.Columns[2].Width:=80;

    DBGridEh1.Columns[3].ButtonStyle:=cbsDropDown; //显示计算器

    DBGridEh1.Columns[3].DisplayFormat:='#,###,###.00';

    DBGridEh1.Columns[3].OptimizeWidth; //自适应宽度

    end;

  • 相关阅读:
    tomcat的HTTPS
    java websocket开发的客户端程序
    Java后端WebSocket的Tomcat实现
    java 注解
    工作队列
    中断共享(硬件角度)
    电平触发与边沿触发中断的理解
    kuser_cmpxchg_check 原子操作
    新建普通进程
    fork 至 “sys_clone" SyS_clone
  • 原文地址:https://www.cnblogs.com/jijm123/p/11306727.html
Copyright © 2011-2022 走看看