SGS wrote:Sr. Manuel, tentei usar o obtn:settext("TITULO") para mudar o caption de um botao, mais não funciona.
Hola a todos
Ahora primero lo primero, Maestro Mercado muchas gracias por compartir esta clase tan maravillosa, es ud. una gran persona.
Segundo, una solicitud al foro : Alguien tendra la lib generada para 7.12 + xHarbour, he estado intentando generarla sin exito. 
Gracias y Saludos
REDEFINE SBUTTON tchbtn[25] ID 4083 OF oDlg1 RESOURCE "IMAZOOM2" ACTION(fwhshowfig()) COLORS CLR_WHITE, CLR_GREEN,CLR_WHITE OFFICE CANCEL
ACTIVATE DIALOG fDlg CENTERED on init( showbut(tchbtn))
function showbut(tchbtn)
tchbtn[25]:settext("Ocultar"+CRLF+"Imagens")
return(.t.)
Manuel
Excelente esta clase. Felicitaciones. He visto que si tengo el ratón sobre un tsbutton no puedo desplegar los menues con el teclado. Hay alguna solución para esto ?. Desde ya muchas gracias.
horacio wrote:He visto que si tengo el ratón sobre un tsbutton no puedo desplegar los menues con el teclado. Hay alguna solución para esto ?
METHOD HandleEvent( nMsg, nWParam, nLParam ) CLASS TSButton
If nMsg == WM_SYSCOMMAND
ReleaseCapture()
EndIf
Return Super:HandleEvent( nMsg, nWParam, nLParam )SGS wrote:REDEFINE SBUTTON tchbtn[25] ID 4083 OF oDlg1 RESOURCE "IMAZOOM2" ACTION(fwhshowfig()) COLORS CLR_WHITE, CLR_GREEN,CLR_WHITE OFFICE CANCEL
ACTIVATE DIALOG fDlg CENTERED on init( showbut(tchbtn))
Manuel:
Este aporte es ESPECTACULAR, muchas gracias.
La SButtonH.lib que viene es para Harbour ?
Porque me da error de "Bound error, array asign"
en esta sintaxis?:
REDEFINE SBUTTON oBoton234 ID 211 PROMPT "Lugar" RESOURCE "PUNTOS" OF ODLG5 ;
ACTION (ist:=1, ISTITU(ODLG5),oGeta:SetFocus() ) FONT oFont ;
COLORS CLR_BLACK, nRgb(98,150,0), CLR_WHITE OFFICE TOOLTIP "Lista de TÃtulos" CANCEL
Cualquier ayuda es bienvenida, soy fanatico de
esta libreria.
Muchas gracias y saludos.
Ruben Fernandez.
FWH 0802, Harbour
Ruben D. Fernandez wrote:La SButtonH.lib que viene es para Harbour ?
Muchas gracias Manuel.
Saludos cordiales.
Ruben Fernandez.
Saludos Maestro
Gracias por su trabajo!..descargue el zip indicado pero en el no se incluye el TEST2007.PRG, seria tan amable de remitirlo
Saludos, cordiales
Martin
mchumpitazv wrote:Gracias por su trabajo!..descargue el zip indicado pero en el no se incluye el TEST2007.PRG, seria tan amable de remitirloCreo que no descargaste el Zip correcto (debido a mi error del principio que después rectifiqué), el correcto puedes descargarlo de aquÃ:
Maestro Manuel
Podria indicarme si esta libreria trabaja con FWH 7.40 o solo es para versiones superiores a la 8, ya que al compilar recivo estos errores:
C:\TSBUTTON\SAMPLES\NEWSHAPE.PRG(140) Error E0022 Invalid lvalue: 'Numeric'
C:\TSBUTTON\SAMPLES\NEWSHAPE.PRG(205) Error E0022 Invalid lvalue: 'Numeric'
Saludos y gracias
Martin
mchumpitazv wrote:Podria indicarme si esta libreria trabaja con FWH 7.40 o solo es para versiones superiores a la 8, ya que al compilar recivo estos errores:
C:\TSBUTTON\SAMPLES\NEWSHAPE.PRG(140) Error E0022 Invalid lvalue: 'Numeric'
C:\TSBUTTON\SAMPLES\NEWSHAPE.PRG(205) Error E0022 Invalid lvalue: 'Numeric'
Maestro
Porque me da estos errores:
Turbo Incremental Link 5.00 Copyright (c) 1997, 2000 Borland
Error: Unresolved external '_HB_FUN_GETFONTHEIGHT' referenced from D:\FWH\TSBUTT
ON\LIB\SBUTTONX.LIB|TsButton
Error: Unresolved external '_HB_FUN_SBTNPAINT' referenced from D:\FWH\TSBUTTON\L
IB\SBUTTONX.LIB|TsButton
Error: Unresolved external '_HB_FUN_SBARNEW' referenced from D:\FWH\TSBUTTON\LIB
\SBUTTONX.LIB|TsBar
Error: Unresolved external '_HB_FUN_MAKESEPARATOR' referenced from D:\FWH\TSBUTT
ON\LIB\SBUTTONX.LIB|TsBar
Error: Unresolved external '_HB_FUN_DARKCOLOR' referenced from D:\FWH\TSBUTTON\L
IB\SBUTTONX.LIB|TsTSay
Error: Unresolved external '_HB_FUN_GRADCOLOR' referenced from D:\FWH\TSBUTTON\S
AMPLES\NEWSHAPE.OBJ
Saludos y gracias
João Cezar
Brasil - Goiânia
Joao Cezar wrote:Porque me da estos errores:
