topic-855

Posts: 933

Joined: Sun Oct 09, 2005 01:05 PM

Function Similar to MsgRun()
Posted: Sun Dec 11, 2005 02:20 AM

Hi,

Is there a function similar to MsgRun() that will display a message WHILE a user function is being run and keep the message there until the user function is completed.

I've tried MsgRun() but it seems to display the message AFTER the user function has been completed.

Thanks,
Jeff

Thanks,

Jeff Barnes

(FWH 16.11, xHarbour 1.2.3, Bcc730)

DanielPuente

Posts: 108

Joined: Sun Oct 09, 2005 06:12 PM

Function Similar to MsgRun()
Posted: Sun Dec 11, 2005 04:42 AM

Jeff:

   I user msgrun() this way and I don't have that problem, the message is correctly displayed:

MSGRUN("Esperando respuesta fiscal...","Conectando con IFiscal",{|| ejecuta(cticket,cDir,wLfact)})

   Maybe a sysrefresh() after the msgrun() will help.

Regards,

Daniel Puente
Mar del Plata, Argentina
danielpuente@speedy.com.ar
puenteda@hotmail.com

dutch

Posts: 1598

Joined: Fri Oct 07, 2005 05:56 PM

Function Similar to MsgRun()
Posted: Sun Dec 11, 2005 03:40 PM

Dear Jeff,

Try this example will popup window for complete function before close MsgRun().

Regards,
Dutch

MsgRun('Please Wait, Report is processing.',,{|oDlg| ;
WaitRun('RRWRUN.EXE RREPORT '+str(RPT_NR,3)+' /H /B /WY /R'+cLibrary+' /ORROUT'+Strim(RPT_NR,3)) } )

Regards,

Dutch

FWH 2304 / xHarbour Simplex 1.2.3 / BCC73 / Pelles C / UEStudio

FWPPC 10.02 / Harbour for PPC (FTDN)

ADS V.9 / MySql / MariaDB

R&R 12 Infinity / Crystal Report XI R2

(Thailand)

Jeff Barnes

Posts: 933

Joined: Sun Oct 09, 2005 01:05 PM

Function Similar to MsgRun()
Posted: Sun Dec 11, 2005 03:45 PM

Thanks Daniel / Dutch,

I have it working ... my mistake ... I was doing it this way:

MsgRun("Please Wait ... Generating Report",,MyFunction() )

I left out the {|| }

Thanks again.

Jeff

Thanks,

Jeff Barnes

(FWH 16.11, xHarbour 1.2.3, Bcc730)

FiveTech Support Forums

Continue the discussion