PARA EL MASTER MERCADO TSBROWSE

[mantonio_08]

amigo manuel, compile tu ejemplo sbalign.prg para ver como se incluyen los bitmap en las celdas del browse, y va ok...

cuando aplico lo mismo a mi aplicacion chasca... error

la unica diferencia es que en tu ejemplo usas DBF a secas, y yo uso DATABASE.. creo q no deberia afectar en nada:::

me da este erro:: mira::

Application
===========
Path and name: c:\belen\SisAdmi.Exe (32 bits)
Size: 708,608 bytes
Time from start: 0 hours 0 mins 1 secs
Error occurred at: 22/08/2008, 10:08:45
Error description: Error BASE/1066 Error de argumento: conditional
Args:
[ 1] = C BITMAP

Stack Calls
===========
Called from: TSBROWSE.PRG => TSBROWSE:DRAWSELECT(2547)
Called from: TSBROWSE.PRG => TSBROWSE:GOTFOCUS(3664)
Called from: WINDOW.PRG => TWINDOW:HANDLEEVENT(0)
Called from: CONTROL.PRG => TCONTROL:HANDLEEVENT(0)
Called from: TSBROWSE.PRG => TSBROWSE:HANDLEEVENT(8654)
Called from: WINDOW.PRG => _FWH(3170)
Called from: => DIALOGBOX(0)
Called from: DIALOG.PRG => TDIALOG:ACTIVATE(0)
Called from: sbalign.prg => MAINXX(79)
Called from: sisadmi.prg => (b)MAIN(84)
Called from: TMSGITEM.PRG => (b)TMSGITEM:TMSGITEM(0)
Called from: TMSGITEM.PRG => TMSGITEM:CLICK(0)
Called from: MSGBAR.PRG => TMSGBAR:LBUTTONDOWN(0)
Called from: WINDOW.PRG => TMSGBAR:HANDLEEVENT(0)
Called from: WINDOW.PRG => _FWH(3170)
Called from: => WINRUN(0)
Called from: WINDOW.PRG => TMDIFRAME:ACTIVATE(883)
Called from: sisadmi.prg => MAIN(95)

System
======
CPU type: Intel(R) Pentium(R) 4 CPU 2.80GHz 2800 Mhz
Hardware memory: 960 megs

Free System resources: 90 %
GDI resources: 90 %
User resources: 90 %

Compiler version: xHarbour build 0.99.71 Intl. (SimpLex)
Windows version: 5.1, Build 2600 Service Pack 2

Windows total applications running: 54
1 M
2 Default IME
3 CiceroUIWndFrame
4 TF_FloatingLangBar_WndTitle
5 Estilo de sombra
6 TSBrowse: Alignment in Code Blocks and Alignable BitMaps
7 Calculadora
8 Sistema Central de Administración < FUNERARIA BELEN >
9 VERCE v4.3, C:\Belen\BelenC.VRC
10 Panel de tareas
11 Celda
12 Microsoft Excel - Estado Resultado Junio 2008
13 Estado Resultado Junio 2008
14 Visor de eventos - Messenger Plus!
15 DDE Server Window
16 CTicketManagerWnd
17 IMON Hidden Window
18 RTCMediaMessageWindow
19 CRTCMediaController
20 CRTCClient
21 HP Deskjet 3900 Series - Estado
22 WOWExec
23 AiODeeDeeNotificationWindow
24 Connections Tray
25 SiS Utility Tray
26 IHW2
27 DIEmWin
28 MessageFromSti
29 ButtonManager
30 Medidor de energía
31 UPnP Notification Monitor
32 MS_WebcheckMonitor
33 HPWU
34 NOD32KrnSvcWindow
35 NOD32 Update
36 NOD32 Scanner
37 NOD32 Mirror - Imágenes de actualización/configuración
38 IMON - Protección para el tráfico de Internet
39 EMON - Protección de correo para Microsoft Outlook
40 DMON - Protección de documentos Microsoft Office
41 AMON - Monitor del sistema de archivos
42 NOD32 Kernel
43 Configuración general del sistema NOD32
44 Información
45 Tareas programadas
46 Cuarentena
47 Registros de NOD32 Scanner
48 Registros de amenazas
49 Registros del sistema NOD32
50 NOD32 2.5 Control Center
51 GDI+ Window
52 SysFader
53 EditPlus - [C:\Belen\SBALIGN.PRG]
54 Program Manager

