Folders multilinea ( Solved )

Re: Folders multilinea

Postby Raymundo Islas M. » Fri Jun 25, 2010 10:55 pm

Master Antonio,

Ya tengo mi folder multilinea corregido correctamente !!!!!!! :P :P

Yuppi !!!!!


Muchisimas gracias


Saludos

PD : En mi caso utilize 40
FWH 10.6 + xHarbour + Borland 582
User avatar
Raymundo Islas M.
 
Posts: 592
Joined: Tue Mar 14, 2006 11:34 pm
Location: Acapulco, Gro. MEXICO

Re: Folders multilinea ( Solved )

Postby Antonio Linares » Fri Jun 25, 2010 11:44 pm

bien! :-)
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42118
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Re: Folders multilinea ( Solved )

Postby surGom » Wed Apr 20, 2011 11:58 pm

Hola necesito hacer un folder multilínea y utilizó workshop y al querer abrir el rc de ejemplos me da este error :

100: CONTROL "FOLDERS", 11, "SysTabControl32", 0 | WS_CHILD | WS_VISIBLE | TCS_MULTILINE, 4, 4, 324, 227
error 765
Expresión incompleta

Hay alguna forma de poder abrirlo con el workshops, ó de poder hacerlo desde el redefine


Gracias
surGom
 
Posts: 640
Joined: Wed Oct 19, 2005 12:03 pm

Re: Folders multilinea ( Solved )

Postby Raymundo Islas M. » Fri Apr 22, 2011 4:21 am

SurGom,

En mi .rc asi tengo la linea :

CONTROL "", 106, "SysTabControl32", 512 | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 293, 5, 374, 358

pero al principio del archivo .rc tengo esto :

#define TCS_MULTILINE 512

Checa si por ahi va el asunto.


Saludos
FWH 10.6 + xHarbour + Borland 582
User avatar
Raymundo Islas M.
 
Posts: 592
Joined: Tue Mar 14, 2006 11:34 pm
Location: Acapulco, Gro. MEXICO

Re: Folders multilinea ( Solved )

Postby surGom » Fri Apr 22, 2011 9:37 am

Gracias Raymundo funcionó bien, la verdad que me ayudaste muchísimo, porque ayer estuve probando con pelles c y si bien funcionaba bien, cuando quería poner un editbox cuando compilaba me los mostraba muy feo, y estube con eso mucho tiempo y no lo pude solucionar, entonces lo que hacía era modificar el rc con el workshop, y luego pasarlo a pelles para luego etc, etc.

Gracias nuevamente

Luis Adolfo Sáenz

pd surGom es el nombre de mi empresa
surGom
 
Posts: 640
Joined: Wed Oct 19, 2005 12:03 pm

Re: Folders multilinea ( Solved )

Postby QAZWSX2K » Fri Apr 22, 2011 7:09 pm

Saludos raimundo, solo queria preguntarte dos cosita ya un poco fuera del tema que ya esya solucionado

1.- cual es el nombre de la fuente, me gusto y no la consigo, parece una corrier new menos ancha
2.- como pusistes el fondo a manera de papel rayado u hoja de excel

gracias, son dos cositas rapiditas

alejandro
Software especializado para oficinas contables con grandes volumenes de Informacion
Impresion de todos los formularios del Seniat, Dian

alex_patino74@hotmail.com
whatsapp 57+3214777217
User avatar
QAZWSX2K
 
Posts: 364
Joined: Tue Oct 25, 2005 7:06 pm
Location: Bogota - Caracas

Re: Folders multilinea ( Solved )

Postby Raymundo Islas M. » Sat Apr 23, 2011 4:20 am

Luis, a tus ordenes cuando gustes. :P

Alex,

El font se llama : anonymous

Lo elegi por que es proporcional y tiene el cero cruzado, que es muy conveniente para no confundirlo con la O mayuscula 8)

El fondo es el bitmap que viene en FW : stone.bmp y usando la clausula oBrw:SetBackGround() que tiene la xbrowse.

Deja mas tarde te envio el archivo del font a tu correo.

