FiveTech Software tech support forums

... einmal persönlich kennen lernen. We have to find out why METHOD Refresh() INLINE If( ::bGet != nil, ::SetText( Eval( ::bGet ) ),) does not read ::cCaption of :settext() method. Best regards, Otto

... sería mejor hacer el refresh después de establecer el nuevo ancho ? ANTES AEval(aoSay,{|o,n| o:Refresh() ,o:nWidth := GetTextWidth( 0, Alltrim(o:cCaption), o:oFont:hFont ) + if(alBorder[n],6,0) }) AHORA AEval(aoSay,{|o,n| o:nWidth := GetTextWidth( 0, Alltrim(o:cCaption), o:oFont:hFont ) + if(alBorder[n],6,0), ...

... nLangID puede ser una de las constantes disponibles en https://docs.microsoft.com/en-us/window ... nd-strings * Mejora en la función MsgRun( cCaption, cTitle, bAction, oWndParent, aColor ) - Nuevo: Quinto parámetro opcional aColor. Matriz de dos colores, color de texto y fondo. - Si se especifica ...

... of the constants available in https://docs.microsoft.com/en-us/windows/win32/intl/language-identifier-constants-and-strings * Enhancement MsgRun( cCaption, cTitle, bAction, oWndParent, aColor ) - New: 5th optional parameter aColor. Array of 2 colors, Text and back colors - If oWndParent is speicified, ...

... funcionar lo que hice funcionar DEFINE ICON surge resource "icoprog" DEFINE DIALOG oDlg resource "lisbus_1" ICON surge odlg:cCaption:= "Clientes" REDEFINE LISTBOX olbm FIELDS (oDbf:calias) ->NAPE ID 101; ON DBLCLICK (lacepto:= .t.,odlg:end()) of odlg olbm:setfocus() ...

... MDI si ya esta abierta. LOCAL i:=0, lSuccess:=.f. cTitle:=upper(cTitle) FOR i=1 TO LEN(oWndP:oWndClient:aWnd) IF UPPER( oWndP:oWndClient:aWnd[i]:cCaption )=cTitle oWndP:oWndClient:aWnd[i]:SetFocus() lSuccess:=.t. ENDIF NEXT RETURN lSuccess Return NIL

In Class TSAY I added Line 93 // DEFAULT nWidth := SAY_CHARPIX_W * Len( ::cCaption ) - 4 DEFAULT nWidth := GetTextWidth( 0, ::cCaption, If( oFont != nil, oFont:hFont,; If( oWnd:oFont != nil, oWnd:oFont:hFont,) ) ) + 5 because NO textwidth and height is defined ...

... color when the bbtnbmp is press or over and chenged the border But I not have the theme effect then I thinked to BUTTOMBMP but I have problem with cCaption not refresh

yes I write it on the same coordinates for each btnbmp If I set aBmps[nY,nX]:ccaption := ALLTRIM(STR(nElemento)) I see the numbers on btnbmp as you can see here but as cCaption https://i.postimg.cc/4x0H4szS/mmm.png I not Understood with old fwh ...

... TRadio ... ... cPrg += CRLF + " @ " + cTop + ", " + cLeft + ; " RADIOITEM " + ::cVarName + ' PROMPT "' + ::cCaption + '"' + ; " ;" + CRLF + ' SIZE ' + cWidth + ", " + cHeight + ; " PIXEL OF " + ::oWnd:cVarName + " ;" ...

Can Update a label on a Group control ...if yes How ?

I made
oGroupPreview:cCaption:="Preview "+str(nWBmp)+"X"+str(nHBmp)
oGroupPreview:refresh()

not run !!!!

You know cTitle / cCaption of dialog? if you know cCaption, sample //----------------------------------------------------------------------------////Function BuscaDialog( cTitle )   local nAt  := Ascan( GetAllWin(), ...

... + oBtn2:nHeight )}, 100, 30,,, .F., .T., .F.,, .F.,,, .F.,, .F. ) WITH OBJECT oBtn1 := TButton():New() :SetBounds( 110, 100, 210, 130 ) * :cCaption := "Menu 2010" :SetText( "Menu 2010" ) :bAction := {|| menu2010( oWnd, oBtn2:nTop + oBtn2:nHeight ) } END WITH OBJECT oBtn2 ...

... i eventos que voy definiendo segun el caso, pues vendria a ser como... WITH OBJECT oBtn1 := TButton():New() :SetBounds( 110, 100, 210, 130 ) :cCaption := "&Menu" :bAction := {|| menu(oWnd) } END WITH OBJECT oBtn2 := TButton():New() :SetBounds( 110, 140, 210, 170 ) :bAction := ...

... a fieldname with deleted, BIT 1 and than trie to make a sql filter to show or not show this. ACTION (oRs:SetFilter( "ploeg2017 = ?", { ::cCaption } ) But than for a fieldname deleted = .t. or delted = .f. (How in SQL) Thanks.