Page 1 of 1

progress bar during the start of an application

Posted: Mon Aug 24, 2009 9:37 pm
by Otto
Is there a possibility to show a progress bar during the start of an application.
If not do you think it could be done with a starter.exe with a timer which is in the foreground and kills itself after a certain time.
Thanks in advance,
Otto

Re: progress bar during the start of an application

Posted: Tue Aug 25, 2009 12:48 am
by mmercado
Hello Otto:
Otto wrote:Is there a possibility to show a progress bar during the start of an application.
Try TestProg.prg in \FWPPC\Samples.

Best regards.

Manuel Mercado

Re: progress bar during the start of an application

Posted: Tue Aug 25, 2009 10:17 am
by Otto
Hello Manuel,
thank you for your answer. You are right.
But I don’t find a way to integrate the DIALOG.
If I use the NOWAIT clause the Dialog is not correctly painted.

Do you suggest to integrate a button into the dialog “Start program” or enter password and then jump into a function
which loads all the necessary values?

Code: Select all

function Main()
   local oDlgSome
   *----------------------------------------------------------

   if IsExeRunning( cFileName( HB_ArgV( 0 ) ) )
      MsgInfo1( "The application is already running" )
      return nil
   endif

  DEFINE DIALOG oDlgSome TITLE "Programmstart: WHBiene" ;
      SIZE 200, 200  
   ACTIVATE DIALOG oDlgSome CENTERED //NOWAIT
….
 
Best regards,
Otto