FiveTech Software tech support forums

... Local oBmp DEFINE Font ::oFont Name 'Arial' Bold SIZE 0,-11 Define Window oSelf:oWnd Title oSelf:cTitle Menu oSelf:MakeMenu() COLOR CLR_BLACK, nrgb(128,200,240) ::PongaElTree( ) Activate Window oSelf:oWnd Maximized On Init oSelf:Timer( oSelf:oWnd ) Return Self ********************************************************* ...

REDEFINE FOLDER oFld ID 101 OF oDlg ; PROMPT "Dados Co&merciais ", "Com&plemento " ; DIALOGS "FLD_CLIENTES", "FLD_CLIENTES_2" ; COLORS nRGB( 127, 127, 127 ), nRGB( 143, 188, 143 ) ; ADJUST

... DestroyCaret() CreateCaret( ::hWnd, 0, 6, ::nGetChrHeight() ) ShowCaret( ::hWnd ) endif else HideCaret( ::hWnd ) endif Super:GotFocus() ::setcolor(nRGB(0,0,0),nRGB( 231,226,141)) // cuando toma el foco pone el fondo amarillo return 0

... maybe Antonio can answer this one. 2 . Caption and color DEFINE DIALOG oDlg RESOURCE "msgDaNe" title "xxxxx" color clr1,clr2 Clr1 and clr2 can be nrgb(.....) or CLR_WHITE, CLR_BLUE etc... 3. Same for Redefine say just add color xx,xx at the end 4. You can always change dialog size at activation ...

... EDITABLE; 3DLOOK TRUE MOVE DT_MOVE_RIGHT; PICTURE "9999.99"; Head "Cantidad" Width 70 Align 2,1; COLORS nRgb(0,0,0),nRgb(160,235,170); Post Edit(Venta1->Tot_art:=Venta1->Can_Art*Venta1->Pre_Art,; Calcula_Total(),oLbx1:Refresh()) Error Path and ...

... EDITABLE; 3DLOOK TRUE MOVE DT_MOVE_RIGHT; PICTURE "9999.99"; Head "Cantidad" Width 70 Align 2,1; COLORS nRgb(0,0,0),nRgb(160,235,170)

... FieldWBlock("Can_Art",Select("Venta1")); EDITABLE; 3DLOOK TRUE MOVE DT_MOVE_RIGHT; PICTURE "9999.99"; Head "Cantidad" Width 70 Align 2,1; COLORS nRgb(0,0,0),nRgb(160,235,170); Post Edit(Venta1->Tot_art:=Venta1->Can_Art*Venta1->Pre_Art,; Calcula_Total(),oLbx1:Refresh()) Add Column To ...

... := NIL if nStyle == 1 .or. nStyle == 2 // headers and footers nClr := GetSysColor( 15 ) if nStyle == 1 .and. nFtr # NIL if nFtr == nCol nClr := nRGB( 192, 192, 192 ) endif endif elseif nStyle == 3 // active cells nClr := GetSysColor( 13 ) if ( ::lCellStyle .and. nCol == ::nColAct ) .or. !::lCellStyle ...