Distinguidos Porqué desde recursos definido con TAB no funciona el Mouse? REDEFINE FOLDEREX oFld ID 110 OF oDlg PIXEL ROUND 5 UPDATE PROMPT "&Personal", "&Empresarial" DIALOGS "PERSONAL","EMPRESARIAL" ...
Distinguidos Cómo se hace para grabar campos VARCHAR vacíos que no le coloque NULL porque al momento de editarlo no deja modificar. Lo hago asi: IF Bdr=1 oTexto:="Guardar" ...
Distinguidos La cosa es que hay que aplicarlo al Qseek para que haga la búsqueda. Mis columnas son estas oCol:=oBrw:AddCol() oCol:bStrData := { || EMPL:CODIGO } oCol:nHeadStrAlign ...
Distinguidos Con estos cambios funciona lo de vaciar la cadena. Almacenando la cadena en una variable. REDEFINE SAY oSay VAR xSeek ID 114 OF oDlg UPDATE PICTURE "@!" oBrw:bSeek := { | c | xSeek:=c,QSeek( ...
Distinguidos cómo se valida e oCol:bOnPostEdit del xBrowse Hago lo siguiente lOk:.T. oCol := oBrw:AddCol() oCol:bStrData := { || DHORA} oCol:cEditPicture ...
Distinguidos, Cómo se borran los índices con TAG creados temporalmente del archivo físico de índices el cual va creciendo cada vez que se ejecuta. Hago Así: Use BASE Alias DATOS NEW SHARED //Si existes BASE.CDX la abre automáticamenteINDEX ...
Distinguidos Alguien a logrado imprimir desde FWH en una impresora Epson TM-U220A con tarjeta IP sin instalarla solo configurándole la IP de la RED Ej. ya le asigne la IP 192.10.1.31 y se llama CAJA Tenemos el sistema MICROS ...
Distinguidos Se puede contar un carácter especifico de un archivo de texto, Ej. contar cuantos Chr(12) saltos de página existen, sin necesidad de recorrer línea a línea todo el archivo.
Distinguidos Cómo se controla el fin del xBrowse, tengo este código pero no funciona: Do While .T. If Lastkey()=27 oDlgP:End() Exit Endif oBrw:GoDown() If oBrw:Eof() ...
Distinguidos Antonio/G. N. Rao. Que parte del xBrowse hay que modificar para que la búsqueda incremental de: @4,205 SAY oBrw:oSeek PROMPT oBrw:cSeek SIZE 95,12 PIXEL OF oBrw para que pulsando las vocales con tilde (áéíóú/ÁÉÍÓÚ) ...