PC SOFT

ONLINE HELP
 WINDEV, WEBDEV AND WINDEV MOBILE
  • Example: Reindexing a data file
Example: Reindexing a data file
WINDEV
This example is used to reindex a data file selected in a List Box control named LIST_FileList. A standard reindex operation is performed.
FileToReindex is string
 
// Initialize with the current element in the List Box control
FileToReindex = LIST_FileList[LIST_FileList]
 
IF YesNo("Do you want to reindex the data file?") = Yes THEN
// Initialize the hourglass
HourGlass()
// Make the Progress Bar control visible
PROGBAR_ProgBar1.Visible = True
// Reindex  the data file
IF HIndex(FileToReindex, hNdxNormal, PROGBAR_ProgBar1) = True THEN
// Reindexing successful
// Redisplay the Table control
TableDisplay(TABLE_Table1, taStart)
// Disable the hourglass
HourGlass(False)
Info("The indexing operation of the data file " + ...
FileToReindex + " is completed.")
// Make the Progress Bar control invisible
PROGBAR_ProgBar1.Visible = False
ELSE
// The reindexing failed
Info("Problem reindexing data file " + FileToReindex)
END
END
Minimum version required
  • Version 9
This page is also available for…
Comments
Click [Add] to post a comment