FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Pocket PC Problema con mas de una instruccion en una sola linea
Posts: 139
Joined: Fri Apr 07, 2006 09:16 PM
Problema con mas de una instruccion en una sola linea
Posted: Fri Apr 21, 2006 08:42 PM

Tengo el siguiente codigo
IF RECC() > 0
GO TOP
DEFINE DIALOG oDlg TITLE 'Clientes encontrados' FROM 1,1 TO 16, 30
@ 0,0 LISTBOX oBrw FIELDS nombrec COLSIZES 155 HEADERS "Nombre comercial" SIZE 116,114 UPDATE OF odlg ON DBLCLICK IIF(estado<>-2,ver_ficha(oWnd,"CLIENTE",puntero,"rescli"),vv[3]=rescli->codigo)
ACTIVATE DIALOG oDlg CENTERED
ELSE
MSGINFO("No existen datos con los filtros seleccionados","Gestion")
ENDIF

Necesito que cuando hagan el doble click, asignar a una variable un valor, pero al mismo tiempo necesito refrescar esta variable y posteriormente cerrar esta ventana, como puedo encadenar todos estos comandos en la instruccion anterior.

Gracias.

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Problema con mas de una instruccion en una sola linea
Posted: Sat Apr 22, 2006 08:43 AM

Manuel,

Llama a una función y que la función haga todo:

... ON DBLCLICK Acciones() ...

...

function Acciones()

...

return nil

regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion