Cobol Foro
Registrarse
Temas de Hoy
Enlaces
Registrarse
Preguntas Frecuentes
Lista de Usuarios
Calendario
Cobol Foro
Navegación en el Foro
Retroceder   Cobol Foro Entornos de desarrollo y compiladores Cobol Fujitsu COBOL PowerCOBOL y WinAPI
Actualizar esta página [Duda] ToolTipText multilinea
PowerCOBOL y WinAPI Llamadas a la API de Windows en PowerCOBOL
 
Otros temas que te pueden interesar
Tema Autor Foro Respuestas Último post
[Sintaxis] Operar con Textbox multilínea dmosca PowerCOBOL y COM/OLE 1 8 de mayo de 2017 10:26
[Componente] TextBox Multilinea y saltos de línea Begoguay PowerCOBOL (ActiveX, v4 - v11) 3 6 de febrero de 2017 20:55

Respuesta
Página 3 de 3 12 3

  #21
Antiguo 1 de marzo de 2024, 19:07
fastpho
El Foro es mi casa
Innovación: Por aportar innovaciones - Issue reason: SQLite + OO Cobol class Concurso: Primer puesto: Ganador/a del Primer puesto en un concurso - Issue reason: Acceso a datos Cobol vía web 
Última Actividad 21.08.2026 18:08
Posts Posts: 365
Likes enviados Enviados: 252
Likes recibidos Recibidos: 243
Tableta ToolTipText multilinea winapi
1
Likes

Josber

 Inactivo Inactivo
Nuevas Propiedades : Icon - Titulo - Tiempos (Visible - Delay)

Código COBOL:
  1. *------------------------------------------------------------------------------------------                          
  2. *new 01-03-2024
  3.  *> new titulo + icon 
  4.  01 TTM_SETTITLE                  PIC S9(9) COMP-5 VALUE  1056. *>= (WM_USER + 32)
  5.  01 StrTitle                      PIC X(30).
  6.  01 ttIconType.
  7.     03 TTNoIcon                   PIC S9(9) COMP-5 VALUE 0.
  8.     03 TTIconInfo                 PIC S9(9) COMP-5 VALUE 1.
  9.     03 TTIconWarning              PIC S9(9) COMP-5 VALUE 2.
  10.     03 TTIconError                PIC S9(9) COMP-5 VALUE 3.
  11.  
  12.  
  13.  *> tiempos visible  + delay 
  14.  01 TTM_SETDELAYTIME             PIC S9(9) COMP-5 VALUE 1027. *> = (WM_USER + 3)
  15.  01 TTDT_AUTOPOP                 PIC S9(9) COMP-5 VALUE 2.
  16.  01 TTDT_INITIAL                 PIC S9(9) COMP-5 VALUE 3.
  17.  01 VisibleTime                  PIC S9(9) COMP-5. *>
  18.  01 DelayTime                    PIC S9(9) COMP-5. *> 
  19. *------------------------------------------------------------------------------------------

Código COBOL:
  1. *------------------------------------------------------------------------------------------                          
  2. *new 01-03-2024                          
  3. *titulo + icon.
  4.  
  5.           MOVE "Titulo del ToolTip" TO StrTitle
  6.         CALL "SendMessageA" WITH stdcall LINKAGE 
  7.           USING         BY VALUE HWNDTT
  8.                           BY VALUE TTM_SETTITLE
  9.                           BY VALUE TTIconInfo
  10.                           BY REFERENCE StrTitle.
  11.  
  12. *------------------------------------------------------------------------------------------
  13. *new 01-03-2024
  14. * tiempos 
  15. *  VisibleTime            
  16.           MOVE 1000 TO VisibleTime.
  17. *  DelayTime            
  18.           MOVE 5000  TO DelayTime.
  19. *          
  20.         CALL "SendMessageA" WITH stdcall LINKAGE 
  21.           USING         BY VALUE HWNDTT
  22.                           BY VALUE TTM_SETDELAYTIME
  23.                           BY VALUE TTDT_AUTOPOP
  24.                           BY VALUE VisibleTime.
  25. *                          
  26.         CALL "SendMessageA" WITH stdcall LINKAGE 
  27.           USING         BY VALUE HWNDTT
  28.                           BY VALUE TTM_SETDELAYTIME
  29.                           BY VALUE TTDT_INITIAL
  30.                           BY VALUE DelayTime.                          
  31. *------------------------------------------------------------------------------------------

Saludos...

Miniatura de Adjuntos
Pulsar la imagen para la versión amplia Nombre: tool.png Vistas: 88 Tamaño: 6,5 KB  
Última edición por fastpho fecha: 1 de marzo de 2024 a las 19:09. Razón: imagen
fastpho is offline   Responder Con Cita
  #22
Antiguo 15 de marzo de 2024, 17:06
Nitzer
Guru de COBOL
Activista del Foro: Activista del Foro - Issue reason: Por Videoconferencia-Webinar Guru de los Gurus: Por solidos y amplios conocimientos - Issue reason: Por aportar conocimientos excepcionales 
Última Actividad 05.08.2026 17:33
Posts Posts: 200
Likes enviados Enviados: 70
Likes recibidos Recibidos: 157
Predeterminado
1
Likes

fastpho

 Inactivo Inactivo
os mereceis un premio a la perseverancia
Nitzer is offline   Responder Con Cita
Respuesta
Página 3 de 3 12 3

« Tema Anterior | Próximo Tema »

Herramientas

Derechos de Publicación
No puedes publicar nuevos temas
No puedes publicar posts/responder
No puedes adjuntar archivos
No puedes editar tus posts
BB code is habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 14:02.
Powered by: vBulletin, Versión 3.8.7
Derechos de Autor ©2000 - 2026, Jelsoft Enterprises Ltd.

Top
 Archivo - Cobol Foro
Webdesign by: vbdesigns.de
Contactar con Nosotros - Cobol Foro
Top