FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Teclas aceleradoras en TBUTTON
Posts: 96
Joined: Tue Oct 11, 2005 05:56 AM
Teclas aceleradoras en TBUTTON
Posted: Wed Aug 01, 2007 09:26 AM

Buenos dias,
Uso fwh26, harbour y pellesc 4.50 y tengo problemas con los button, en pelles les pongo la tecla aceleradora pero al compilar no me aparecen en pantalla, el caso es que si pulso Alt + Tecla si funciona pero no veo la letra subrayada, solo veo el texto
El boton le defino asi:

REDEFINE BUTTON BtnEnd ID 501 OF oDlg FONT oFont ;
PROMPT '&Salir' ;
CANCEL ;
UPDATE ;
ACTION (lSalir := .t.,oDlg:End())

En PROMPT pongo lo mismo que en Pellesc, pero no lo veo al ejecutar .

Alguien me puede decir porque ocurre esto.
Muchas gracias

José Martin Uriarte
jmuarg@yahoo.es
Posts: 601
Joined: Wed Jul 04, 2007 03:51 PM
Teclas aceleradoras en TBUTTON
Posted: Wed Aug 01, 2007 12:32 PM

Prueba lo siguiente:

include "Tsbutton.ch" // Incluirlo en la cabecera del .prg

REDEFINE SBUTTON Btn2 ID 201 OF oDlg RESOURCE "CANCEL";
ACTION " ";
TOOLTIP "Cancelar y salir";
PROMPT "&Cancelar" TEXT 4

No estoy seguro pero me parece que así fucniona.
Saludos, Esteban.

Ojeda Esteban Eduardo.

Buenos Aires - Argentina.

FWH - PellesC - DBF/CDX - ADS - Gloriosos .Bat - MySql - C# .net - FastReport

Skype: jreduojeda
Posts: 96
Joined: Tue Oct 11, 2005 05:56 AM
Teclas aceleradoras en TBUTTON
Posted: Thu Aug 02, 2007 05:34 AM

Esteban, esto que dices ya se que funciona, pero es la clase TSBUTTON y yo quiero usar la clase TBUTTON.

De todas formas muchas gracias

José Martin Uriarte
jmuarg@yahoo.es

Continue the discussion