checklistbox中的内容如何一次性存入sqlserver资料库,然后每一个之间都用逗 |
尚未結案
|
jtp
初階會員 發表:39 回覆:81 積分:29 註冊:2003-04-20 發送簡訊給我 |
checklistbox中的内容如何一次性存入资料库,然后每一个之间都用逗号分开? 我是这样读取数据的 CheckListBox1.Clear;
for i := 0 to frmmain.pcase.Items.Count - 1 do
CheckListBox1.Items.Add(frmmain.pcase.Items[i].Caption); 然后如何把checklistbox中的内容添加到资料库中的一个field中?每一项之间用","分开来,方便阅读,然后再从资料库中读取每一项然后反应到checklistbox中,就是说如果资料库中有checklistbox中的对应项,checklistbox中的那项前面就打勾?请问如何实现?
|
ha0009
版主 發表:16 回覆:507 積分:639 註冊:2002-03-16 發送簡訊給我 |
|
jtp
初階會員 發表:39 回覆:81 積分:29 註冊:2003-04-20 發送簡訊給我 |
|
ha0009
版主 發表:16 回覆:507 積分:639 註冊:2002-03-16 發送簡訊給我 |
|
jtp
初階會員 發表:39 回覆:81 積分:29 註冊:2003-04-20 發送簡訊給我 |
|
ha0009
版主 發表:16 回覆:507 積分:639 註冊:2002-03-16 發送簡訊給我 |
|
jtp
初階會員 發表:39 回覆:81 積分:29 註冊:2003-04-20 發送簡訊給我 |
ha0009你好:
编译时错误如下:
Error] maintenance.pas(72): Undeclared identifier: 'OutCheckListBox'
[Error] maintenance.pas(72): ';' expected but ':' found
[Error] maintenance.pas(76): Undeclared identifier: 'result'
[Error] maintenance.pas(77): Undeclared identifier: 'CheckListBox1'
[Error] maintenance.pas(77): 'DO' expected but identifier 'Count' found
[Error] maintenance.pas(78): 'THEN' expected but identifier 'Checked' found
[Error] maintenance.pas(79): Missing operator or semicolon
[Error] maintenance.pas(82): Incompatible types
[Error] maintenance.pas(82): Incompatible types
[Error] maintenance.pas(317): Undeclared identifier: 'OutCheckListBox'
[Fatal Error] main.dpr(85): Could not compile used unit 'system\maintenance.pas' 我的程式如下
function TForm_maintenance.OutCheckListBox: String;
var
i:integer;
begin
result:='';
for i:=0 to CheckListBox1.Count - 1 do begin
if CheckListBox1.Checked[i] then begin
result:=result CheckListBox1.Items.Strings[i] ',';
end;
end;
result:= copy(result, 1, Length(result) - 1);
end;
|
ha0009
版主 發表:16 回覆:507 積分:639 註冊:2002-03-16 發送簡訊給我 |
|
jtp
初階會員 發表:39 回覆:81 積分:29 註冊:2003-04-20 發送簡訊給我 |
|
ha0009
版主 發表:16 回覆:507 積分:639 註冊:2002-03-16 發送簡訊給我 |
你好:
我將 Demo Source 放在http://k_top.delphi.com.tw/dl/OptionString.exe,你 DL 試試是不是你要的
|
jtp
初階會員 發表:39 回覆:81 積分:29 註冊:2003-04-20 發送簡訊給我 |
|
ha0009
版主 發表:16 回覆:507 積分:639 註冊:2002-03-16 發送簡訊給我 |
|
jtp
初階會員 發表:39 回覆:81 積分:29 註冊:2003-04-20 發送簡訊給我 |
|
Justmade
版主 發表:94 回覆:1934 積分:2030 註冊:2003-03-12 發送簡訊給我 |
|
jtp
初階會員 發表:39 回覆:81 積分:29 註冊:2003-04-20 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |