Ver el proceso de carga de un formulario

[rufo]

Gracias amigos por responder pero quede igual como al principio, ya que no tengo nada de codigo y queria ver si ustedes me pueden facilitar esa parte ya que en si quiero cuando elija una opcion de un submenu para que me abra una ventana me aparesca el proceso de carga, bueno espero que me ayuden

[rgstuamigo]

Cuando no se conoce las operaciones o no se puede determinar en que momento incrementar el ProgressBar, creo que lo mejor que veo es usar un ProgressBar Infinito igual al que sale al inciar Windows, de esa manera te evitarias tantos lios y demasiada programacion.
Podrias mostrar la ventana con el progressbar Infinito al momemto de llamar al formulario que se esta cargando y cuando termine simplemete deshabilitarlo..
Saludos...

[rufo]

gracias pero como lo hago ese es la cuestion????

[rgstuamigo]

Empezado por rufo

gracias pero como lo hago ese es la cuestion????

Pues chequea este foro, aunque creo que el tema ya se ha tocado en el club en alguna otra oportunidad, seria bueno que hicieras una busqueda. con palabras clave como "ProgressBar" ó "ProgressBar Infinito"
Saludos...

[rufo]

Ok amigos les podre en donde quiero poner o aparecer el progressbar este es el codigo de mi Mainmenu

procedure TSUPERMERCADO.Modificaciones2Click(Sender: TObject);
begin
 modificacion_proveedor.Show;
 supermercado.Enabled:=false;
end;

entonces cuando yo le de clic al submenu modificacion_proveedor como esta conectada a una tabla que contiene registros tarda un poco entonces para que el usuario no piense que esta congelada su compu o el programa que me muestre el Progressbar indicandole que esta cargando, espero que me ayuden por que me esta volviendo loco, ya que es la primera vez que hago esto y gracias.

[rgstuamigo]

Buscando en foro he encontrado un ProgressBar Ciclico en el truco nro 471.
Ahora otra solucion a tu problema es poner otro cursor al puntero del Raton al momento de cargar tu formulario,para que el usario sepa que se esta cargando, y al terminar volver a poner el cursor que se tenia antes;
Mas o menos asi siguiendo tu ejemplo:

Código Delphi [-]
procedure TSUPERMERCADO.Modificaciones2Click(Sender: TObject);
var aux:TCursor; 
begin
  aux:=Screen.Cursor;
   try
    Screen.Cursor:=crHourGlass;//cambio de cursor
    modificacion_proveedor.Show;
    supermercado.Enabled:=false;
  finally
   Screen.Cursor:=aux;//recupero el anterior cursor
  end;
end;

Saludos...

[[Lepe]]

Retrasando los eventos...

Supongo haces las operaciones en el evento OnCreate del form que se está creando y claro... antes de crearse no puede mostrarse, así que no puedes mostrar el progressbar.

En el foro se habló de crear un evento nuevo llamado afterShow http://www.clubdelphi.com/foros/show...11&postcount=2 con eso puedes hacer que se muestre y después mostrar el progressbar.

En ese mismo hilo, también tienes otra forma con una ventana Always ontop que se activa antes de crear la ventana lentorra http://www.clubdelphi.com/foros/show...2&postcount=16

[Neftali [Germán.Estévez]]

¿Qué haces en el OnCreate y/o en el OnShow del form?