Forum: Datenbanken
Delphi
by Fritz01,
17. Dez 2007
@ pfoto,
danke für Antwort.
OnShow ergibt: Eigenschaft Visible kann in OnShow oder OnHide nicht verändert werden.
Deshalb in Paint.
Falls es da wirklich keine Möglichkeit gibt muß man das wohl vergessen. Schade!
Nochmals danke
Fritz
Forum: Datenbanken
Delphi
by Fritz01,
17. Dez 2007
Hallo,
möchte erreichen, dass während der Indexerstellung der Fortschritt mittels Progressbar angezeigt wird. Habe das mal so gemacht. Die Procedure wird mit frmUpdate.Show; aufgerufen.
procedure TfrmUpdate.FormPaint(Sender: TObject);
var i,s,t : integer;
begin
t := frmMain.tTable.RecordCount;
s := t div ProgressBar.max;
for i := 0 to ProgressBar.max do
begin
...