| backup |  |
| example backup | ...Cursor; char tmp[250]; char *p,*p1; FILE *fp; strcpy(tmp,"Backup your Data in Text File Dict.txt ? "); if (Application->MessageBoxA(tmp,"Backup Dictionary",MB_YESNO)==IDNO) return; strcpy(tmp,dict_directory); strcat(tmp,"dict.txt"); fp=fopen(tmp,"w+t"); if (fp==NULL) { Applicati... |
| example backup | ... Backup Isam Files in Text File... |
| example backup | ...MessageBoxA(tmp,"Backup Dictionary",MB_YESNO)==IDNO) return; strcpy(tmp,dict_directory); strcat(tmp,"dict.txt"); fp=fopen(tmp,"w+t"); if (fp==NULL) { Application->MessageBoxA("Problem Opening Dict.Txt File", "Backup Dictionary",MB_OK); return; } if (... |
| example backup | ...MessageBoxA("Problem Opening Dict.Txt File", "Backup Dictionary",MB_OK); return; } if (cb->Checked==true) multi=1; else multi=0; Screen->Cursor = crHourGlass; strcpy(tmp,lIndex->Caption.c_str()); INDEX=atoi(tmp); DisableButtons(); eWord->Text==... |
| example backup | ...MessageBoxA("Backup Done","RealIsam",MB_OK); } //--------------------------------------------------------------------------- ... |
| example principle | ...Backup, Restore, Duplicate... |
| example principle | ...Backup database : Sequential read of the database and save the content in the dict.txt file ... |
| index_summary item47 | ...Backup Isam Files in Text File... |
| base_directory | |
| example formcreate | ...orm::FormCreate(TObject *Sender) { char name[250]; AnsiString Dir; int rc; int mode; char tmp[100]; Dir = GetCurrentDir(); strcpy(base_directory,Dir.c_str()); strcpy(dict_directory,base_directory); strcat(dict_directory,"\\dictionary\\"); // REALISAM ALLOWS 64 INDEXES : Value fr... |
| example formcreate | ... AnsiString Dir; int rc; int mode; char tmp[100]; Dir = GetCurrentDir(); strcpy(base_directory,Dir.c_str()); strcpy(dict_directory,base_directory); strcat(dict_directory,"\\dictionary\\"); // REALISAM ALLOWS 64 INDEXES : Value from 0 to 63 INDEX=0; strcpy(name,dict_direct... |
| example include | ...c1,nbsec2,delta; realisam *dict; // working database realisam *dupli; // another instance for duplication example char base_directory[MAX_PATH]; char dict_directory[MAX_PATH]; int nbrecords; int multi; int INDEX; int M_recdata; // ... |
| basic | |
| example principle | ...Basic Sequential Access... |
| bcb5 | |
| example source | ... This program is written using the Borland C++ Builder (Version BCB5) ... |
| bcb | |
| example download | ... Files are packed in a ZIP file Borland DLL,or BPL are also incuded if you want to run the TESTISAM.EXE program without having the BCB development compiler. ... |
| beep | |
| example backup | ...Cursor = oldCursor; Beep(); EnableButtons(); Application->MessageBoxA("Backup Done","RealIsam",MB_OK); } //--------------------------------------------------------------------------- ... |
| example restore | ...Cursor = oldCursor; Beep(); EnableButtons(); Application->MessageBoxA("Restoration Done","RealIsam",MB_OK); } //--------------------------------------------------------------------------- ... |
| example start | ...Cursor = oldCursor; Beep(); EnableButtons(); Application->MessageBoxA("Indexation Finished","RealIsam",MB_OK); } //--------------------------------------------------------------------------- ... |
| better | |
| realisamdoc overview | ...reading operation is required. It is the responsability of the developer to organize records and to know how to extract the fields. Realisam is better adapted to store variable length text data like XML strings. ... |
| bevel1 | |
| example include | ... TLabel *Label20; TLabel *RK; TLabel *Label22; TButton *btBackup; TButton *btRestore; TBevel *Bevel1; TBevel *Bevel2; TCheckBox *CheckBox1; TBevel *Bevel3; TLabel *Label1; TButton *btUpdate; T... |
| bevel2 | |
| example include | ... TLabel *RK; TLabel *Label22; TButton *btBackup; TButton *btRestore; TBevel *Bevel1; TBevel *Bevel2; TCheckBox *CheckBox1; TBevel *Bevel3; TLabel *Label1; TButton *btUpdate; TButton *btDelete; ... |
| bevel3 | |
| example include | ... TButton *btBackup; TButton *btRestore; TBevel *Bevel1; TBevel *Bevel2; TCheckBox *CheckBox1; TBevel *Bevel3; TLabel *Label1; TButton *btUpdate; TButton *btDelete; TButton *btDupl; TButton *btClear; T... |
| bigger | |
| realisamdoc open | ...ks of datalen + 8 bytes. If real length is less than datalen, a physical block of datalen+8 bytes will be allocated and written. If data length is bigger than datalen, a second block is allocated, and so on... The Windows file management system works with multiples of 1024 bytes, and we recommand t... |
| realisamdoc rewriterecord | ...Rewrite a data record to a previous location. If data length is bigger than the previous write, the function can create new physical blocks. Developer has to specifiy the new data length. ... |
| binary | |
| realisamdoc overview | ... contrary to other relational databases, ignores the field notion, and does not try to classify data in numeric, date or text fields : it writes binary or text data according the length specified, and returns all these bytes when a reading operation is required. It is the responsability of the ... |
| realisamdoc readrecord | ... a call to RecordLength function allows to allocate the right amount of memory. ReadRecord restores the entire data written previously, including binary data. For character strings stored without a 0x00 terminator, it is recommended to terminate the string with a 0 after the ReadRecord. ... |
| realisamdoc writerecord | ...Write a data record at a position previously defined by a call to GetNewRecordNumber. Data can be text or binary. Length is a parameter to provide . For characters strings ended with 0x00, the developer can insert the last byte 0x00, or can insert it when the program read the data. ... |
| bit | |
| realisamdoc readlast | ...recdata is a 32 bit integer pointing on a data record related to the key. ... |
| realisamdoc readnext | ...recdata is a 32 bit integer that points on the related data record. ... |
| realisamdoc readprev | ...recdata is a 32 bit integer related to the data record to read. ... |
| bits | |
| realisamdoc getnew | ...32 bits integer countaining the next available position. ... |
| realisamdoc overview | ...RealIsam is a 32-bits DLL and can be interfaced to any 32 bits application developped under Win95,Win98, NT,XP. ... |
| block | |
| realisamdoc closereopen | ...Data Block Size ... |
| realisamdoc open | ...filename = filename, with no extension (this function opens or creates the Isam files , according the extension required) datalen = Data physical block length . This value is not the real data length, but an average size. realisam will write data in consecutive blocks of datalen + 8 bytes. If real... |
| realisamdoc open | ... length, but an average size. realisam will write data in consecutive blocks of datalen + 8 bytes. If real length is less than datalen, a physical block of datalen+8 bytes will be allocated and written. If data length is bigger than datalen, a second block is allocated, and so on... The Windows fil... |
| realisamdoc open | ...al length is less than datalen, a physical block of datalen+8 bytes will be allocated and written. If data length is bigger than datalen, a second block is allocated, and so on... The Windows file management system works with multiples of 1024 bytes, and we recommand to work with datalen+8 such as ... |
| realisamdoc open | ...cified in the dat parameter. Realisam creates these files if they don't exist. Notice : always open / reopen the database with the same physical block size. ... |
| blocks | |
| realisamdoc open | ...ired) datalen = Data physical block length . This value is not the real data length, but an average size. realisam will write data in consecutive blocks of datalen + 8 bytes. If real length is less than datalen, a physical block of datalen+8 bytes will be allocated and written. If data length is b... |
| realisamdoc rewriterecord | ...Rewrite a data record to a previous location. If data length is bigger than the previous write, the function can create new physical blocks. Developer has to specifiy the new data length. ... |
| blocksize | |
| realisamdoc closereopen | ...int CloseReopen(char *FileName,short BlockSize,char *ndx, char *dat); ... |
| realisamdoc include | ...us extern "C" { #endif class _export realisam { public: realisam(void); ~realisam(void); int OpenEngine(char *FileName,short BlockSize,char *ndx, char*dat); int CloseEngine(void); int SetIndexMode(short Index, short Value); int WriteRecord(char *pdata,int len); int R... |
| realisamdoc include | ... int Version(char *p); int GetIndexMode(int ndx); int DeleteIsam(char *indexname,char *dataname); int CloseReopen(char *FileName,short BlockSize,char *ndx, char *dat); }; #ifdef __cplusplus } #endif #endif ... |
| borland | |
| example download | ... Files are packed in a ZIP file Borland DLL,or BPL are also incuded if you want to run the TESTISAM.EXE program without having the BCB development compiler. ... |
| example source | ... This program is written using the Borland C++ Builder (Version BCB5) ... |
| borlndmm | |
| example download | ...- borlndmm.dll ... |
| box | |
| example principle | ...Clear the Display Box ... |
| bpl | |
| example download | ... Files are packed in a ZIP file Borland DLL,or BPL are also incuded if you want to run the TESTISAM.EXE program without having the BCB development compiler. ... |
| example download | ...- vcl50.bpl ... |
| bpr | |
| example download | ...- testisam.bpr ... |
| btadd- | |
| example disablebuttons | ...Enabled=false; btAdd->Enabled=false; btUpdate->Enabled=false; btDelete->Enabled=false; } ... |
| example enablebuttons | ...Enabled=true; btAdd->Enabled=true; btUpdate->Enabled=true; btDelete->Enabled=true; } ... |
| btadd | |
| example include | ... TLabel *Label1; TButton *btUpdate; TButton *btDelete; TButton *btDupl; TButton *btClear; TButton *btAdd; TCheckBox *cbSec; TLabel *lIndex; TLabel *Label3; TButton *btVersion; void __fastcall FormCre... |
| btaddclick | |
| example add | ... void __fastcall TMainForm::btAddClick(TObject *Sender) { char Key[MAX_KEY],RetKey[MAX_KEY]; int rc, recdata; char buffer[BUF_LEN],str[BUF_LEN]; strcpy(Key,eWord->Text.c_str()); if (strlen(Key)==0) { Application->MessageBoxA("Key not provided","RealIsam",MB_OK); return; ... |
| example include | ...Sender); void __fastcall btDuplClick(TObject *Sender); void __fastcall btClearClick(TObject *Sender); void __fastcall btAddClick(TObject *Sender); void __fastcall btVersionClick(TObject *Sender); private: // User declarations #define MAX_KEY 250 #define BUF_... |
| btbackup- | |
| example disablebuttons | ...Enabled = false; btBackup->Enabled=false; btRestore->Enabled=false; btDupl->Enabled=false; btClear->Enabled=false; btAdd->Enabled=false; btUpdate->Enabled=false; btDelete->Enabled=false; } ... |
| example enablebuttons | ...Enabled = true; btBackup->Enabled=true; btRestore->Enabled=true; btDupl->Enabled=true; btClear->Enabled=true; btAdd->Enabled=true; btUpdate->Enabled=true; btDelete->Enabled=true; } ... |
| btbackup | |
| example include | ...*cb; TLabel *Label18; TEdit *edFile; TLabel *Label20; TLabel *RK; TLabel *Label22; TButton *btBackup; TButton *btRestore; TBevel *Bevel1; TBevel *Bevel2; TCheckBox *CheckBox1; TBevel *Bevel3; ... |
| btbackupclick | |
| example backup | ... void __fastcall TMainForm::btBackupClick(TObject *Sender) { int rc,recdata; char Key[MAX_KEY],RetKey[MAX_KEY]; char buffer[BUF_LEN]; char html[BUF_LEN]; char definition[BUF_LEN]; int nbseq,nbisam; struct time t; int nbsec1,nbsec2; TCursor oldCursor = Screen->Cursor; char tmp[250]; c... |
| example include | ... void __fastcall mWordMouseUp(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y); void __fastcall btBackupClick(TObject *Sender); void __fastcall btRestoreClick(TObject *Sender); void __fastcall eWordKeyUp(TObject *Sender, WORD &Key, ... |
| btclear- | |
| example disablebuttons | ...Enabled=false; btClear->Enabled=false; btAdd->Enabled=false; btUpdate->Enabled=false; btDelete->Enabled=false; } ... |
| example enablebuttons | ...Enabled=true; btClear->Enabled=true; btAdd->Enabled=true; btUpdate->Enabled=true; btDelete->Enabled=true; } ... |
| btclear | |
| example include | ... TBevel *Bevel3; TLabel *Label1; TButton *btUpdate; TButton *btDelete; TButton *btDupl; TButton *btClear; TButton *btAdd; TCheckBox *cbSec; TLabel *lIndex; TLabel *Label3; TButton *btVersion; ... |
| btclearclick | |
| example clear | ... void __fastcall TMainForm::btClearClick(TObject *Sender) { eWord->Text=""; mWord->Clear(); } //--------------------------------------------------------------------------- ... |
| example include | ...nder); void __fastcall btDeleteClick(TObject *Sender); void __fastcall btDuplClick(TObject *Sender); void __fastcall btClearClick(TObject *Sender); void __fastcall btAddClick(TObject *Sender); void __fastcall btVersionClick(TObject *Sender); private: //... |
| btdelete- | |
| example disablebuttons | ...Enabled=false; btDelete->Enabled=false; } ... |
| example enablebuttons | ...Enabled=true; btDelete->Enabled=true; } ... |
| btdelete | |
| example include | ... TBevel *Bevel2; TCheckBox *CheckBox1; TBevel *Bevel3; TLabel *Label1; TButton *btUpdate; TButton *btDelete; TButton *btDupl; TButton *btClear; TButton *btAdd; TCheckBox *cbSec; TLabel *lIndex; TLab... |
| btdeleteclick | |
| example delete | ... void __fastcall TMainForm::btDeleteClick(TObject *Sender) { int rc; rc=dict->DeleteKey(INDEX,M_Key,M_recdata); rc=dict->DeleteRecord(M_recdata); First(); StatusBar1->SimpleText="Entry Deleted"; } //--------------------------------------------------------------------------- ... |
| example include | ...p(TObject *Sender, WORD &Key, TShiftState Shift); void __fastcall btUpdateClick(TObject *Sender); void __fastcall btDeleteClick(TObject *Sender); void __fastcall btDuplClick(TObject *Sender); void __fastcall btClearClick(TObject *Sender); void... |
| btdupl- | |
| example disablebuttons | ...Enabled=false; btDupl->Enabled=false; btClear->Enabled=false; btAdd->Enabled=false; btUpdate->Enabled=false; btDelete->Enabled=false; } ... |
| example enablebuttons | ...Enabled=true; btDupl->Enabled=true; btClear->Enabled=true; btAdd->Enabled=true; btUpdate->Enabled=true; btDelete->Enabled=true; } ... |
| btdupl | |
| example include | ... TCheckBox *CheckBox1; TBevel *Bevel3; TLabel *Label1; TButton *btUpdate; TButton *btDelete; TButton *btDupl; TButton *btClear; TButton *btAdd; TCheckBox *cbSec; TLabel *lIndex; TLabel *Label3; TButto... |
| btduplclick | |
| example duplicate | ... void __fastcall TMainForm::btDuplClick(TObject *Sender) { char name[MAX_PATH]; int rc, recdata,recdata_dupli; dupli = new realisam(); char RetKey[MAX_KEY]; char buffer[BUF_LEN]; char tmp[250]; strcpy(tmp,"Do you want to build a duplicate dictionnary : files Dupli.ndx and Dupli.dat ... |
| example include | ...ft); void __fastcall btUpdateClick(TObject *Sender); void __fastcall btDeleteClick(TObject *Sender); void __fastcall btDuplClick(TObject *Sender); void __fastcall btClearClick(TObject *Sender); void __fastcall btAddClick(TObject *Sender); void _... |
| btfirst- | |
| example disablebuttons | ...Enabled = false; btFirst->Enabled = false; btLast->Enabled = false; btNext->Enabled = false; btPrev->Enabled = false; btSearch->Enabled = false; btBackup->Enabled=false; btRestore->Enabled=false; btDupl->Enabled=false; btClear->Enabled=false; btAdd->Enabled=false; btUpdate->En... |
| example enablebuttons | ...Enabled = true; btFirst->Enabled = true; btLast->Enabled = true; btNext->Enabled = true; btPrev->Enabled = true; btSearch->Enabled = true; btBackup->Enabled=true; btRestore->Enabled=true; btDupl->Enabled=true; btClear->Enabled=true; btAdd->Enabled=true; btUpdate->Enabled=true;... |
| btfirst | |
| example include | ...TStatusBar *StatusBar1; TButton *btSearch; TLabel *lElap; TButton *btNext; TButton *btPrev; TButton *btFirst; TButton *btLast; TMainMenu *MainMenu1; TMenuItem *Exit1; TMenuItem *Exit2; TLabel *Label16; ... |
| btfirstclick | |
| example first | ...SetTextBuf(buffer); } } void __fastcall TMainForm::btFirstClick(TObject *Sender) { First(); } //--------------------------------------------------------------------------- ... |
| example include | ...ion); void __fastcall btStartClick(TObject *Sender); void __fastcall btSearchClick(TObject *Sender); void __fastcall btFirstClick(TObject *Sender); void __fastcall btNextClick(TObject *Sender); void __fastcall btLastClick(TObject *Sender); void ... |
| btlast- | |
| example disablebuttons | ...Enabled = false; btLast->Enabled = false; btNext->Enabled = false; btPrev->Enabled = false; btSearch->Enabled = false; btBackup->Enabled=false; btRestore->Enabled=false; btDupl->Enabled=false; btClear->Enabled=false; btAdd->Enabled=false; btUpdate->Enabled=false; btDelete->Ena... |
| example enablebuttons | ...Enabled = true; btLast->Enabled = true; btNext->Enabled = true; btPrev->Enabled = true; btSearch->Enabled = true; btBackup->Enabled=true; btRestore->Enabled=true; btDupl->Enabled=true; btClear->Enabled=true; btAdd->Enabled=true; btUpdate->Enabled=true; btDelete->Enabled=true; ... |
| btlast | |
| example include | ... TButton *btSearch; TLabel *lElap; TButton *btNext; TButton *btPrev; TButton *btFirst; TButton *btLast; TMainMenu *MainMenu1; TMenuItem *Exit1; TMenuItem *Exit2; TLabel *Label16; TLabel *Label17; ... |
| btlastclick | |
| example include | ...ender); void __fastcall btFirstClick(TObject *Sender); void __fastcall btNextClick(TObject *Sender); void __fastcall btLastClick(TObject *Sender); void __fastcall btPrevClick(TObject *Sender); void __fastcall Exit2Click(TObject *Sender); void __... |
| example last | ... void __fastcall TMainForm::btLastClick(TObject *Sender) { int rc,recdata; char Key[MAX_KEY],RetKey[MAX_KEY]; char buffer[BUF_LEN]; rc = dict->ReadLastKey(INDEX,RetKey,&recdata); RK->Caption=AnsiString(RetKey); eWord->Text=AnsiString(RetKey); if (rc==1) { mWord->Clear(); ... |
| btnext- | |
| example disablebuttons | ...Enabled = false; btNext->Enabled = false; btPrev->Enabled = false; btSearch->Enabled = false; btBackup->Enabled=false; btRestore->Enabled=false; btDupl->Enabled=false; btClear->Enabled=false; btAdd->Enabled=false; btUpdate->Enabled=false; btDelete->Enabled=false; } ... |
| example enablebuttons | ...Enabled = true; btNext->Enabled = true; btPrev->Enabled = true; btSearch->Enabled = true; btBackup->Enabled=true; btRestore->Enabled=true; btDupl->Enabled=true; btClear->Enabled=true; btAdd->Enabled=true; btUpdate->Enabled=true; btDelete->Enabled=true; } ... |
| btnext | |
| example include | ... TMemo *mWord; TLabel *lelapsed; TStatusBar *StatusBar1; TButton *btSearch; TLabel *lElap; TButton *btNext; TButton *btPrev; TButton *btFirst; TButton *btLast; TMainMenu *MainMenu1; TMenuItem *Exit1; ... |
| btnextclick | |
| example include | ...der); void __fastcall btSearchClick(TObject *Sender); void __fastcall btFirstClick(TObject *Sender); void __fastcall btNextClick(TObject *Sender); void __fastcall btLastClick(TObject *Sender); void __fastcall btPrevClick(TObject *Sender); void _... |
| example next | ... void __fastcall TMainForm::btNextClick(TObject *Sender) { int rc,recdata; char Key[MAX_KEY],RetKey[MAX_KEY]; char buffer[BUF_LEN]; rc = dict->ReadNextKey(RetKey,&recdata); RK->Caption=AnsiString(RetKey); eWord->Text=AnsiString(RetKey); if (rc==1) { mWord->Clear(); ... |
| btprev- | |
| example disablebuttons | ...Enabled = false; btPrev->Enabled = false; btSearch->Enabled = false; btBackup->Enabled=false; btRestore->Enabled=false; btDupl->Enabled=false; btClear->Enabled=false; btAdd->Enabled=false; btUpdate->Enabled=false; btDelete->Enabled=false; } ... |
| example enablebuttons | ...Enabled = true; btPrev->Enabled = true; btSearch->Enabled = true; btBackup->Enabled=true; btRestore->Enabled=true; btDupl->Enabled=true; btClear->Enabled=true; btAdd->Enabled=true; btUpdate->Enabled=true; btDelete->Enabled=true; } ... |
| btprev | |
| example include | ...TLabel *lelapsed; TStatusBar *StatusBar1; TButton *btSearch; TLabel *lElap; TButton *btNext; TButton *btPrev; TButton *btFirst; TButton *btLast; TMainMenu *MainMenu1; TMenuItem *Exit1; TMenuItem *Exit2; ... |
| btprevclick | |
| example include | ...Sender); void __fastcall btNextClick(TObject *Sender); void __fastcall btLastClick(TObject *Sender); void __fastcall btPrevClick(TObject *Sender); void __fastcall Exit2Click(TObject *Sender); void __fastcall mWordMouseUp(TObject *Sender, TMouseButton But... |
| example prev | ... void __fastcall TMainForm::btPrevClick(TObject *Sender) { int rc,recdata; char Key[MAX_KEY],RetKey[MAX_KEY]; char buffer[BUF_LEN]; rc = dict->ReadPrevKey(RetKey,&recdata); RK->Caption=AnsiString(RetKey); eWord->Text=AnsiString(RetKey); if (rc==1) { mWord->Clear(); rc... |
| btrestore- | |
| example disablebuttons | ...Enabled=false; btRestore->Enabled=false; btDupl->Enabled=false; btClear->Enabled=false; btAdd->Enabled=false; btUpdate->Enabled=false; btDelete->Enabled=false; } ... |
| example enablebuttons | ...Enabled=true; btRestore->Enabled=true; btDupl->Enabled=true; btClear->Enabled=true; btAdd->Enabled=true; btUpdate->Enabled=true; btDelete->Enabled=true; } ... |
| btrestore | |
| example include | ...; TEdit *edFile; TLabel *Label20; TLabel *RK; TLabel *Label22; TButton *btBackup; TButton *btRestore; TBevel *Bevel1; TBevel *Bevel2; TCheckBox *CheckBox1; TBevel *Bevel3; TLabel *Label1; TBu... |
| btrestoreclick | |
| example include | ...eButton Button, TShiftState Shift, int X, int Y); void __fastcall btBackupClick(TObject *Sender); void __fastcall btRestoreClick(TObject *Sender); void __fastcall eWordKeyUp(TObject *Sender, WORD &Key, TShiftState Shift); void __fastcall btU... |
| example restore | ... void __fastcall TMainForm::btRestoreClick(TObject *Sender) { char tmp[250]; char name[250]; FILE *fp; int rc,nbisam; char buffer[BUF_LEN]; struct time t; int nbsec1,nbsec2; strcpy(tmp,"Restore Data from Dict.txt ? \r\n Isam Files will be deleted, and rebuilt"); if (Application-... |
| btsearch- | |
| example disablebuttons | ...Enabled = false; btSearch->Enabled = false; btBackup->Enabled=false; btRestore->Enabled=false; btDupl->Enabled=false; btClear->Enabled=false; btAdd->Enabled=false; btUpdate->Enabled=false; btDelete->Enabled=false; } ... |
| example enablebuttons | ...Enabled = true; btSearch->Enabled = true; btBackup->Enabled=true; btRestore->Enabled=true; btDupl->Enabled=true; btClear->Enabled=true; btAdd->Enabled=true; btUpdate->Enabled=true; btDelete->Enabled=true; } ... |
| btsearch | |
| example include | ... TLabel *Label15; TEdit *eWord; TMemo *mWord; TLabel *lelapsed; TStatusBar *StatusBar1; TButton *btSearch; TLabel *lElap; TButton *btNext; TButton *btPrev; TButton *btFirst; TButton *btLast; TMain... |
| btsearchclick | |
| example include | ... __fastcall FormClose(TObject *Sender, TCloseAction &Action); void __fastcall btStartClick(TObject *Sender); void __fastcall btSearchClick(TObject *Sender); void __fastcall btFirstClick(TObject *Sender); void __fastcall btNextClick(TObject *Sender); void... |
| example search | ... void __fastcall TMainForm::btSearchClick(TObject *Sender) { Search(); } //--------------------------------------------------------------------------- void __fastcall TMainForm::Search() { int rc,recdata; char Key[MAX_KEY],RetKey[MAX_KEY]; char buffer[BUF_LEN]; char tmp[256]; ... |
| btstart- | |
| example disablebuttons | ... void __fastcall TMainForm::DisableButtons() { btStart->Enabled = false; btFirst->Enabled = false; btLast->Enabled = false; btNext->Enabled = false; btPrev->Enabled = false; btSearch->Enabled = false; btBackup->Enabled=false; btRestore->Enabled=false; btDupl->Enabled=false; ... |
| example enablebuttons | ... void __fastcall TMainForm::EnableButtons() { btStart->Enabled = true; btFirst->Enabled = true; btLast->Enabled = true; btNext->Enabled = true; btPrev->Enabled = true; btSearch->Enabled = true; btBackup->Enabled=true; btRestore->Enabled=true; btDupl->Enabled=true; btClear->E... |
| btstart | |
| example include | ...m : public TForm { __published: // IDE-managed Components TPageControl *PageControl1; TTabSheet *TabSheet2; TButton *btStart; TLabel *Label15; TEdit *eWord; TMemo *mWord; TLabel *lelapsed; TStatusBar *StatusBar1; TBu... |
| btstartclick | |
| example include | ...oid __fastcall FormCreate(TObject *Sender); void __fastcall FormClose(TObject *Sender, TCloseAction &Action); void __fastcall btStartClick(TObject *Sender); void __fastcall btSearchClick(TObject *Sender); void __fastcall btFirstClick(TObject *Sender); vo... |
| example start | ... void __fastcall TMainForm::btStartClick(TObject *Sender) { char tmp[250]; char name[250]; char html[250]; int i; FILE *fp; int rc; char buffer[BUF_LEN]; struct time t; int nbsec1,nbsec2; int hund1,hund2; int nbf; int K; TCursor oldCursor = Screen->Cursor; if (cb->Checked==tr... |
| btupdate- | |
| example disablebuttons | ...Enabled=false; btUpdate->Enabled=false; btDelete->Enabled=false; } ... |
| example enablebuttons | ...Enabled=true; btUpdate->Enabled=true; btDelete->Enabled=true; } ... |
| btupdate | |
| example include | ... TBevel *Bevel1; TBevel *Bevel2; TCheckBox *CheckBox1; TBevel *Bevel3; TLabel *Label1; TButton *btUpdate; TButton *btDelete; TButton *btDupl; TButton *btClear; TButton *btAdd; TCheckBox *cbSec; T... |
| btupdateclick | |
| example include | ...lick(TObject *Sender); void __fastcall eWordKeyUp(TObject *Sender, WORD &Key, TShiftState Shift); void __fastcall btUpdateClick(TObject *Sender); void __fastcall btDeleteClick(TObject *Sender); void __fastcall btDuplClick(TObject *Sender); voi... |
| example update | ... void __fastcall TMainForm::btUpdateClick(TObject *Sender) { char buffer[BUF_LEN]; int rc; // M_recdata is supposed to store the address of the data record mWord->GetTextBuf(buffer,BUF_LEN); rc = dict->RewriteRecord(buffer, strlen(buffer)+1,M_recdata); StatusBar1->SimpleText="Entry U... |
| btversion | |
| example include | ... TButton *btClear; TButton *btAdd; TCheckBox *cbSec; TLabel *lIndex; TLabel *Label3; TButton *btVersion; void __fastcall FormCreate(TObject *Sender); void __fastcall FormClose(TObject *Sender, TCloseAction &Action); ... |
| btversionclick | |
| example include | ...ender); void __fastcall btClearClick(TObject *Sender); void __fastcall btAddClick(TObject *Sender); void __fastcall btVersionClick(TObject *Sender); private: // User declarations #define MAX_KEY 250 #define BUF_LEN 50000 struct time t1; struct time t2; ... |
| example version | ... void __fastcall TMainForm::btVersionClick(TObject *Sender) { char version[100]; dict->Version(version); Application->MessageBoxA(version,"Version",MB_OK); } //--------------------------------------------------------------------------- ... |
| buf_len | |
| example add | ... void __fastcall TMainForm::btAddClick(TObject *Sender) { char Key[MAX_KEY],RetKey[MAX_KEY]; int rc, recdata; char buffer[BUF_LEN],str[BUF_LEN]; strcpy(Key,eWord->Text.c_str()); if (strlen(Key)==0) { Application->MessageBoxA("Key not provided","RealIsam",MB_OK); return; ... |
| example add | ...GetTextBuf(buffer,BUF_LEN); rc = dict->ReadDirectKey(INDEX,Key,RetKey,&recdata); if (rc) // Exists if == 1 { if (multi==0) // Unique Keys : Concatenate definitions { rc=dict->ReadRecord(str,recdata); strcat(str,"\r\n"); strcat(str,buffer); ... |
| example add | ... void __fastcall TMainForm::btAddClick(TObject *Sender) { char Key[MAX_KEY],RetKey[MAX_KEY]; int rc, recdata; char buffer[BUF_LEN],str[BUF_LEN]; strcpy(Key,eWord->Text.c_str()); if (strlen(Key)==0) { Application->MessageBoxA("Key not provided","RealIsam",MB_OK); return; ... |
| example backup | ...id __fastcall TMainForm::btBackupClick(TObject *Sender) { int rc,recdata; char Key[MAX_KEY],RetKey[MAX_KEY]; char buffer[BUF_LEN]; char html[BUF_LEN]; char definition[BUF_LEN]; int nbseq,nbisam; struct time t; int nbsec1,nbsec2; TCursor oldCursor = Screen->Cursor; char tmp[250]; char ... |
| example backup | ...ackupClick(TObject *Sender) { int rc,recdata; char Key[MAX_KEY],RetKey[MAX_KEY]; char buffer[BUF_LEN]; char html[BUF_LEN]; char definition[BUF_LEN]; int nbseq,nbisam; struct time t; int nbsec1,nbsec2; TCursor oldCursor = Screen->Cursor; char tmp[250]; char *p,*p1; FILE *fp; strc... |
| example backup | ... void __fastcall TMainForm::btBackupClick(TObject *Sender) { int rc,recdata; char Key[MAX_KEY],RetKey[MAX_KEY]; char buffer[BUF_LEN]; char html[BUF_LEN]; char definition[BUF_LEN]; int nbseq,nbisam; struct time t; int nbsec1,nbsec2; TCursor oldCursor = Screen->Cursor; char tmp[250]; c... |
| example duplicate | ...plClick(TObject *Sender) { char name[MAX_PATH]; int rc, recdata,recdata_dupli; dupli = new realisam(); char RetKey[MAX_KEY]; char buffer[BUF_LEN]; char tmp[250]; strcpy(tmp,"Do you want to build a duplicate dictionnary : files Dupli.ndx and Dupli.dat ? "); if (Application->MessageB... |
| example first | ... void __fastcall TMainForm::First() { int rc,recdata; char Key[MAX_KEY],RetKey[MAX_KEY]; char buffer[BUF_LEN]; char tmp[50]; INDEX=0; mWord->Clear(); rc = dict->ReadFirstKey(INDEX,RetKey,&recdata); RK->Caption=AnsiString(RetKey); eWord->Text=AnsiString(RetKey); if (rc==1... |
| example include | ...dClick(TObject *Sender); void __fastcall btVersionClick(TObject *Sender); private: // User declarations #define MAX_KEY 250 #define BUF_LEN 50000 struct time t1; struct time t2; int nbsec1,nbsec2,delta; realisam *dict; // working database realisam *dupli... |
| example indexbuffer | ... ///////////////////////////////////////////////////// int __fastcall TMainForm::IndexBuffer(char *buff) { char str[BUF_LEN],definition[BUF_LEN]; int length; char Key[MAX_KEY],RetKey[MAX_KEY]; int rc,recdata; char *p; char SKey[MAX_KEY]; int l,i; length=ExtractValue(str,buff,"P",0);... |
| example indexbuffer | ... ///////////////////////////////////////////////////// int __fastcall TMainForm::IndexBuffer(char *buff) { char str[BUF_LEN],definition[BUF_LEN]; int length; char Key[MAX_KEY],RetKey[MAX_KEY]; int rc,recdata; char *p; char SKey[MAX_KEY]; int l,i; length=ExtractValue(str,buff,"P",0);... |
| example last | ... void __fastcall TMainForm::btLastClick(TObject *Sender) { int rc,recdata; char Key[MAX_KEY],RetKey[MAX_KEY]; char buffer[BUF_LEN]; rc = dict->ReadLastKey(INDEX,RetKey,&recdata); RK->Caption=AnsiString(RetKey); eWord->Text=AnsiString(RetKey); if (rc==1) { mWord->Clear(); ... |
| example next | ... void __fastcall TMainForm::btNextClick(TObject *Sender) { int rc,recdata; char Key[MAX_KEY],RetKey[MAX_KEY]; char buffer[BUF_LEN]; rc = dict->ReadNextKey(RetKey,&recdata); RK->Caption=AnsiString(RetKey); eWord->Text=AnsiString(RetKey); if (rc==1) { mWord->Clear(); ... |
| example prev | ... void __fastcall TMainForm::btPrevClick(TObject *Sender) { int rc,recdata; char Key[MAX_KEY],RetKey[MAX_KEY]; char buffer[BUF_LEN]; rc = dict->ReadPrevKey(RetKey,&recdata); RK->Caption=AnsiString(RetKey); eWord->Text=AnsiString(RetKey); if (rc==1) { mWord->Clear(); rc... |
| example restore | ... void __fastcall TMainForm::btRestoreClick(TObject *Sender) { char tmp[250]; char name[250]; FILE *fp; int rc,nbisam; char buffer[BUF_LEN]; struct time t; int nbsec1,nbsec2; strcpy(tmp,"Restore Data from Dict.txt ? \r\n Isam Files will be deleted, and rebuilt"); if (Application-... |
| example restore | ... return; } nbrecords=0; nbisam=0; // read sequential data while (!feof(fp)) { buffer[0]=0; fgets(buffer,BUF_LEN,fp); if (strlen(buffer)>0) { nbisam++; IndexBuffer(buffer); } else nbrecords=nbrecords; Application->ProcessMessa... |
| example search | ...---------------------------------- void __fastcall TMainForm::Search() { int rc,recdata; char Key[MAX_KEY],RetKey[MAX_KEY]; char buffer[BUF_LEN]; char tmp[256]; if (eWord->Text=="") { mWord->Clear(); return; } INDEX=0; strcpy(Key,eWord->Text.c_str()); strlwr(Key); rc = d... |
| example start | ..._fastcall TMainForm::btStartClick(TObject *Sender) { char tmp[250]; char name[250]; char html[250]; int i; FILE *fp; int rc; char buffer[BUF_LEN]; struct time t; int nbsec1,nbsec2; int hund1,hund2; int nbf; int K; TCursor oldCursor = Screen->Cursor; if (cb->Checked==true) mult... |
| example start | ...Cursor = oldCursor; return; } // read sequential data while (!feof(fp)) { tmp[0]=0; fgets(buffer,BUF_LEN,fp); // IndexBuffer(buffer); Application->ProcessMessages(); } fclose(fp); } int nbk = dict->NumberOfKeys(INDEX)... |
| example update | ... void __fastcall TMainForm::btUpdateClick(TObject *Sender) { char buffer[BUF_LEN]; int rc; // M_recdata is supposed to store the address of the data record mWord->GetTextBuf(buffer,BUF_LEN); rc = dict->RewriteRecord(buffer, strlen(buffer)+1,M_recdata); StatusBar1->SimpleText="Entry U... |
| example update | ...GetTextBuf(buffer,BUF_LEN); rc = dict->RewriteRecord(buffer, strlen(buffer)+1,M_recdata); StatusBar1->SimpleText="Entry Updated"; } //--------------------------------------------------------------------------- ... |
| buff | |
| example extractvalue | ..."); p = strstr(buff,tmp); l=0; if (p) { strcpy(tmp,"... |
| example extractvalue | ..."); p1= strstr(buff,tmp); if (p1) { p2=p + strlen(tag)+2; l= p1-p2; strncpy(result,p2,l); result[l]=0; } } return l; } ... |
| example extractvalue | ... int __fastcall TMainForm::ExtractValue(char *result, char *buff, char *tag, int posdeb) { char tmp[250]; char *p,*p1,*p2; int pos,l; result[0]=0; strcpy(tmp,"... |
| example include | ..._recdata; // memorizes data record pointer char M_Key[MAX_KEY]; // memorizes Key int __fastcall ExtractValue(char *result, char *buff, char *tag, int posdeb); int __fastcall IndexBuffer(char *buff); void __fastcall Search(); void __fastcall First(); void __fastcal... |
| example include | ...AX_KEY]; // memorizes Key int __fastcall ExtractValue(char *result, char *buff, char *tag, int posdeb); int __fastcall IndexBuffer(char *buff); void __fastcall Search(); void __fastcall First(); void __fastcall EnableButtons(); void __fastcall DisableButtons(); public:... |
| example indexbuffer | ... ///////////////////////////////////////////////////// int __fastcall TMainForm::IndexBuffer(char *buff) { char str[BUF_LEN],definition[BUF_LEN]; int length; char Key[MAX_KEY],RetKey[MAX_KEY]; int rc,recdata; char *p; char SKey[MAX_KEY]; int l,i; length=ExtractValue(str,buff,"P",0);... |
| example indexbuffer | ...ion[BUF_LEN]; int length; char Key[MAX_KEY],RetKey[MAX_KEY]; int rc,recdata; char *p; char SKey[MAX_KEY]; int l,i; length=ExtractValue(str,buff,"P",0); // extract a paragraph ... |
| buffer | |
| example add | ...GetTextBuf(buffer,BUF_LEN); rc = dict->ReadDirectKey(INDEX,Key,RetKey,&recdata); if (rc) // Exists if == 1 { if (multi==0) // Unique Keys : Concatenate definitions { rc=dict->ReadRecord(str,recdata); strcat(str,"\r\n"); strcat(str,buffer); ... |
| example add | ... void __fastcall TMainForm::btAddClick(TObject *Sender) { char Key[MAX_KEY],RetKey[MAX_KEY]; int rc, recdata; char buffer[BUF_LEN],str[BUF_LEN]; strcpy(Key,eWord->Text.c_str()); if (strlen(Key)==0) { Application->MessageBoxA("Key not provided","RealIsam",MB_OK); return; ... |
| example add | ...WriteRecord(buffer,strlen(buffer)+1); } } else // Key does not exist { recdata=dict->GetNewRecordNumber(); rc = dict->WriteKey(INDEX,Key,recdata); rc = dict->WriteRecord(buffer,strlen(buffer)+1); } StatusBar1->SimpleText="Entry Added"; } //-... |
| example add | ...WriteRecord(buffer,strlen(buffer)+1); } } else // Key does not exist { recdata=dict->GetNewRecordNumber(); rc = dict->WriteKey(INDEX,Key,recdata); rc = dict->WriteRecord(buffer,strlen(buffer)+1); } StatusBar1->SimpleText="Entry Added"; } //-... |
| example add | ...ReadRecord(str,recdata); strcat(str,"\r\n"); strcat(str,buffer); rc = dict->RewriteRecord(str, strlen(str)+1,recdata); } else { recdata=dict->GetNewRecordNumber(); rc = dict->WriteKey(INDEX,Key,recdata); rc = dict->WriteReco... |
| example add | ...WriteRecord(buffer,strlen(buffer)+1); } StatusBar1->SimpleText="Entry Added"; } //--------------------------------------------------------------------------- ... |
| example add | ...WriteRecord(buffer,strlen(buffer)+1); } StatusBar1->SimpleText="Entry Added"; } //--------------------------------------------------------------------------- ... |
| example backup | ... void __fastcall TMainForm::btBackupClick(TObject *Sender) { int rc,recdata; char Key[MAX_KEY],RetKey[MAX_KEY]; char buffer[BUF_LEN]; char html[BUF_LEN]; char definition[BUF_LEN]; int nbseq,nbisam; struct time t; int nbsec1,nbsec2; TCursor oldCursor = Screen->Cursor; char tmp[250]; c... |
| example backup | ...==1) { strcpy(html,"<P><B>"); strcat(html,RetKey); strcat(html,"</B> (<I></I>) "); strcat(html,buffer); strcat(html,"</P>\n"); fputs(html,fp); nbseq++; } else // extract concatenated items ... |
| example backup | ...ReadRecord(buffer,recdata); if (rc) { nbisam++; if (multi==1) { strcpy(html,"<P><B>"); strcat(html,RetKey); strcat(html,"</B> (<I></I>) "); strcat(html,buffer); strcat(html,"</P>\n"); fputs... |
| example backup | ...rcat(html,"</P>\n"); fputs(html,fp); nbseq++; } else // extract concatenated items { p1=buffer; p=strchr(p1,'\r'); while (p) { *p=0; p++; *p=0; strcpy(html,"<P><B>")... |
| example duplicate | ...rm::btDuplClick(TObject *Sender) { char name[MAX_PATH]; int rc, recdata,recdata_dupli; dupli = new realisam(); char RetKey[MAX_KEY]; char buffer[BUF_LEN]; char tmp[250]; strcpy(tmp,"Do you want to build a duplicate dictionnary : files Dupli.ndx and Dupli.dat ? "); if (Application->... |
| example duplicate | ...WriteRecord(buffer,strlen(buffer)+1); rc = dict->ReadNextKey(RetKey,&recdata); } dupli->CloseEngine(); First(); Screen->Cursor = oldCursor; EnableButtons(); Application->MessageBoxA("Duplication Finished","RealIsam",MB_OK); } //---------------------------------------------... |
| example duplicate | ...WriteRecord(buffer,strlen(buffer)+1); rc = dict->ReadNextKey(RetKey,&recdata); } dupli->CloseEngine(); First(); Screen->Cursor = oldCursor; EnableButtons(); Application->MessageBoxA("Duplication Finished","RealIsam",MB_OK); } //---------------------------------------------... |
| example duplicate | ...ReadRecord(buffer,recdata); recdata_dupli=dupli->GetNewRecordNumber(); rc = dupli->WriteKey(INDEX,RetKey,recdata_dupli); rc = dupli->WriteRecord(buffer,strlen(buffer)+1); rc = dict->ReadNextKey(RetKey,&recdata); } dupli->CloseEngine(); First(); Screen->Cursor = ... |
| example first | ... void __fastcall TMainForm::First() { int rc,recdata; char Key[MAX_KEY],RetKey[MAX_KEY]; char buffer[BUF_LEN]; char tmp[50]; INDEX=0; mWord->Clear(); rc = dict->ReadFirstKey(INDEX,RetKey,&recdata); RK->Caption=AnsiString(RetKey); eWord->Text=AnsiString(RetKey); if (rc==1... |
| example first | ...ReadRecord(buffer,recdata); M_recdata=recdata; strcpy(M_Key,RetKey); if (rc) mWord->SetTextBuf(buffer); } } void __fastcall TMainForm::btFirstClick(TObject *Sender) { First(); } //--------------------------------------------------------------------------- ... |
| example first | ...SetTextBuf(buffer); } } void __fastcall TMainForm::btFirstClick(TObject *Sender) { First(); } //--------------------------------------------------------------------------- ... |
| example indexbuffer | ... Buffer Indexation... |
| example last | ...ReadRecord(buffer,recdata); M_recdata=recdata; strcpy(M_Key,RetKey); if (rc) mWord->SetTextBuf(buffer); } } //--------------------------------------------------------------------------- ... |
| example last | ...SetTextBuf(buffer); } } //--------------------------------------------------------------------------- ... |
| example last | ... void __fastcall TMainForm::btLastClick(TObject *Sender) { int rc,recdata; char Key[MAX_KEY],RetKey[MAX_KEY]; char buffer[BUF_LEN]; rc = dict->ReadLastKey(INDEX,RetKey,&recdata); RK->Caption=AnsiString(RetKey); eWord->Text=AnsiString(RetKey); if (rc==1) { mWord->Clear(); ... |
| example next | ... void __fastcall TMainForm::btNextClick(TObject *Sender) { int rc,recdata; char Key[MAX_KEY],RetKey[MAX_KEY]; char buffer[BUF_LEN]; rc = dict->ReadNextKey(RetKey,&recdata); RK->Caption=AnsiString(RetKey); eWord->Text=AnsiString(RetKey); if (rc==1) { mWord->Clear(); ... |
| example next | ...ReadRecord(buffer,recdata); M_recdata=recdata; strcpy(M_Key,RetKey); if (rc) mWord->SetTextBuf(buffer); } } //--------------------------------------------------------------------------- ... |
| example next | ...SetTextBuf(buffer); } } //--------------------------------------------------------------------------- ... |
| example prev | ...ReadRecord(buffer,recdata); M_recdata=recdata; strcpy(M_Key,RetKey); if (rc) mWord->SetTextBuf(buffer); } } //--------------------------------------------------------------------------- ... |
| example prev | ...SetTextBuf(buffer); } } //--------------------------------------------------------------------------- ... |
| example prev | ... void __fastcall TMainForm::btPrevClick(TObject *Sender) { int rc,recdata; char Key[MAX_KEY],RetKey[MAX_KEY]; char buffer[BUF_LEN]; rc = dict->ReadPrevKey(RetKey,&recdata); RK->Caption=AnsiString(RetKey); eWord->Text=AnsiString(RetKey); if (rc==1) { mWord->Clear(); rc... |
| example restore | ... void __fastcall TMainForm::btRestoreClick(TObject *Sender) { char tmp[250]; char name[250]; FILE *fp; int rc,nbisam; char buffer[BUF_LEN]; struct time t; int nbsec1,nbsec2; strcpy(tmp,"Restore Data from Dict.txt ? \r\n Isam Files will be deleted, and rebuilt"); if (Application-... |
| example restore | ...Cursor = oldCursor; return; } nbrecords=0; nbisam=0; // read sequential data while (!feof(fp)) { buffer[0]=0; fgets(buffer,BUF_LEN,fp); if (strlen(buffer)>0) { nbisam++; IndexBuffer(buffer); } else nbrecords=nbrecords; ... |
| example restore | ...; return; } nbrecords=0; nbisam=0; // read sequential data while (!feof(fp)) { buffer[0]=0; fgets(buffer,BUF_LEN,fp); if (strlen(buffer)>0) { nbisam++; IndexBuffer(buffer); } else nbrecords=nbrecords; Application->Proc... |
| example restore | ...ds=0; nbisam=0; // read sequential data while (!feof(fp)) { buffer[0]=0; fgets(buffer,BUF_LEN,fp); if (strlen(buffer)>0) { nbisam++; IndexBuffer(buffer); } else nbrecords=nbrecords; Application->ProcessMessages(); } fclose(f... |
| example restore | ...0) { nbisam++; IndexBuffer(buffer); } else nbrecords=nbrecords; Application->ProcessMessages(); } fclose(fp); int nbk = dict->NumberOfKeys(INDEX); StatusBar1->SimpleText = "Number of Keys: " + AnsiString(nbk); lRecords->Caption = AnsiString(nbi... |
| example search | ...------------------------------------------ void __fastcall TMainForm::Search() { int rc,recdata; char Key[MAX_KEY],RetKey[MAX_KEY]; char buffer[BUF_LEN]; char tmp[256]; if (eWord->Text=="") { mWord->Clear(); return; } INDEX=0; strcpy(Key,eWord->Text.c_str()); strlwr(Key); ... |
| example search | ...ReadRecord(buffer,recdata); if (rc) { mWord->Clear(); mWord->SetTextBuf(buffer); } } else { mWord->SetTextBuf("Word Not Found"); } M_recdata=recdata; strcpy(M_Key,RetKey); } ... |
| example search | ...SetTextBuf(buffer); } } else { mWord->SetTextBuf("Word Not Found"); } M_recdata=recdata; strcpy(M_Key,RetKey); } ... |
| example start | ... void __fastcall TMainForm::btStartClick(TObject *Sender) { char tmp[250]; char name[250]; char html[250]; int i; FILE *fp; int rc; char buffer[BUF_LEN]; struct time t; int nbsec1,nbsec2; int hund1,hund2; int nbf; int K; TCursor oldCursor = Screen->Cursor; if (cb->Checked==tr... |
| example start | ...Cursor = oldCursor; return; } // read sequential data while (!feof(fp)) { tmp[0]=0; fgets(buffer,BUF_LEN,fp); // IndexBuffer(buffer); Application->ProcessMessages(); } fclose(fp); } int nbk = dict->NumberOfKeys(INDEX)... |
| example start | ... return; } // read sequential data while (!feof(fp)) { tmp[0]=0; fgets(buffer,BUF_LEN,fp); // IndexBuffer(buffer); Application->ProcessMessages(); } fclose(fp); } int nbk = dict->NumberOfKeys(INDEX); lRecords->Caption = AnsiStri... |
| example update | ... void __fastcall TMainForm::btUpdateClick(TObject *Sender) { char buffer[BUF_LEN]; int rc; // M_recdata is supposed to store the address of the data record mWord->GetTextBuf(buffer,BUF_LEN); rc = dict->RewriteRecord(buffer, strlen(buffer)+1,M_recdata); StatusBar1->SimpleText="Entry U... |
| example update | ...GetTextBuf(buffer,BUF_LEN); rc = dict->RewriteRecord(buffer, strlen(buffer)+1,M_recdata); StatusBar1->SimpleText="Entry Updated"; } //--------------------------------------------------------------------------- ... |
| example update | ...RewriteRecord(buffer, strlen(buffer)+1,M_recdata); StatusBar1->SimpleText="Entry Updated"; } //--------------------------------------------------------------------------- ... |
| example update | ...RewriteRecord(buffer, strlen(buffer)+1,M_recdata); StatusBar1->SimpleText="Entry Updated"; } //--------------------------------------------------------------------------- ... |
| index_summary item39 | ...Buffer Indexation... |
| realisamdoc getnew | ...WriteKey(0,key,recdata); // index 0 if (!rc) { error / duplicate key... } else { // data are stored in buffer rc = db1->WriteRecord(buffer,strlen(buffer)); .............. } ................. // end rc = db1->CloseEngine(); rc = db2->Clos... |
| realisamdoc getnew | ...WriteRecord(buffer,strlen(buffer)); .............. } ................. // end rc = db1->CloseEngine(); rc = db2->CloseEngine(); ... |
| realisamdoc getnew | ...WriteRecord(buffer,strlen(buffer)); .............. } ................. // end rc = db1->CloseEngine(); rc = db2->CloseEngine(); ... |
| realisamdoc number | ...WriteRecord(buffer,strlen(buffer)+1); .............. ... |
| realisamdoc number | ...WriteRecord(buffer,strlen(buffer)+1); .............. ... |
| realisamdoc readdirect | ...ReadRecord(buffer,recdata); buffer[rc]=0; ............. } else ............ ... |
| realisamdoc readdirect | ...ReadRecord(buffer,recdata); buffer[rc]=0; ............. } else ............ ... |
| realisamdoc readfirst | ...ReadRecord(buffer,recdata); buffer[rc]=0; ............. } else ............ // another example : sequential reading of a file rc = db->ReadFirstKey(0,RetKey,&recdata); while (rc) { rc=db->ReadRecord(buffer,recdata); // processs the record ..................... |
| realisamdoc readfirst | ...ReadRecord(buffer,recdata); buffer[rc]=0; ............. } else ............ // another example : sequential reading of a file rc = db->ReadFirstKey(0,RetKey,&recdata); while (rc) { rc=db->ReadRecord(buffer,recdata); // processs the record ..................... |
| realisamdoc readfirst | ...ReadRecord(buffer,recdata); // processs the record ............................. rc=db->ReadNextKey(RetKey,&recdata); // rc = 0 if end of file (last key of index) } ................... ... |
| realisamdoc readlast | ...ReadRecord(buffer,recdata); buffer[rc]=0; ............. } else ............ ... |
| realisamdoc readlast | ...ReadRecord(buffer,recdata); buffer[rc]=0; ............. } else ............ ... |
| realisamdoc readnext | ...ReadRecord(buffer,recdata); // process buffer ................ rc =db->ReadNextKey(ReturnKey,&recdata); } ................. ... |
| realisamdoc readnext | ...ReadRecord(buffer,recdata); // process buffer ................ rc =db->ReadNextKey(ReturnKey,&recdata); } ................. ... |
| realisamdoc readprev | ..................... ................. // procedure int rc, recdata; char ReturnKey[100]; // example : read a file in the reverse order // buffer is supposed to be allocated rc = db->ReadLast(0,ReturnKey,&recdata); while (rc) { rc = db->ReadRecord(buffer,recdata); // proces... |
| realisamdoc readprev | ...ReadRecord(buffer,recdata); // process data here .................. rc=db->ReadPrevKey(ReturnKey,recdata); } ... |
| realisamdoc readrecord | ... Read a data record. A character string pointer un pointeur is provided as a receiving buffer. The memory allocated for this transfer must be large enough to receive the data. If the length is totally unknown, a call to RecordLength function allows to allocate the right amount of memory. ReadRec... |
| realisamdoc readrecord | ...nstructor or setup ................ db = new realisam(); ................ // procedure int rc; int recdata; char ReturnKey[100]; char *buffer; buffer = mem_alloc(10000); if (!buffer) return -1; rc = db->ReadDirectKey(0,"microsoft",ReturnKey,&recdata); if (rc) { rc=db->Rea... |
| realisamdoc readrecord | ...r setup ................ db = new realisam(); ................ // procedure int rc; int recdata; char ReturnKey[100]; char *buffer; buffer = mem_alloc(10000); if (!buffer) return -1; rc = db->ReadDirectKey(0,"microsoft",ReturnKey,&recdata); if (rc) { rc=db->ReadRecord(buf... |
| realisamdoc readrecord | ...ew realisam(); ................ // procedure int rc; int recdata; char ReturnKey[100]; char *buffer; buffer = mem_alloc(10000); if (!buffer) return -1; rc = db->ReadDirectKey(0,"microsoft",ReturnKey,&recdata); if (rc) { rc=db->ReadRecord(buffer,&recdata); buffer[rc]=0; ... |
| realisamdoc readrecord | ...ReadRecord(char *buffer,int recdata); db is a database pointer. ... |
| realisamdoc readrecord | ...buffer : pointer on a character string ... |
| realisamdoc readrecord | ...ReadRecord(buffer,&recdata); buffer[rc]=0; // to end with a 0x00 .......................... } else ................ ... |
| realisamdoc readrecord | ...ReadRecord(buffer,&recdata); buffer[rc]=0; // to end with a 0x00 .......................... } else ................ ... |
| realisamdoc recordlength | ...RecordLength(recdata); if (len) { buffer = malloc(len+2); .... } else { ... empty ...} } .......... ... |
| realisamdoc rewriterecord | ...RewriteRecord(buffer, strlen(buffer+1),recdata); } ... |
| realisamdoc rewriterecord | ...RewriteRecord(buffer, strlen(buffer+1),recdata); } ... |
| realisamdoc rewriterecord | ...buffer : pointer on the data to write ... |
| realisamdoc rewriterecord | ...RewriteRecord(char *buffer, int len, int recdata); db is a database pointer. ... |
| realisamdoc rewriterecord | ............... //APPLIC.CPP // constructor or setup ................ db = new realisam(); ................ // procedure int rc; char buffer [500]; int recdata; char RetKey[100]; // read data rc = db->ReadDirectKey(0,"microbiology",RetKey,&recdata); if (rc) //ok { rc = db... |
| realisamdoc rewriterecord | ...ReadRecord(buffer,recdata); // rc is the record length and supposed to be less than 500 .... process data in buffer..... rc = db->RewriteRecord(buffer, strlen(buffer+1),recdata); } ... |
| realisamdoc rewriterecord | ...ReadRecord(buffer,recdata); // rc is the record length and supposed to be less than 500 .... process data in buffer..... rc = db->RewriteRecord(buffer, strlen(buffer+1),recdata); } ... |
| realisamdoc writerecord | ...WriteRecord(char *buffer,int lendata); db is the database pointer. ... |
| realisamdoc writerecord | ... buffer contains data to write. lendata is the length of data ... |
| realisamdoc writerecord | ...ptr is a pointer on the address of buffer. ... |
| realisamdoc writerecord | ...CloseEngine(); ....................... // procedure int rc; char RetKey[100]; int recdata; // new key to insert = "microsoft" // buffer contains the data recdata=db->GetNewRecordNumber(); rc = db->WriteKey(0,"microsoft",recdata); if (rc) // key insert ok { db->WriteRecor... |
| realisamdoc writerecord | ...WriteRecord(buffer,strlen(buffer)+1); ....... } else ............. ... |
| realisamdoc writerecord | ...WriteRecord(buffer,strlen(buffer)+1); ....... } else ............. ... |
| build | |
| example duplicate | ..., recdata,recdata_dupli; dupli = new realisam(); char RetKey[MAX_KEY]; char buffer[BUF_LEN]; char tmp[250]; strcpy(tmp,"Do you want to build a duplicate dictionnary : files Dupli.ndx and Dupli.dat ? "); if (Application->MessageBoxA(tmp,"Isam Dictionary",MB_YESNO)==IDNO) return; ... |
| example principle | ...Build also another Index (index 1) ... |
| example principle | ... The goal of this application is to build a dictionary from sequential files provided by the webster dictionnary. Each sequential file is associated to a letter : wb_a, wb_b, .... wb_z. Sequential files should installed in a subdirectory ("dictionary") of your application. The program will buil... |
| example principle | ...ed to a letter : wb_a, wb_b, .... wb_z. Sequential files should installed in a subdirectory ("dictionary") of your application. The program will build an Isam database, where entries can be accessed directly or sequentially. ... |
| example principle | ...How to Build the Index... |
| builder | |
| example source | ... This program is written using the Borland C++ Builder (Version BCB5) ... |
| button | |
| example include | ...vClick(TObject *Sender); void __fastcall Exit2Click(TObject *Sender); void __fastcall mWordMouseUp(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y); void __fastcall btBackupClick(TObject *Sender); void __fastcall btRestoreClick(TO... |
| example principle | ...Search for a word : Enter a Word and click on the "Search" button ... |
| example wordmouseup | ... void __fastcall TMainForm::mWordMouseUp(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y) { char tmp[200]; mWord->GetSelTextBuf(tmp,100); if (strlen(tmp)==0) return; eWord->Text=AnsiString(tmp); Search(); } //---------------------------------------------... |
| buttons | |
| example disablebuttons | ... Disable Buttons... |
| example enablebuttons | ... Enable Buttons... |
| index_summary item55 | ...e Buttons... |
| index_summary item56 | ...le Buttons... |
| byte | |
| realisamdoc writerecord | ...ordNumber. Data can be text or binary. Length is a parameter to provide . For characters strings ended with 0x00, the developer can insert the last byte 0x00, or can insert it when the program read the data. ... |
| bytes | |
| realisamdoc open | ...physical block length . This value is not the real data length, but an average size. realisam will write data in consecutive blocks of datalen + 8 bytes. If real length is less than datalen, a physical block of datalen+8 bytes will be allocated and written. If data length is bigger than datalen, a ... |
| realisamdoc open | ...rage size. realisam will write data in consecutive blocks of datalen + 8 bytes. If real length is less than datalen, a physical block of datalen+8 bytes will be allocated and written. If data length is bigger than datalen, a second block is allocated, and so on... The Windows file management system... |
| realisamdoc open | .... If data length is bigger than datalen, a second block is allocated, and so on... The Windows file management system works with multiples of 1024 bytes, and we recommand to work with datalen+8 such as 120 , 248, 504, 1016,2040 ... bytes in order to improve the access time. ... |
| realisamdoc open | ...e Windows file management system works with multiples of 1024 bytes, and we recommand to work with datalen+8 such as 120 , 248, 504, 1016,2040 ... bytes in order to improve the access time. ... |
| realisamdoc overview | ...not try to classify data in numeric, date or text fields : it writes binary or text data according the length specified, and returns all these bytes when a reading operation is required. It is the responsability of the developer to organize records and to know how to extract the fields. Real... |
