是id=172吧,
update tablename set memo=你要修改的内容 where id=172
‘贰’ 请问数据库里MEMO类型的字段怎么处理
可以用DBMemo1.Lines.
如果不想或不应用数据感知控件var
h:TStrings;begin
h:=TStringList.Create
;
h.Assign(YourTable.FieldByName('Telenumber'));
//////////////Memo1.Lines.Assign(H);
操作完后
H.Free;这样就可以将多条电话都取出了。
‘叁’ 如何把数据库中查询到的内容添加到memo中
Dim Conn As New ADODB.Connection
Dim Rs As New ADODB.Recordset
Conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\TBCS08D.MDB;Jet OLEDB:DataBase password=wn8815732;" 'TBCS08D改成你自己的数据库名称
Conn.Open
Rs.CursorLocation = adUseClient
Rs.Open "select * from LiaoWei ", Conn, 1, 3 'LiaoWei改成你自己的数据表名称
text1.text==Rs.Fields(1)
text2.text==Rs.Fields(2)
.......
以下同理
‘肆’ 如何把memo里内容存入oracle8i数据库delphi源码
用DELPHI操纵数据库很方便,要是只为了把MEMO中的内容存到数据库(多种数据库都行,不仅限于ORACLE),可以直接用控件就行:再窗体上放置数据源控件TDATASOURCE+数据敏感MEMO,将DBMEMO的DATASOURCE属性设置成你前面的数据源,就可以自动控制了。
‘伍’ 在Delphi中如何把数据库的内容导入memo里面显示,该怎么写程序啊,求助啊,谢谢!
连接的是什么数据库
memo1.text:=AdoQuery1.FieldByName('表名').AsString;
这个就是取当前查询到的信息
‘陆’ delphi 将数据库中查询到的DBGridm中的内容显示在memo中,字段间使用'符号隔开
试试下面的:
假设DBGrid对应的是adoquery1,表的属性为a,b,c,实现代码如下:
for i:=1 to adoquery1.recordcount do
begin
st1:=adoquery1.filedbyname('a').asstring;
st2:=adoquery1.filedbyname('b').asstring;
st3:=adoquery1.filedbyname('c').asstring;
st:=st1+','+st2+','+st3;
memo1.lines.add(st);
adoquery1.next;
end;
这样就可以了,希望能帮到你!
‘柒’ 关于数据库中字段属性的问题,为什么字段值显示为MEMO,它是什么类型,我在DBG
我昨天就遇到这个问题了。我用的数据库是SQL
SEVER。原因很简单:数据库类型不匹配。我把字段的类型改成VARCHAR就行了
‘捌’ 在Delphi中如何将memo中的数据导入数据库中,该怎么写程序啊,我是菜鸟啊,求助啊,谢谢!
memo.text就是memo中的内容。
如数据之间使用的是中文的逗号
可以
s := ansireplacestr(memo.text, ',',#13#10);
之后,
list := TStringlist.create;
list.text := s;
for i := 0 to list.cout - 1 do
begin
//此处逐条加入到数据库中去。
end;
‘玖’ delphi中DBGrid与memo问题,其中数据库用的是SQL Server 2000
大概思路,找出至少一门不及格的数据记录,把全部及格的给屏蔽了,减少工作量。
循环逐条来输出到memo
大概写,根据实际控件的名字自己改吧。
//声明变量;
var
sqlstr,temp_str:string;
//解释:qry1是ADOquery,
sqlstr:='select * from 表名 where (数学<60)or(历史<60)or(英语<60)or(化学<60) ';
with qry1 do
begin
sql.clear;
sql.add(sqlstr);
sql.open;
first;
memo1.clear;
while not eof do
begin
temp_str=fieldbyname('姓名').asstring;
if fieldbyname('数学').asinteger<60 then
temp_str=temp_str+' 数学不及格';
if fieldbyname('历史').asinteger<60 then
temp_str=temp_str+' 历史不及格';
if fieldbyname('英语').asinteger<60 then
temp_str=temp_str+' 英语不及格';
if fieldbyname('化学').asinteger<60 then
temp_str=temp_str+' 化学不及格';
memo1.lines.add(temp_str);
next;
end;
end;
//没有测试,希望有帮助。
‘拾’ delphi 如何实现双击DBGrid将数据库查询结果显示到memo中
我的思路:
将dbgrid首行记录中的各个字段值赋给一个变量(string);并将此值写入memo中;依次类推,逐行读取dbgrid 的记录,并逐行写入memo中,就ok。