FiveTech Software tech support forums

Amigos del foro tengo el siguiente problema-> Defino un folder con tres pestañas, cada una contiene unicamente un xbrowse. Al hacer clic sobre cada pestaña se llena un array con datos de una consulta de mysq, luego se los asigno al array del xbrowse así: aBrw:=array(resultado consulta sql) oBrw:Set...

Pues eso amigos,

Cuando pongo un picture "!", la Ñ sale minuscula, como puedo resolver eso.

Estimados amigos uso xharbour Tenemos un arreglo de 2 dimensiones adbf Quiere solo recorrer la columna 3 y cambiarla a numerica For Fila=1 to len(aDbf) aDbf[Fila,3]:=val(aDbf[Fila,3] ) Next Fila Esto se puede hacer mas rapido con AEVAL y en todo caso como serie el codigo O es q para q sea mas rapid...

Estimados amigos uso xharbour Tenemos un arreglo de 2 dimensiones adbf Quiere solo recorrer la columna 3 y cambiarla a numerica For Fila=1 to len(aDbf) aDbf[Fila,3]:=val(aDbf[Fila,3] ) Next Fila Esto se puede hacer mas rapido con AEVAL y en todo caso como serie el codigo O es q para q sea mas rapid...

Hi, Somebody has a version of class TTRAYICON for xHarbour/FWH26? Thanks, Vilian F. Arraes Que tal. FUNCTION SetTray(oIcon,cEmpresa,oWnd,oTray) DEFAULT oTray := NIL oTray := TTrayIcon():New( oWnd,oIcon,cEmpresa,{|| (oWnd:Show(),Shell_NotifyIcon( 2,@oTray:oTray:cBuffer ),oWnd:setfocus()) }, ; {| nRo...

Hola a todos. Llevo ya varios días tratando de controlar el tamaño de la hoja de impresión con TPrinter, el problema es que tengo que imprimir una hoja tamaño legal en horizontal (landscape) y lo que estoy haciendo es: ///Tamano de Impresora ////// Ancho, Alto PrnSetSize( 35000, 21500 ) oPrn := Pri...

Vladimir Zorrilla wrote:Hasta donde yo se era Jose Alfonso Suarez

Mi estimado,

La libreria es de Manu Exposito, y su correo es:

loloexpo@yahoo.es

Bueno, es con el que postea en el foro.

El foro es:

eagle1@yahoogroups.com

Estimados amigos quiero poster esto en ese grupo Hay una funcion en c de Manuel Exposito que llena un arreglo MMAFillResult METHOD FillCursor() CLASS TMSACursor return( MMAFillResult( ::hMySt, ::nRowCount ) ) confirmen por favor esto ::hMyS es es el manejador de la conexion lo q en msquery era el :...

Antonio Linares wrote:William,

Pon un pequeño ejemplo de como reproducir el error. Gracias.

Antonio,

Gracias por tu tiempo

Lo he resuelto, error mio, mandaba un texto en lugar de un codeblock

Antonio Linares wrote:William,

Que se le pasa "Self" al evaluar el codeblock.

Antonio,

Mil gracias por tu tiempo

Amigos,

Alguien podria auxiliarme con esta clase para utilizarla con dialogos

Simplemente manda error.

Error: BASE/1004 Class: 'CHARACTER' has no exported method: EVAL

Como siempre, agradeciendo de antemano

Antonio Linares wrote:William,

Es la única solución cuando hay varios "Self" en ámbito.

Antonio,

Me olvidaba de comentar que con la clase TSButton de MMercado no hay problemas al aplicar ::end() en el action, hay algo en particular con la btnbmp?

Gracias de antemano

Antonio Linares wrote:William,

Es la única solución cuando hay varios "Self" en ámbito.

Gracias mil

Antonio Linares wrote:William,

Usa:

local this := Self

...

... ACTION this:End() ...

Funciono perfecto.

Habría algo que modificar en la clase para no utilizar this := self o es la unica solucion?

Saludos y gracias por tu tiempo

Saludos amigos, Tengo el siguiente detalle. REDEFINE BTNBMP oBtn[1] ID 201 RESOURCE "BRW.TERMINAR" NOBORDER OF ::oDlg ; ACTION [color=red]::End()[/color] ; MESSAGE "Regresar a panel principal" La cuestión es que por ejemplo ::End() es de una clase que hice y no de BTNBMP, pero cu...