FiveTech Software tech support forums

... nil oFont:Activate( ::oPrn:hDCOut ) ENDIF // 1,2 transparent or Opaque SetbkMode( ::oPrn:hDCOut, nBkMode ) IF nClrText != NIL #IFDEF __HARBOUR__ SetTextColor( ::oPrn:hDCOut, nClrText ) #ELSE SetTextCol( ::oPrn:hDCOut, nClrText ) #ENDIF ENDIF DO CASE CASE nPad == 1 // right nCol := Max( 0, nCol ...

... 5 minutos" lo que requiero es que se vean de forma "Transparente", como lo hace: oBmp:bPainted = { || SetBkMode( oBmp:hDC, 1 ),; SetTextColor( oBmp:hDC, CLR_BLACK ),; TextOut( oBmp:hDC, 20, 540, "Numero de Clientes:" ) } Pero necesito cambiarle, el color, el tamaño y ...

... @ 5, 5 BITMAP oBmp2 FILENAME "c:\conteo\logo.bmp" SIZE 500, 400 OF oWnd NOBORDER oBmp:bPainted = { || SetBkMode( oBmp:hDC, 1 ),; SetTextColor( oBmp:hDC, CLR_YELLOW ),; TextOut( oBmp:hDC, 50, 15, "Actualmente con nosotros" ) } //¿ Se puede cambiar el tamaño de la fuente ...

Hi Antonio. I'm trying to test mod_harbour . The first impression is EXCELLENT !!! Using harbour language on the web with Apache is absolutely amazing . WOW ...... Toady I’m trying to build the harbour for mod_harbour exe compiler for later building an hrb file to include inside my project. The comm...

... for all subsequent says, till they are reset either by another call to Say() method with a different color and bkmode or explicitly changed by SetTextColor() / SetBkMode(). In other words, calling Say() with a text color, switches the color for the current and all subsequent says, rather than ...

... have to modify that class every time you have an update. Here is what I suggested: line 614: Add: , nOldColor := GetTextColor( ) line 659: Add: SetTextColor( ::hDCOut, nOldColor ) I was surprised this was not considered on this release since the suggestion was provided several weeks ago, and ...

... SelectPage SetBaseURL SetInformation SetMeasurementUnits SetOrigin SetPageBox SetPageDimensions SetPageLayout SetPageMode SetPageSize SetTextAlign SetTextColor SetTextSize SetTextUnderline Unfortunately, ImportEMFFromFile is not one of them..

... nBkMode, cText, nTop, nLeft, nWidth, nHeight,color,color2 ) LOCAL hFontOld:= SelectObject( hDC, hFont ) LOCAL nBkOld := SetBkMode( hDC, nBkMode ) SetTextColor( hDC, color ) setBkColor( hDC, color2 ) DrawText( hDC, cText, { nTop, nLeft, nTop+nWidth, nLeft+nHeight } ) SelectObject( hDC, hFontOld ...

... hFont, nBkMode, cText, nTop, nLeft, nWidth, nHeight,color ) LOCAL hFontOld:= SelectObject( hDC, hFont ) LOCAL nBkOld := SetBkMode( hDC, nBkMode ) SetTextColor( hDC, color ) DrawText( hDC, cText, { nTop, nLeft, nTop+nWidth, nLeft+nHeight } ) SelectObject( hDC, hFontOld ) SetBkMode( hDC, nBkOld ...

Estou tentando trocar a cor do Texto do botão em ButtomBmp mais não funciona.

To fazendo assim:
oBtnCancel:nClrText := CLR_HRED

Ja tentei SetColor, SetTextColor(oBtnCancel:hDC,CLR_HRED) também não funciona.

Alguem tem outra solução ?

Antonio, aquí la segunda parte: Error: Unresolved external '_HB_FUN_DRAWTHEMED' referenced from P:\32BITS\FWH\LIB\FIVEHX.LIB|DIALOG Error: Unresolved external '_HB_FUN_GETDLGBASEUNITS' referenced from P:\32BITS\FWH\LIB\FIVEHX.LIB|DIALOG Error: Unresolved external '_HB_FUN_CDLG2CHR' referenced from P...

... == 1 // si el calendario comienza en lunes se debería reemplazar por 7 para que las fechas domingo aparezcan en rojo en el calendario nOldClr := SetTextColor( hDC, nRGB(200,0,0) ) else nOldClr := SetTextColor( hDC, ::nClrText ) endif *----- fin fjhg al tener una constante el el valor de la columna ...

... 5 Question I can change the color of the text with ortf:SetTextColor( ChooseColor( ncolor ) ) but I not have the ncolor current of the text how I can found it ? --------------------------------------------------------------------------------------------------------------------------------------------- ...

... be created from hFont. Eg: oFont := TFont():New( hFont ) * Enhancement: Usage of TransBmp() simplified. It is not necessary to call SetBkColor(), SetTextColor() etc and not necessary to provide zerozeroclr before calling TransBmp() function.

... nil oFont:Activate( ::oPrn:hDCOut ) ENDIF // 1,2 transparent or Opaque SetbkMode( ::oPrn:hDCOut, nBkMode ) IF nClrText != NIL #IFDEF __HARBOUR__ SetTextColor( ::oPrn:hDCOut, nClrText ) #ELSE SetTextCol( ::oPrn:hDCOut, nClrText ) #ENDIF ENDIF DO CASE CASE nPad == 1 // right nCol := Max( 0, nCol ...