高分请教，不够再加

Question

with adoquery do
begin
close;
sql.clear;
sql.add('select ');
sql.add(listbox.Items.selected);
sql.add(' from Table1');
open;
end;

Answer 1

sql.add('listbox.Items');
这个是字符，不行的
你可以这样：
with adoquery do
begin
close;
sql.clear;
sql.add('select ');
sql.add(listbox.Items.caption);
sql.add(' from Table1');
open;
end; 
还要记住SQL语句之间的空格

Answer 2

1、var
    i:integer;
    str_1,str_2:string;
begin
    for i:=0 to List_kf.Items.count-1 do
    begin
    str_1:=List_tsjgdm.items[i];
    str_2:=List_kf.items[i];
    sqltext:='insert into ywsjk.dbo.DXDCWJLB values('''+dxddm+''',null,null,null,convert(numeric,'''+str_1+'''),convert(numeric,'''+str_2+'''),''F'',''0'',getdate(),'''+czygh+''',getdate(),''F'',''F'')';
    tuxedoquery1.sql.clear;
    tuxedoquery1.sql.add(Sqltext);
    Tuxedoquery1.execsql;
    end;

Answer 3

"怎样把计算公式通过SQLServer计算出来”
写一个存储过程

Answer 4

2、估计你要把表里面的计算公式delphi中转化计算好后再插入其他的表中。

Answer 5

怎样将listbox中的items加入到SQL语句中
可以用变量表示
sql.add('insert into dfak values(:aa)');query1.parambyname['aa'].asstring:=listbox.items;
其他部分和他们一样

Answer 6

第二个问题包括两个小问题：
1.把工资表中‘计算型’工资项的列设为readonly
2.我想用语句[Select 计算公式]  在SQLServer中直接计算，但怎样通过员工编号分别计算
to  cg1120(代码最优化－§人在爱情的空窗期要个梦§)：
    你能说的详细些吗

Answer 7

Items中没有selected和caption这两个属性
我用for I:=0 to Items2.Items.Count -1 do
         //begin
         SQL.Add(Items2.Items.Strings[I]);
但两项还可以，多于两项就SQL语句错误

Answer 8

var
   sql:string;
begin
  .....
  sql:='select '+chr(39)+trim(listbox.Items.caption)+chr(39)+
        ' form  table1';
  ......
  sql.add(sql);
  ......
end

Answer 9

sql.add('listbox.Items');
这个是字符不行;
可以这样：
sql.add(listbox.Items.caption);

Answer 10

怎样将listbox中的items加入到SQL语句中
可以用变量表示
sql.add('insert into dfak values(:aa)');query1.parambyname['aa'].asstring:=listbox.items;