Variables in use
================
Procedure Type Value
==========================
TSBROWSE:DRAWSELECT
Local 1: O Class: TSBROWSE
Local 2: N 1
Local 3: N 1
Local 4: N 1
Local 5: N 0
Local 6: O Class: TSCOLUMN
Local 7: N 6
Local 8: C "BITMAP"
Local 9: N 1141509225
Local 10: U
Local 11: U
Local 12: U
Local 13: N 8421631
Local 14: L .F.
Local 15: N 788859283
Local 16: U
Local 17: U
Local 18: U
Local 19: U
Local 20: U
Local 21: N 0
Local 22: L .F.
Local 23: L .F.
Local 24: N 449
Local 25: N 1
Local 26: A Len: 6
Local 27: A Len: 6
Local 28: N 984452
Local 29: U
Local 30: L .T.
Local 31: N 1141509225
Local 32: N 1
Local 33: U
Local 34: U
Local 35: U
Local 36: N 0
Local 37: N 8421631
Local 38: N 16777215
Local 39: N 12937777
Local 40: L .T.
Local 41: N 10070188
Local 42: N 1
Local 43: N 8421504
Local 44: N 12632256
Local 45: N 16
Local 46: N 16
Local 47: N 0
Local 48: N 0
Local 49: L .F.
Local 50: C "BITMAP"
Local 51: U
Local 52: N 0
TSBROWSE:GOTFOCUS
Param 1: O Class: TSBROWSE
TWINDOW:HANDLEEVENT
Param 1: N 7
Param 2: N 722334
Param 3: N 0
TCONTROL:HANDLEEVENT
Param 1: N 7
Param 2: N 722334
Param 3: N 0
Local 1: O Class: TSBROWSE
TSBROWSE:HANDLEEVENT
Param 1: N 7
Param 2: N 722334
Param 3: N 0
Local 1: O Class: TSBROWSE
Local 2: U
Local 3: U
Local 4: U
Local 5: U
_FWH
Param 1: N 0
Param 2: N 7
Param 3: N 722334
Param 4: N 0
Param 5: N 13
Local 1: O Class: TSBROWSE
DIALOGBOX
Param 1: N 4194304
Param 2: C "DIALOGO"
Param 3: N 1639852
Param 4: O Class: TDIALOG
TDIALOG:ACTIVATE
Param 1: U
Param 2: U
Param 3: U
Param 4: L .T.
Param 5: U
Param 6: L .T.
Param 7: U
Param 8: U
Param 9: U
Param 10: L .F.
Local 1: O Class: TDIALOG
Local 2: N 1639852
Local 3: U
Local 4: U
Local 5: U
Local 6: O Class: TDIALOG
MAINXX
Local 1: O Class: TSBROWSE
Local 2: O Class: TDIALOG
Local 3: A Len: 3
Local 4: A Len: 2
Local 5: L .F.
Local 6: A Len: 3
Local 7: N 1
Local 8: N 2
Local 9: N 3
Local 10: O Class: TDATABASE
(b)MAIN
Param 1: N 10
Param 2: N 826
(b)TMSGITEM:TMSGITEM
Param 1: O Class: TMSGITEM
Param 2: N 10
Param 3: N 826
TMSGITEM:CLICK
Param 1: N 10
Param 2: N 826
TMSGBAR:LBUTTONDOWN
Param 1: N 10
Param 2: N 826
Param 3: N 1
Local 1: O Class: TMSGBAR
Local 2: N 4
TMSGBAR:HANDLEEVENT
Param 1: N 513
Param 2: N 1
Param 3: N 656186
_FWH
Param 1: N 656186
Param 2: N 513
Param 3: N 1
Param 4: N 656186
Param 5: N 12
Local 1: O Class: TMSGBAR
WINRUN
Param 1: N 1639852
TMDIFRAME:ACTIVATE
Param 1: C "MAXIMIZED"
Param 2: U
Param 3: U
Param 4: U
Param 5: U
Param 6: U
Param 7: U
Param 8: B {|| ... }
Param 9: U
Param 10: U
Param 11: U
Param 12: U
Param 13: U
Param 14: U
Param 15: U
Param 16: U
Param 17: U
Param 18: U
Param 19: U
Local 1: O Class: TMDIFRAME
Local 2: U
Local 3: U
MAIN
Local 1: C "C:\BELEN\bases"
Local 2: O Class: TSBAR
Local 3: U
Local 4: U
Local 5: U
Local 6: U
Local 7: U
Local 8: U
Local 9: U
Local 10: U
Local 11: O Class: TMSGITEM
Local 12: U
Local 13: O Class: TFONT
Local 14: O Class: TBRUSH

