FiveTech Software tech support forums

Code: Select all  Expand view

  WITH OBJECT ::oBrw
      :nMarqueeStyle       := 5
      :bClrStd             := { || IF( ::oBrw:KeyNo() % 2 == 0, ;
                                       { CLR_BLACK, RGB( 255, 255, 255 ) }, ;
                                       { CLR_BLACK, RGB( 214, 255, 245 ) } ) }

      :bClrSel             := { || { CLR_BLACK,  RGB( 160, 240, 240 ) } }

      :lKinetic            := .F.
      :ltransparent        := .F.
      :lHScroll := .t.
      :lRecordSelector     := .F.
      :lAllowColSwapping   := .F.
      :lColDividerComplete := .F.
      :nRowDividerStyle    := 4
      :nStretchCol         := STRETCHCOL_LAST
      :nColDividerStyle    := 4

      :nHeaderHeight       := 25
      :nRowHeight          := 23
      :lFlatStyle          := .T.
 

Antonio Linares wrote:Estimado Gustavo,

Has especificado WS_VSCROLL como estilo en el recurso ?

Antonio Linares wrote:Parece que ya lo tienes activado

Puedes copiar aqui el fichero rc ?

Code: Select all  Expand view

DLGCLIENTE DIALOGEX DISCARDABLE 6, 18, 448, 337
STYLE DS_SHELLFONT|WS_POPUP|DS_MODALFRAME|DS_CONTEXTHELP|DS_3DLOOK|WS_CAPTION|WS_SYSMENU|WS_VISIBLE
CAPTION ".: Cliente :."
FONT 8, "Tahoma", 0, 0, 1
{
  CONTROL " Datos del CONTACTO directo ", 4001, "Button", BS_GROUPBOX, 15, 13, 416, 87
  CONTROL "Nombres:", 4003, "Static", WS_GROUP, 33, 31, 97, 8
  CONTROL "Edit", 100, "Edit", ES_AUTOHSCROLL|WS_BORDER|WS_TABSTOP, 33, 41, 101, 12
  CONTROL "Apellidos:", 4004, "Static", WS_GROUP, 154, 31, 97, 8
  CONTROL "Edit", 102, "Edit", ES_AUTOHSCROLL|WS_BORDER|WS_TABSTOP, 154, 41, 118, 12
  CONTROL "Email:", 4002, "Static", WS_GROUP, 284, 31, 99, 8
  CONTROL "Edit", 104, "Edit", ES_AUTOHSCROLL|WS_BORDER|WS_TABSTOP, 284, 41, 125, 12
  CONTROL "Whatsapp:", 4010, "Static", WS_GROUP, 33, 61, 99, 8
  CONTROL "Edit", 106, "Edit", ES_AUTOHSCROLL|WS_BORDER|WS_TABSTOP, 33, 71, 101, 12
  CONTROL "País:", 4006, "Static", WS_GROUP, 154, 61, 99, 8
  CONTROL "", 108, "ComboBox", WS_BORDER|CBS_DROPDOWNLIST|CBS_SORT|WS_VSCROLL|WS_TABSTOP, 154, 71, 133, 65
  CONTROL "Ciudad:", 4008, "Static", WS_GROUP, 304, 61, 85, 8
  CONTROL "Edit", 110, "Edit", ES_AUTOHSCROLL|WS_BORDER|WS_TABSTOP, 304, 71, 105, 12
  CONTROL " Solicitantes ", 4005, "Button", BS_GROUPBOX, 15, 111, 416, 187
  CONTROL "", 112, "ListBox", LBS_SORT|LBS_NOTIFY|WS_VSCROLL|WS_TABSTOP, 28, 131, 323, 159
  CONTROL "&Agregar Solicitante", 200, "Button", BS_MULTILINE|WS_TABSTOP, 366, 133, 50, 36
  CONTROL "&Ver Carpeta", 202, "Button", WS_TABSTOP, 15, 308, 69, 17
  CONTROL "&Guardar carpeta", 204, "Button", WS_TABSTOP, 362, 311, 69, 17
}