Cita:
Empezado por rzf1983
mas o menos si es mi problema, pero no del todo, a ver si me explico mejor.
Tngo una dll con una funcion codificar ("archivo entrada","archivo salida"). Dentro de esa funcion si es facil calcular el porcentaje que llevamos comprimido. El problema es cuando en delphi llamo a la funcion:
procedure TForm1.Button1Click(Sender: TObject);
begin
//Foo(PChar(a), PChar(b));
codificar (Pchar(archivoin),Pchar(archivoout),);
end;
He usado un timer para lo d la progressbar pero claro, yo creo que cuando llamo a codificar, delphi no puede atender al timer mientras no aya acabado la funcion codificar. Lo unico que e conseguido es que cuando termina esa funcion entonces si muestra la barra completa y 100, pero solo al final y no durante el proceso.
|
A ver... disculpame pero no veo alli donde es fácil calcular el porcentaje. ¿Que devuelve la función codificar? ¿Es realmente una función?
rzf1983, No termino de comprenderte. ¿Obtienes el porcentaje? ¿Cómo? Por favor relata detalladamente tu situación.
Si es que sólo ves el último resultado, es decir cuando ves el 100% podría ser que con un
Código Delphi
[-]Application.ProcessMessages;
en el OnTimer consigas ver "correr" la barra.
En fin... muestra código para que podamos entenderte...
Saludos,