Linked RDDs
===========
DBF
DBFFPT
DBFCDX
DBFBLOB

DataBases in use
================

1: => SPSF RddName: DBFCDX
==============================
RecNo RecCount BOF EOF
234 3182 .F. .F.

Indexes in use TagName
Spsf->Idatencio FOLIOS
Spsf->Nombrecli NOMBRECLI
Spsf->Fallecido FALLECIDO
Spsf->Rut+DTOS(Spsf->fechaaten) INF_FECHAC
Spsf->fechaaten INF_FECHA
Transform(Spsf->local,"99")+DTOS(SpINF_FECHAL
Spsf->comision COMISION
=> Spsf->Idatencio FOLIOPAGAD
Spsf->fechaaten PAGINF_FEC
Transform(Spsf->local,"99")+DTOS(SpNEWPAGINF_

Relations in use

Classes in use:
===============
1 HASHENTRY
2 HBCLASS
3 HBOBJECT
4 TBRUSH
5 TWINDOW
6 TMDIFRAME
7 TMENU
8 TMENUITEM
9 TCONTROL
10 TICON
11 TMDICLIENT
12 TFONT
13 TSBAR
14 TRECT
15 TSBUTTON
16 TBITMAP
17 ERROR
18 TMSGBAR
19 TMSGITEM
20 TTIMER
21 TDIALOG
22 TDATABASE
23 TSBROWSE
24 TSCOLUMN
25 TSBSCRLBAR
26 TREG32

Memory Analysis
===============
179 Static variables

Dynamic memory consume:
Actual Value: 0 bytes
Highest Value: 0 bytes



A QUE SE DEBE.. SI ME LO PUEDES ACLARA QUIZAS HAGO ALGO MAL,,,

YO YA ANTES DE MOLESTARTE LO HE DADO VUELTAS Y MASSSS VUELTAS..

GRACIAS

[carlos vargas]

Tu problema podria ser que estes usando un tsbrowse.ch incorrecto para la version de la clase que tienes. en el post indicas que sbalign se compila y ejecuta correctamente, eso podria deberse a que hay un tsbrowse.ch en el mismo lugar que sbalign y que pueda ser el correcto.

En el caso de tu aplicacion, podria fallar ya que puede estar tomando un tsbrowse.ch de otro lugar, te quedaria comparar ambos ch.

El erro pasa por que segun la version del tsbrowse.ch los comandos ha sufirdo cambios de version a version.

Una forma de confirmar esto, es compilar ese prg con la opcion /p para que genere el .ppo y lo puedas revisar, ahi es mas facil de confirmar el error.

de paso puedes postear la parte del codigo que genera el error, la parte de .ppo de la definicion de browse para verificarlo.

salu2
carlos vargas