Tenho uma thread
que quero que atualize um progress bar a cada iteração de uma TQuery
por exemplo, porém o que eu notei é que para realizar o processo da query, tenho que colocar a função que faz select dentro da thread, como exemplo abaixo:
procedure TGeradorArquivos.GeraArquivo;
var
CaminhoArquivo: String;
Arquivo: TextFile;
begin
Self.Query.Sql.Clear;
Self.Query.Sql.Add('Select * from Teste');
Self.Query.open;
if Self.Query.Recordcount > 0 then
begin
AssignFile(Arquivo,CaminhoArquivo);
Rewrite(Arquivo);
FrmTeste.ProgressBar.Max := Self.Query.RecordCount;
try
while not Self.Query.Eof do
begin
Write(Arquivo,Self.Query.FieldByName('Campo').AsString);
FrmTeste.ProgressBar.StebBy(1);
Self.Query.Next;
end;
finally
CloseFile(Arquivo);
end;
end;
end;
tem algum jeito de desvincular a função para atualizar a progress bar? Ou seja tirar o select dessa thread e deixar apenas para atualizar a GUI do formulário?