请问:external exception c0000029 是什么错误?
用suiDBgrid显示数据库时,总出现这一条
我的程序是:界面上用ADOdbgid显示数据库的一个field
界面上有2个按钮,一个是选择字体,另一个是保存
程序如下:
procedure TForm1.suiButton11Click(Sender: TObject);
begin
if FontDialog1.Execute then
begin
suiDBMemo1.Font:=FontDialog1.Font;
adoquery1.Edit;
adoquery1.FieldByName('font_name').AsString:=FontDialog1.Font.Name;
adoquery1.FieldByName('font_charset').AsInteger:= fontdialog1.Font.Charset;
adoquery1.FieldByName('font_color').AsInteger:= fontdialog1.Font.Size;
adoquery1.FieldByName('font_size').AsInteger:= fontdialog1.Font.Size;
adoquery1.FieldByName('font_style').AsInteger:= byte(fontdialog1.Font.Style);
adoquery1.Post;
end;
end;procedure TForm1.suiButton12Click(Sender: TObject);
begin
if(suiMessageDialog1.ShowModal=mryes) and (suiDBMemo1.Modified) then
suiDBMemo1.DataSource.DataSet.Post;
end;谢谢各位帮忙看一下!!
用suiDBgrid显示数据库时,总出现这一条
我的程序是:界面上用ADOdbgid显示数据库的一个field
界面上有2个按钮,一个是选择字体,另一个是保存
程序如下:
procedure TForm1.suiButton11Click(Sender: TObject);
begin
if FontDialog1.Execute then
begin
suiDBMemo1.Font:=FontDialog1.Font;
adoquery1.Edit;
adoquery1.FieldByName('font_name').AsString:=FontDialog1.Font.Name;
adoquery1.FieldByName('font_charset').AsInteger:= fontdialog1.Font.Charset;
adoquery1.FieldByName('font_color').AsInteger:= fontdialog1.Font.Size;
adoquery1.FieldByName('font_size').AsInteger:= fontdialog1.Font.Size;
adoquery1.FieldByName('font_style').AsInteger:= byte(fontdialog1.Font.Style);
adoquery1.Post;
end;
end;procedure TForm1.suiButton12Click(Sender: TObject);
begin
if(suiMessageDialog1.ShowModal=mryes) and (suiDBMemo1.Modified) then
suiDBMemo1.DataSource.DataSet.Post;
end;谢谢各位帮忙看一下!!
解决方案 »
- lazarus中文社区官方500人超级QQ群,请加群号:34176611
- 小问题!急啊!
- 请问delphi做同时并发100客户端以上的较大型网络数据库程序如何?
- 求救:opendialog能否不用用户选中具体的文件而得到文件夹的路径!!
- 要命的小问题,只有让高手帮忙了
- 请教高手,bde 如何得到数据库连接中断(数据库down或网络连接中断)?
- 哪有DELPHI 6的升级包可以下载啊/
- 關于Tquery的用法!這里不知道哪里錯啦!
- 从数据库批量导出图片到EXCEL模板,生成上岗证
- 高手,请看看这段程序.
- delphi中怎样用rvproject控件调用ravereport设计器
- 有没有人有Delphi7.0中,Rave Reports5.0详细使用教程吗
改成
adoquery1.open