Search found 28 matches: cbusca

Return to advanced search

CONTROLAR CLICK SOBRE COLUMNA EN XBROWSE

... como se hace eso.. FUNCTION MENU_PRODUCTO(cEmpresa,cUsuario) Local oDlg, oBrw, oFont2, oCol, oSay, oBtn2[ 9 ] LOCAL oGet,nIndex,aIdx:={} LOCAL cBusca:= Space(60) Local cSeek:="" Local oCampo, cCampo :=space(50) cTab_Art:=xServer:Query("SELECT a.*, b.*, c.* FROM tab_art AS a LEFT ...
by kpidata
Fri Sep 01, 2023 7:18 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: CONTROLAR CLICK SOBRE COLUMNA EN XBROWSE
Replies: 1
Views: 309

evitar que se active columna con xbrowse al dar un click

... como se hace eso.. FUNCTION MENU_PRODUCTO(cEmpresa,cUsuario) Local oDlg, oBrw, oFont2, oCol, oSay, oBtn2[ 9 ] LOCAL oGet,nIndex,aIdx:={} LOCAL cBusca:= Space(60) Local cSeek:="" Local oCampo, cCampo :=space(50) cTab_Art:=xServer:Query("SELECT a.*, b.*, c.* FROM tab_art AS a LEFT ...
by kpidata
Fri Sep 01, 2023 7:17 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Inhabilitar columna en xBrowse - Disable column in xBrowse
Replies: 8
Views: 994

Re: Pregunta sobre la clase TWORD()

... se hicieran sobre la cabecera (Say, Line, etc.) Es decir si quieres hacer el Replace sobre la cabecera: oWord:SetHeader() oWord:Replace(cbusca,cnueva) Para volver a dejar todo sobre el cuerpo del documento: oWord:SetMainDoc() Prueba a ver Saludos
by Sebastián Almirón
Thu Mar 17, 2022 9:16 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Pregunta sobre la clase TWORD()
Replies: 6
Views: 512

Xbrowse, Mysql y Tdolphin.. error de orden..

... cUsuario) local oDlg, oBrw, oFont2, oCol, oSay, oBtn2[ 9 ], oBoton1, oBoton2, oBoton3 LOCAL oGet,nIndex,aIdx:={} LOCAL cBusca:= Space(60) Local cSeek:="" Local oCampo, cCampo :=space(50), Mensaje Mensaje:="Stock Inventario General" cTab_Art:=XServer:Query("SELECT ...
by kpidata
Tue Dec 17, 2019 12:20 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Xbrowse, Mysql y Tdolphin.. error de orden..
Replies: 1
Views: 800

Problemas con Found()

Hola amigos : No comprendo como no me funciona esto. Busca un registro primero por numero de factura , seria cBusca y una vez encontrado busca por proveedor. LOCATE FOR Apup->Prove == cCodigo WHILE Apup->Factura == cBusca         IF(Apup->(Found()),lEncontrado ...
by jvtecheto
Mon Aug 12, 2019 10:41 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Problemas con Found()
Replies: 8
Views: 847

error ORDBAGNAME, con mysql tdolphin y xbrowse

... del codigo FUNCTION Menu_Marca_Extintores(cEmpresa,cUsuario) Local oDlg, oBrw, oFont2, oCol, oSay, oBtn2[ 9 ] LOCAL oGet,nIndex,aIdx:={} LOCAL cBusca := Space(60) Local cSeek:="" cExt_Mar:=XServer:Query("SELECT cod_mar, nom_mar FROM ext_mar ORDER BY cod_mar") Define Font ...
by kpidata
Fri Aug 24, 2018 12:15 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: error ORDBAGNAME, con mysql tdolphin y xbrowse
Replies: 1
Views: 739

error en xbrowse mysql, tdolphin

... FUNCTION MENU_INSUMOS(cEmpresa) Local oDlg, oBrw, oFont2, oCol, oSay, oBtn2[ 9 ] LOCAL oGet,nIndex,aIdx:={} LOCAL cBusca := Space(60) Local cSeek:="" Local oCampo, cCampo :=space(50) LOCAL acIndices := { "por Codigo", "por Descripcion" ...
by kpidata
Tue Jun 19, 2018 5:59 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: error en xbrowse mysql, tdolphin
Replies: 0
Views: 788

Re: dbf a mysql

... se salta en algunos casos registros con ese campo buscado, te mando un ejemplo del tipo.. busco la expresion que el usuario coloco con la variable cBusca.. para llevarla a una base paralela y mostrar ese dato en un xbrowse. Function Zoom_Proveedor(oBrw, cBusca, cUser) Local xNro, oDlgx, oBrwx, ...
by kpidata
Thu May 04, 2017 6:36 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: dbf a mysql
Replies: 9
Views: 1578

BUSCA EN CUALQUIER POSICION CON DBF

Amigos aca les dejo una busqueda secuencial en tablas dbf para buscar en cualquier posicion de un campo: oLbx:bKeyDown := {|nKey| (Search(nKey,@cBusca,oLbx),oLbx:Refresh(),oSay:Refresh()) } STATIC FUNCTION Search(nKey,cBusca,oLbx) *-------------- If Nkey=8 cbusca:= SubStr(cbusca,1,Len(cbusca)-1) ...
by jbrita
Fri Oct 18, 2013 2:59 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: BUSCA EN CUALQUIER POSICION CON DBF
Replies: 16
Views: 3271

Re: busqueda incremental

... " + oView:ConvertTime( nTimeFrom - 1 ) + " a las " + oView:ConvertTime( nTimeTo + 1 ) oDlg:lHelpIcon := .f. @ 10,10 SAY oSay PROMPT cBusca OF oDlg SIZE 200,12 PIXEL COLOR CLR_YELLOW,CLR_GRAY BORDER @ 30,10 XBROWSE oBrw ; SIZE 200,200 PIXEL ; OF oDlg oBrw:SetMySql( oQry, .F. ) oBrw:bKeyDown ...
by Francisco Horta
Sat Feb 09, 2013 6:58 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: busqueda incremental
Replies: 6
Views: 1609

Re: Ejemplo xBrowse-MySql?

ahi va un ejemplo: Local cbusca :="" @ 0.30,50 SAY "Buscar :" OF oBar FONT oVentPrinc:oFont SIZE 40, 15 COLORS CLR_BLUE, nRGB( 207, 221, 239 ) @0.35,46 GET oGet VAR cbusca OF oBar PICTURE "@S60!" SIZE 200,22 ...
by jbrita
Mon Apr 02, 2012 12:15 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Ejemplo xBrowse-MySql?
Replies: 7
Views: 1969

GET y CheckBox en Ribbon

... GROUP aO[_GrpBusca] RIBBON aO[_Ribbon] TO OPTION 2 PROMPT "Búsquedas" WIDTH 310   @ 13, 10 GET aO[_GBusca] VAR cBusca SIZE 150,20 OF aO[_GrpBusca] PICTURE "@!" PIXEL UPDATE   @ 13,190 CHECKBOX aO[_ChkFil] VAR lFiltra PROMPT "Usar ...
by MarioG
Wed Jan 04, 2012 4:19 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: GET y CheckBox en Ribbon
Replies: 2
Views: 852

Re: xBrowse - Busqueda Incremental

Amigo prueba asi Local cbusca:="" LOCAL cSelect:="ma_arti,ma_des1,ma_fami,ma_pcom,ma_flet,ma_comp,ma_desc1,ma_desc2,ma_desc3,sto_ok,bod_ini1,bod_ent1,bod_sal1,ma_con_com,ma_bloqueo" REDEFINE GET oGet VAR cBusca ID ...
by jbrita
Fri Dec 02, 2011 2:30 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: xBrowse - Busqueda Incremental
Replies: 7
Views: 1777

Re: ¿se puede hacer con xBrowse?

Amigo si lo quieres hacer con SQL se aplica asi SELECT * FROM CLIENTE WHERE nombre LIKE "%RIVERA%" y con funcion es asi: Local cbusca:="" REDEFINE GET oGet VAR cBusca ID 101 OF oDlg UPDATE FONT oVentPrinc:oFont COLOR CLR_BLUE when .f. y dentro del browse xbrowse oLbx:bKeyDown ...
by jbrita
Wed Aug 03, 2011 3:56 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: ¿se puede hacer con xBrowse?
Replies: 13
Views: 2469

Re: xBrowse + TMySQL

Amigo con esto es para la busqueda FUNCTION PlisBuscar(nKey,oDatos,oTabla,oOrden,oLbx,cbusca,cSelect) *----------------------------------------------------- Local cQuery,campo DEFAULT cSelect := "*" If nKey=8 cbusca:= SubStr(cbusca,1,Len(cbusca)-1) cQuery:="SELECT ...
by jbrita
Sat May 14, 2011 8:36 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: xBrowse + TMySQL
Replies: 6
Views: 1065
Next

Return to advanced search