To display the progress of a longer sqlite-query you can use BWidget::ProgressBar (or ProgressDlg).
package require Tk