FiveTech Software tech support forums

... := oSqlUpd:Fields( "LABELS" ):Value // Close... oSqlUpd:Close() oSqlUpd:=NIL ENDIF // Delete... IF cAction=="D" lPass := MsgNoYes( "Are you sure you want to Cancel Receiving " + cRecvNo + "?", Ptitle ) IF ! lPass RETURN (.T.) ENDIF // Delete... cSqlUpd ...

... de xharbour.org el oficial. eh cambiado el codigo a: PROCEDURE Reorganizar() LOCAL cTabla, aTablas LOCAL lContinuar LOCAL oError, cError, n:=0 IF !MsgNoYes( "Para realizar este proceso, ningun usuario debe estar conectado al programa, desea continuar?" ) RETURN ENDIF IF !ADSRunSQL( "TABLAS", ...

Rick. In my Fwxh ver 10.06 I can do as follow. Maybe, is what you are looking for? oBrw:bPastEof = {|| If(MsgNoYes("Do you want to add a new record?","Add a new record"),; (oServer:Query("INSERT INTO " + cAlias + " () VALUES() ;"),; oAlias:Refresh(),oBrw:GoBottom(), ...

... 1 lentra para determinar donde se usara el mensaje: S = MsgStop V = Contenido de una variable T = Texto, prompt A = MsgAlert Q = MsgYesNo / MsgNoYes I = MsgInfo por ultimo breve descripcion del mensaje ejemplos TRICH_S_PRINTER_NOT_READY, esto esta ubicado en el archivo trichedi.prg se usara ...

Hi all,
I need to center the msgbox (example: Msginfo, MsgNoYes etc.) automatically on my windows instead of the screen.
I tried SetCenterOnParent(.t.) but this runs only for dialogs.

Any solution ? Thanks in advance

... function 'ValToChar' with no prototype in function MSGYESNO Warning W8065 msgs.c 290: Call to function 'ValToChar' with no prototype in function MSGNOYES Warning W8065 msgs.c 300: Call to function 'ValToChar' with no prototype in function MSGNOYES Warning W8065 msgs.c 327: Call to function 'ValToChar' ...

... oDlg:Move(0,0) ,; oBrw:SetBackGround(".\STONE.BMP"), oBrw:Refresh() ,; VALID if(!lSave, if(!empty((cFicTemp)), MsgNoYes("¿Está seguro(a) de abandonar la edición del documento?","Advertencia"),.t.),.t.) oBrush:End() oFont:End() ... ... //-----------------------------------------------------------------//ESTE ...

Guys:

My customers use Windows in it's English version but the official languages in our country are Spanish & English. When I try to use spanish characters in a button or in a function like MsgNoYes(), MsgGet(), etc. they do not display correctly. How can I fix this ? Thank you.

... Iif( (vAlias)->(Dbseek(cVar[02]+cVar[03])),; ( cVar[17]:="S",; Iif ( MSGNOYES("Continua ?","Pedido Ya Existe"),; .T.,; (cVar[02]:=Space(05),cVar[03]:=Space(10),oObj[3]:oJump:=oObj[2],oObj[2]:Refresh(),oObj[3]:Refresh()) ...

... MoveGet() MoveTo() MoveWindow() MsgAbout() MsgAlert() MsgCalc() MsgBeep() MsgDate() MsgGet() MsgInfo() MsgList() MsgLogo() MsgMeter() MsgNoYes() MsgPaint() MsgRetryCancel() MsgRun() MsgSound() MsgStop() MsgToolBar() MsgWait() MsgYesNo() nAnd() nArgC() nBmpHeight() nBmpWidth() nColorToN() ...

... Local nRate := nil,nAmount := 0,cTo := 'AUD',cCurr := '',nCurrRate := 0,lCont := TRUE nCurrRate := oPo:rate() if nCurrRate <> 0 if ! MsgNoYes('Changing Rate - Are You Sure ?') lCont := FALSE endif endif if lCont nAmount := oPo:us cCurr := oPo:curr CursorWait() oSoap:MsSoapInit("http://www.webservicex.net/CurrencyConvertor.asmx?WSDL") ...

... "tutor" ) IF oCon:lError MsgStop( "No se pudo seleccionar el contenedor...","alto" ) RETURN NIL ENDIF if MsgNoYes("Crear tabla tipo xBase?") // Aquí llamaremos a la creación de la tabla tipo xbase Createxbase() else // Aquí llamaremos a la creación ...

... ACTIVATE DIALOG oDlg CENTERED IF lOK if !BloqueaTodo() return nil endif Destino:=cDrive+"\"+alltrim(Destino) if lIsDir(destino) If !MsgNoYes("Directorio "+destino+" ya existe. Lo sobre-escribe?","Esta Seguro?") return nil endif else lmkDir(Destino) endif ...

ACTIVATE WINDOW oVentPrinc MAXIMIZED ON INIT (ParametrosIniciales(),MiTimerOn(oVentPrinc)) ; VALID MsgNoYes("Esta seguro de querer Salir...","Salir del Sistema") oTimer:end() static function MiTimerOn(oVentPrinc) Local oDlg DEFINE TIMER oTimer of oDlg ...

I don't see how this is possible. MsgNoYes() don't need include files at all, as far as I know.

EMG