SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: Lemus en Lunes 28 de Marzo de 2005, 04:06

Título: Texto Vertical
Publicado por: Lemus en Lunes 28 de Marzo de 2005, 04:06
Hola a todos, espero que se encuentren bien.

Me preguntaba si ¿visual basic soporta el texto con una orientación vertical y si este sería posible que se imprimiera?.

Si alguien sabe me podria orientar porque realmente no se si se puede hacer directamente en un formulario o en un datareport o equivalentes.

De antemano gacias por tomarse el tiempo para leer mi post y gracias de nuevo por su ayuda.

Lemus.
Título: Re: Texto Vertical
Publicado por: RadicalEd en Martes 29 de Marzo de 2005, 18:43
Yo lo hago asi:
Código: Text
  1. Option Explicit
  2. Private Sub CmdAce_Click()
  3. Dim x, a
  4. x = Len(Text1.Text)
  5. For a = 1 To x
  6.   Lbl.Caption = Lbl.Caption & vbCrLf & Mid(Text1.Text, a, 1) ' & vbCrLf
  7. Next a
  8. End Sub
  9.  
  10.  
Ojala te sirva.
Chao
Título: Re: Texto Vertical
Publicado por: Lemus en Miércoles 30 de Marzo de 2005, 07:05
Gracias RadicalEd

Efectivamente muestra el texto en forma vertical...

Pero no es lo que busco, ya que me referia en cuanto a texto vertical a que cada letra este girada de tal forma que encuentre la posición vertical, o lo que sería lo mismo ver una palabra (o letra) desde un angulo de -90 ó 90 grados.

RadicalEd te agradezco el tiempo que me diste.
Título: Re: Texto Vertical
Publicado por: RadicalEd en Miércoles 30 de Marzo de 2005, 17:23
ay si no sabo:( :(
Título: Re: Texto Vertical
Publicado por: RadicalEd en Miércoles 30 de Marzo de 2005, 19:21
mmm ahora que me acuerdo, puedes usar punteros, mira estos tutos de punteros en vb.
punteros 1 (http://ftp://ftp.idg.es/pub/pcworld/listados/PunterosVBI.zip)
punteros (http://ftp://ftp.idg.es/pub/pcworld/listados/Codigo%20Punteros%20VB%20Parte%20II.zip)
Título: Re: Texto Vertical
Publicado por: Brroz en Jueves 31 de Marzo de 2005, 10:37
Hola.

Me parece recordar que el api del gdi proporciona alguna función para rotar imágenes. Siendo así, lo único que se necesita es pintar el texto en el correspondiente DC y rotar la imagen.

Chao.
Título: Re: Texto Vertical
Publicado por: Lemus en Domingo 3 de Abril de 2005, 11:12
Gracais a ambos, voy a revisar lo de los punteros y a checar lo de la api...

gracias...