Visual Basic para Aplicaciones - dibujar organigramas

Life is soft - evento anual de software empresarial
 
Vista:

dibujar organigramas

Publicado por graciela (2 intervenciones) el 25/02/2002 04:01:31
Hello!!!
Recien me inicio en este lenguaje y necesito ayuda para poder realizar
una aplicacion en VB que me permita la creacion de Organigramas (tipo Orgchart del PowerPoint). Me interesa sobremanera poder dibujar los entegramas puidiendole agregar texto.
Agradezco la ayuda que me puedan brindar. un agradecimiento especial a Oscar Pinones por su comentario. El tiempo para hacerlo es escaso y por ello mi pedido. Otra vez GRACIAS.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:dibujar organigramas

Publicado por Samus (18 intervenciones) el 26/02/2002 06:13:16
Primero se necesita tener como base un cuadro picturebox ya que este permite dibujar y hacer otras cosas.
Para dibujar lineas usa:
picture1.line (X1,Y1) - (X2,Y2), Color

para escribir en el picturebox usa:
picture1.print (Cadena)
donde Cadena es un string con un texto.
pero antes debes especificar donde poner el texto con:
picture1.currentx = Coordenada x en el cuadro
picture1.currenty = Coordenada y en el cuadro

Si quieres especificar el grueso de la linea usa:
picture1.drawwidth = numero (por defecto es 1)

Para especificar el color:
Color = RGB( rojo, verde,azul )
rojo verde y azul son numeros entre 0 y 255 que significan la cantidad del color que haya:
si son respectivamente
0 0 0 ---> Color Negro
255 255 255 Blanco
255 0 0 Rojo
255 0 255 Morado
80 80 80 Gris
Etc

Estas instrucciones están mejor explicadas en libros en pantalla en el menu de ayuda.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:dibujar organigramas

Publicado por sandra patricia (1 intervención) el 30/09/2009 16:31:34
como dibujar un organigrama
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar