Posts: 6755
Joined: Wed Feb 15, 2012 08:25 PM
Re: Ejemplo de agenda telefonica
Posted: Wed Sep 16, 2015 09:55 PM
cnavarro wrote:RSalazarU wrote:
Respecto a la espiral, te cuento que es algo sencillo de hacer, Al TSplitter() le coloque un TBrush() que tiene un BITMAP(yo lo hice desde recurso) con un solo "Gancho" (espira); el resto es automatico.
  oRS:oSplit:=TSplitter():New(1,oRS:oWnd:oLeft:nWidth+1,.T., {oRS:oWnd:oLeft},.F.,{oRS:oWnd:oRight}, .T., {|| 100}, {|| 1},oRS:oWnd,, W_SPLITER, 0, .T., .T.,, .F., .T. )
  oRS:oSplit:oBrush := TBrush():New( ,,,"Gancho",,"RESIZE")
  oRS:oSplit:oBrush:Resize( oRS:oSplit,, W_SPLITER-2 )
Rolando.
A mi tambien me habia llamado la atencion el tema del "muelle"
Tu solucion, muy buena
Gracias
Me ha gustado el detalle, pero si le pongo lo del

Brush:Resize( ::oVSplitR,, 24 ) no me aparece el bmp

Cristobal Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces