BCB編程經驗
答：用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;
非常好我支持^.^
(0) 0%
不好我反對
(0) 0%