Saludos
FWH 10.6 + xHarbour + Borland 582
User avatar
Raymundo Islas M.
 
Posts: 592
Joined: Tue Mar 14, 2006 11:34 pm
Location: Acapulco, Gro. MEXICO

Re: Folders multilinea ( Solved )

Postby Bayron » Sat Apr 23, 2011 2:30 pm

Raymundo,

Gracias por compartir esta informacion...

Has encontrado alguna forma para instalar el Font Automaticamente, desde el programa???

Inclusive cuando seria muy facil para el usuario hacerlo manualmente, se veria poco profesional y creo que seria lo apropiado hacerlo programaticalmente!!!

Lo mismo pienso de MySQL en modo local, Como podria instalarse y configurarse automaticamente????
=====>

Bayron Landaverry
(215)2226600 Philadelphia,PA, USA
+(502)46727275 Guatemala
MayaBuilders@gMail.com

FWH12.04||Harbour 3.2.0 (18754)||BCC6.5||UEstudio 10.10||
Windows 7 Ultimate

FiveWin, One line of code and it's done...
User avatar
Bayron
 
Posts: 815
Joined: Thu Dec 24, 2009 12:46 am
Location: Philadelphia, PA

Re: Folders multilinea ( Solved )

Postby Raymundo Islas M. » Sat Apr 23, 2011 4:54 pm

Bayron,

- font
No la he intentado instalar desde la propia app, sin embargo, con el programa que uso para generar los instaladores de mis apps es muy facil hacerlo, se llama Astrum Install Wizard, no es gratis ( 90 dls ), pero no le pide nada a los que son mucho mas caros y "pros" :wink:

- MySql
Usando el propio Astrum y un par de trucos que encontre en internet + algunos mios, tengo casi dominado el asunto de instalar MySql junto con la app e inclusive el conector odbc desde el propio instalador. En otras circunstancias todo esto seria algo mucho mas sencillo, en mi caso, como ya lo he comentado en otros post anteriores debo instalar el motor con muuuucha informacion predefinida ( 2 a 3 millones de registros aprox ) y no me sirve instalar el motor, crear las DBs y Tablas y despues levantar la info con algun load file o similar, se tardaria un buen de tiempo en los equipos de algunos clientes que no estan muy actualizados.

Espero poder tener algo de tiempo para terminarlo, porque tambien es algo que me urge tenerlo listo pronto.

Saludos
FWH 10.6 + xHarbour + Borland 582
User avatar
Raymundo Islas M.
 
Posts: 592
Joined: Tue Mar 14, 2006 11:34 pm
Location: Acapulco, Gro. MEXICO

Re: Folders multilinea ( Solved )

Postby Silvio » Tue Apr 26, 2011 10:41 am

Raymundo How you made the xbrowse with total operations ?
Best Regards, Saludos

Falconi Silvio
User avatar
Silvio
 
Posts: 3107
Joined: Fri Oct 07, 2005 6:28 pm
Location: Teramo,Italy

Re: Folders multilinea ( Solved )

Postby Raymundo Islas M. » Tue Apr 26, 2011 12:03 pm

Silvio,

I'm not using XBrowse's own functions to calculate them, it's just a pretty simple for each loop and then assign totals to bfooter values.

Code: Select all  Expand view  RUN

aTots := {0,0}
for each aEle in oBrwDats:aArrayData
    aTots[1] += aEle[5]
    aTots[2] += aEle[7]
next

oBrwDats:aCols[4]:bFooter:= {|| alltrim( transform( aTots[1],     "99,999" ) )  }
oBrwDats:aCols[5]:bFooter:= {|| alltrim( transform( aTots[2], "999,999.99" ) )  }
 


As simple as this....

I know there are functions in Xbrowse doing this kind of things, but I really prefer making them by myself.
FWH 10.6 + xHarbour + Borland 582
User avatar
Raymundo Islas M.
 
Posts: 592
Joined: Tue Mar 14, 2006 11:34 pm
Location: Acapulco, Gro. MEXICO

Previous

Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 42 guests