access表中的memo字段如何插入換行符? |
答題得分者是:writeman
|
oktony
中階會員 發表:67 回覆:132 積分:64 註冊:2004-12-05 發送簡訊給我 |
|
writeman
初階會員 發表:31 回覆:34 積分:28 註冊:2004-02-17 發送簡訊給我 |
hi
我在access裡建了個table叫aa
有兩個欄位id和memo
id是key,自動編號,memo是memo型態
試了以下程式碼
#13+#10應該是沒問題的
procedure TForm1.Button1Click(Sender: TObject); var str: string; begin str:= 'aaa' #13 #10 'bbbb' #13 #10 'ccc' #13 #10; q1.Close; q1.SQL.clear; q1.sql.text:= 'insert into aa ([memo]) values (' '''' str '''' ')'; q1.execsql; end; procedure TForm1.Button2Click(Sender: TObject); begin q1.Close; q1.SQL.clear; q1.sql.text:= 'select * from aa'; q1.open; while(not q1.eof)do begin memo1.Lines.add(q1.fields.fields[0].asstring); memo1.Lines.add(q1.fields.fields[1].asstring); q1.next; end; end; |
oktony
中階會員 發表:67 回覆:132 積分:64 註冊:2004-12-05 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |