FiveTech Software tech support forums

Silvio, creo que el rectangulo de coordenadas donde muestras el texto tendría que ser mas grande Function  myfunc(hdc,oBold,cCod)           FW_SayText( hDC, ;           cCod, ;          {150,32,170, 250 },,oBold, ...

Silvio, creo que el rectangulo de coordenadas donde muestras el texto tendría que ser mas grande Function  myfunc(hdc,oBold,cCod)           FW_SayText( hDC, ;        ...

... Muestra en pantalla: 13.456.643- , el ultimo queda debajo del marco del borde. Quizas podria existir una forma de hacer una rectangulo de linea, para enmarcar en say, lo mismo podria existir para los get, algo mas bonito que un Border hundido como el que se genera. En una ...

... esta Bien oSheet:Shapes:AddPicture( cLogo, .F., .T., 560, 0, 130, 50 ) //Esto esta Bien oSheet:Shapes:AddShape(5, 20, 80, 300, 150):Select() //Rectangulo AZul oSheet:Shapes:AddShape(5, 450, 80, 300, 150):Select() //Rectangulo Azul * oShape:= oSheet:Shapes(1) * oShape:Interior:ColorIndex:= RGB(192,192,192) ...

... del Foro: La siguiente rutina: #include 'fivewin.ch' STATIC DiPru FUNCTION Main DEFINE DIALOG DiPru FROM 1,1 TO 30,50 TITLE 'Probando un simple Rectangulo' @ 1,1 TO 3,15 OF Dipru ACTIVATE DIALOG DiPru RETU nil ... con BCC55 mas XHB 0.99 LO EJECUTA BIEN y dibuja un rectangulo dentro del dialogo ...

... crea el lapiz a utilizar.y se carga. Local hPen1 := CreatePen(PS_SOLID, 3, nColor) Local hPenAnterior := SelectObject(hDC, hPen1) // Se dibuja el rectangulo MoveTo(hDC, aPuntos[2] + 1, aPuntos[1] + 1) LineTo(hDC, aPuntos[4] - 3, aPuntos[1] + 1) LineTo(hDC, aPuntos[4] - 3, aPuntos[3] - 2) LineTo(hDC, ...

... de sistema por llamarla de alguna manera, es decir, donde va el TITLE, sino que cambias el style para que desaparezca la barra y luego creas un rectangulo que emula la barra y alli centras el titulo, buen truco visual, pero me gusta como queda solo que para mover el dialogo o la ventana o para ...

Un saludo cordial a todos.
Como puedo hacer para cambiar la forma de una ventana ?, es decir que en vez de que sea un rectangulo sea un circulo, o adopte la forma de una figura ?
Gracias por su tiempo.
Modesto

Marcelo, también lo busqué en el manual pero evidentemente se me pasó por alto, muchísimas gracias.

Saludos

Hola, del manual de FW RoundRect() Previous Top Next Draws a rectangle with rounded corners. Syntax: RoundRect( <hDC>, <nTop>, <nLeft>, <nBottom>, <nRight>, <nEllipseWidth>, <nEllipseHeight> ) --> lSuccess Parameters: <hDC> Device context of the con...

Eso, quiero dibujarlo en una ventana. He buscado en el foro, hay para impresora pero no encontré para hacerlo en una ventana. Alguien sabe ??? Desde ya muchas gracias.

Saludos

... del propio browse, dibujar un rectángulo gris para que quede mas compensado. http://img24.imageshack.us/img24/5028/yvqz.png El rectangulo lo dibujé a mano, no es muy preciso, pero es la idea. Si bPainted funcionase, se podría poner   oBrw:bPainted:= {|hDC|         LOCAL ...

... no se como se comportan. La idea es crear una función que llamo en el INIT de la creación del diálogo/window, y con el XBrowse creado, dibujar un rectangulo gris que solo le de forma. Si el browse tiene datos el recuadro no es necesario, solo en las partes que quedan blancas. Estoy pensando que ...

Probaste pintar el rectangulo desde el on init del dialogo o ventana que estas usando?

Saludos

... no lo logro. La apariencia normal esta bien, pero si observas un get (WHEN .F.), queda mucho mejor a la vista y no como el get normal que queda un rectangulo hundido, con profundidad. He intentado con todos los estilos, border, noborder, etc. del editor de recursos, pero sin suerte. http://img842.imageshack.us/img842/5370/eeor.png ...