topic-13430

Board index FiveWin para Harbour/xHarbour Algo raro en mi xbrowse?? me ayudan

Posts: 880

Joined: Fri Jan 12, 2007 08:35 PM

Algo raro en mi xbrowse?? me ayudan
Posted: Tue Nov 04, 2008 11:03 PM

HOLA

algo rarito me pasa con el xbrowse tengo un campo donde pongo el nombre completo de las personas registradas pero sale todo pegado a la derecha cuando se supone estaria a la isquierda, no encuentro que sea lo que pasa o en que estoy mal

les dejo el mini codigo pofis me ayudan

Code: Select all Collapse

dbselectarea( "autos" )
	 dbgotop()
	 autospoliza:=lastrec()
	 sum AUTOS->pagado to  autosvalor
	 dbgotop()
	 oGetN :=space(60)


		 @ 00,00 XBROWSE oBrwX OF oFld:aDialogs[1] FIELDS ALLTRIM(AUTOS->NOMBRE) +" "+ ALLTRIM(AUTOS->APELLIDO_P) +" "+ ALLTRIM(AUTOS->APELLIDO_M),;
	                                    AUTOS->R_POLIZA  ,;
		                                 AUTOS->POLIZA   ,;
	                                    AUTOS->pagado  ,;
		                                 AUTOS->comp;
												   COLSIZES 450 , 100 , 100 , 100,400  SIZE 1032,310;
													JUSTIFY AL_LEFT,AL_CENTER,AL_CENTER,AL_RIGHT,AL_CENTER;
												PICTURES "@!","@!","@!", "999,999,999","@!";
												HEADERS  "        Nombre               ", "    Poliza Autos   ", "      Inciso      ","Pagado ", "Compañia";
												ON CLICK (Sndplaysound("beep1.wav"),getNOM:=ALLTRIM(AUTOS->NOMBRE) +" "+ ALLTRIM(AUTOS->APELLIDO_P) +" "+ ALLTRIM(AUTOS->APELLIDO_M),oGetN:Refresh(),;
 		getT:=AUTOS->TEL1,oGetT:Refresh(),getT2:=AUTOS->TEL2,oGetT2:Refresh(),getDirec:=ALLTRIM(AUTOS->DIRECCION) +" Col. " + ALLTRIM(AUTOS->COLONIA),;
  		oGetDirec:Refresh(),getCiu:=AUTOS->poblacion,oGetCiu:Refresh(),MEMITO:=AUTOS->comentario,mComments:Refresh(),getPol:=AUTOS->R_Poliza,;
    	oGetPol:Refresh(),getInc:=AUTOS->poliza,oGetInc:Refresh(),ramo:="AUTOS",oRamos:Refresh(),rFicha:=AUTOS->ficha,oFicha:Refresh())

Que es mejor que programar? creo que nada :)
Atropellada pero aqui ando :P

I love Fivewin

séʌǝɹ ןɐ ɐʇsǝ opunɯ ǝʇsǝ

Daniel Garcia-Gil

Posts: 2365