请教一下dbgrid列的显示和隐藏问题!谢谢! |
尚未結案
|
200210
一般會員 發表:6 回覆:2 積分:1 註冊:2002-10-25 發送簡訊給我 |
大家好,我有两个表,A表(包含程序几百个字段),不想用INI文件!
因为如果窗口太多,每一个窗口都要有让拥护选择隐藏和显示dbgrid列!
biao ziduan visible
提单 yjmc true
提单 yjxh true
提单 danwei false
售单 yjmc false
...
B表在dbgrid中显示,
biao yjmc yjxh danwei 。。
提单 啤酒 5 斤
提单 酒类 6 斤 如果A表字段visible值true的时候,怎么把B表中的yjmc,yjxh这两列在dbgrid中藏呢!:)谢谢拉!如下: var
i :integer;
begin
for i:=0 to dbgrid.Columns.Count-1 do
begin
with adoquery2 do //查出visible表
begin
close;
sql.Clear;
sql.Add('select visible from A where biao=''jhmx''');
open;
with adoquery2 do
begin
close;
sql.clear;
sql.add('select * from B')
open
end;
//先从表A中找出visible这个字段,在看看ziduan这个字段的数据是否和dbgrid的字段一样。如果是就隐藏,可这样为什么没有显示?
if adoquery1.fieldbyname('visible').AsBoolean=true then
and (adoquery1.fieldbyname('ziduan').AsString=dbgrid1.Columns[i].FieldName) then
begin
dbgrid1.Columns[i].Visible:=false;
with adoquery1 do
begin
close;
sql.Clear;
sql.Add('select * from B');
open;
end;
end;
这样为什么程序运行,dbgrid要隐藏的列就没有隐藏呢?还是老样子
在dbgrid仍然显示为:
biao yjmc yjxh danwei 。。
提单 啤酒 5 斤
提单 酒类 6 斤
而不是我想要的:
danwei 。。。。
斤 。。。。
斤 。。。
谢谢了,请帮忙! 發表人 - 200210 於 2002/11/22 23:47:22 發表人 - 200210 於 2002/11/22 23:51:07
|
Miles
尊榮會員 發表:27 回覆:662 積分:622 註冊:2002-07-12 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |