蘇小鍰的異想空間

void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action)
{
    TRegistry *regKey = new TRegistry;
        regKey->RootKey = HKEY_CURRENT_USER;

//----------- .H

private:    // User declarations
        TWndMethod OldScrollBoxWndProc;
        void __fastcall ScrollBoxWndProc(TMessage& Message);

讓Panel1 繪圖的方法

TCanvas *pCanvas = new TCanvas();
pCanvas-> Handle = GetDC(Panel1 -> Handle);
pCanvas->Pen->Color = clBlue;

首先你必須要先抓到 MouseWheel

    if(shiftdown){
        SecBookMark = DataSource1->DataSet->GetBookmark();
        Direction = DataSource1->DataSet->CompareBookmarks(FirBookmark,SecBookMark);
        if(Direction == 0)

常常遇到好朋友們會問這個問題

就是 Office 會被認證成為盜版 , 其實最好能選用原廠軟體 , 可以參考Windows網站

微軟Office網站

影像式車牌辨識系統

    一種利用光學攝影機拍攝行進中或靜止的車輛車牌影像 ,

    再利用演算法將車牌圖片識別成為文字的系統.

UnicodeString Directory = lae_SSL_DIR->EditLabel->Caption ;
if(SelectDirectory(Directory, TSelectDirOpts(), 0)){
lae_SSL_DIR->EditLabel->Caption = Directory;
}

       #ifdef __cplusplus    
       extern "C" {
       #endif
                 

■ BCB 6.0

1.新建立一空白 Project
2.插入一 Button 元件 , 在其 forbidden 中插入程式碼

  if(Form_DB->tab_Live->Locate("ID","AB1234", TLocateOptions() << loPartialKey)){
    pag_Customer->ActivePage = tab_liver;
    Label3->Caption = lab_Year->Caption +"/"+ lab_mday->Caption +"  "+ lab_time->Caption;
    Panel23->Caption = Form_DB->DBEdit2->Text;

TCanvas *csBuf = new TCanvas;
HDC hDC = GetDC(cwb_Browser->Handle);
csBuf->Handle = hDC;
Graphics::TBitmap *CapImg = new Graphics::TBitmap();

//---------------------------------------------------------------------------
#include <stdio.h>
#include <string.h>
//---------------------------------------------------------------------------

static unsigned char digest[MD5ENCODELEN];
unsigned char str[100];
strcpy(str,Edit2->Text.c_str());
//str[0]='R';