DDE object not propperly initialized! (SOLVED)

[tiaofw]

Good Morning.

Does anyone know why this error?

"DDE object not propperly initialized!"

When I run the function below it appears:

Code: Select all  Expand view

function BuildGroup()

   local oDde

   DEFINE DDE oDde SERVICE "Progman" TOPIC "Progman"

   ACTIVATE DDE oDde

   oDde:Execute( "[DeleteGroup( SALC )]" )
   oDde:Execute( "[CreateGroup( SALC )]" )
*   oDde:Execute( "[ShowGroup( SALC, 1 )]" )
   oDde:Execute( "[AddItem(" + cTarget + "\SALC.EXE, SALC )]" )
   RELEASE DDE oDde

return nil
 

Until 15:02 this version normal, now when was build in version appeared 15:12 this error.

Any idea?

Thank you.

[Antonio Linares]

Tiao,

There is a little bug to fix this way in FWH Class TDde:

Code: Select all  Expand view

METHOD Activate() CLASS TDde

   nLastMsg = WM_DDE_INITIATE

   SendMessage( 0xFFFF, WM_DDE_INITIATE, GetWndApp(),;  // replace -1 with 0xFFFF
                nMakeLong( ::nService, ::nTopic ) )

return nil

Next FWH version will include this fix

[tiaofw]

Thanks Antônio!