问：怎么实现TRichEdit的自动滚行？象某些阅读器那样的功能。
答：用ScrollWindowEx或者ScrollWindowEx就可以了。
ScrollWindow(RichEdit1- >Handle, 0, -1, NULL, NULL); //向下滚1个像素
ScrollWindow(RichEdit1- >Handle, 0, 1, NULL, NULL); //向上滚1个像素
问：在下最近在自己编组件，按照BCB的帮助提示做好了图标，也按照它的提示建立了联系，
但就是看不到自己的图标，只有默认的！！！
答：用IMAGE EDITOR编辑DCR文件，记信图标名称必须和组件名称相同，我说的是图标名称，不是文件名称。生成DCU文件后，用BRCC32.EXE对该DCR文件进行编译生成DCU文件，将DCU文件加入到BPK包中，编译、安装包应可以看到你自制组件的包了。
问：物理删除记录,用ADO压缩Access2000库的方法？
答：用ADO压缩Access2000库
#include "utilcls.h"
void CompactDatabase(String f1,String psw1, String f2,String psw2)
{
String Provider1="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
+ f1 + ";Jet OLEDB:Database Password=" + psw1;
String Provider2="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
+ f2 + ";Jet OLEDB:Database Password=" + psw2;
Variant Adoobj=Variant::CreateObject("JRO.JetEngine");
Adoobj.OleProcedure("CompactDatabase",Provider1,Provider2);
AdoObj.Clear();//释放ADO对象
}
void __fastcall TForm1::Button1Click(TObject *Sender)
{
String f1="yhecdagl1.mdb"; // 源库1
String psw1="yhecdagl"; // 密码1
String f2="yhecdagl2.mdb"; // 新目的库2
String psw2="yhecdagl2"; // 新密码2
String dir=ExtractFilePath(Application->ExeName);
if(FileExists(f2))
DeleteFile(f2);
CompactDatabase(dir+f1,psw1,dir+f2,psw2);
ShowMessage("Finished");
}
问：能否通过按钮使用SQL创建一个名为a.db的文件?
答：这儿一个db文件就是一个数据表，所以可以通过创建表的方式来创建。
通过SQL语句就可以了,通过SQL语句我们可以创建不仅仅是表，还有别的很多，如字段等
Query1->Close;
Query1->DatabaseName="c:\temp";
Query1->SQL->Text="create table a.db (field1 varchar(10),field2 varchar(10))";
Query1->ExecSQL;