FiveTech Software tech support forums

Richard, please add this new fixsays to your code! ANTONIO, this problem with the wordbreak should also from you adapted! //*****************************************************#PRAGMA BEGINDUMP#include <WinTen.h>#include <windows.h>#include <ClipApi.h>//typedef ...

Antonio, when I change the declaration in windef.h from typedef int (FAR WINAPI *FARPROC)() to typedef long (FAR WINAPI *FARPROC)() then it is ok. I renamed also CLIPPER FIXSAYS( PARAM ) to HARBOUR HB_FUN_FIXSAYS()! With old syntax it is not functioning!? I add to the code in all three calls from Dr...

Günther,

In FixSays() we use this code:

Code: Select all  Expand view

      else   
         DrawText( hDC, text, lstrlen( text ), &rct, DT_LEFT ); // | DT_WORDBREAK );


I guess that we need to check if the text includes CRLFs so the style DT_WORDBREAK should be included too.

Maestro, yo pensé que nunca descansabas :wink: Hice lo siguiente: ACTIVATE DIALOG oDlg CENTERED ; ON INIT ( MsgInfo(GetWindowLong(oSay:hWnd,GWL_STYLE)) ) y me devuelve 1342308352. Qué significa ? Si FixSays() usa DT_WORDBREAK, al reemplazarla por Function FixSays() Return nil no debería reconocer es...

Carlos, Anoche era ya tarde y no me dió tiempo a hacer más pruebas :-) Lo primero sería comprobar que estilo realmente tiene el control al ser definido como LTEXT usando GetWindowLong() Al usar el estilo TRANSPARENT en el diálogo, desde la función FixSays() de FWH lo que hacemos es cambiarle el proc...

Antonio gracias por tu respuesta.

Me saltan algunas preguntas:

1. El estilo DT_WORDBREAK sólo se activa cuando se asigna la cláusula TRANSPARENT al DIALOG ?

2. Se puede desactivar ese estilo, y si se puede, dónde y cómo lo hago ?

Saludos,

Carlos Gallego

Carlos, Como solución temporal puedes hacerlo asi: #include "FiveWin.ch" Function Inicio() LOCAL oDlg, oFont1, oSay DEFINE FONT oFont1 NAME GetSysFont() SIZE 0,-14 BOLD DEFINE DIALOG oDlg RESOURCE "DIALOG_2" TITLE " Información IP" TRANSPARENT REDEFI...