Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: Alquimista_hack en 22 Agosto 2007, 20:28 pm



Título: Ayuda con editor de texto
Publicado por: Alquimista_hack en 22 Agosto 2007, 20:28 pm
hola estoy programando un editor de texto, lo tengo casi completo.
Lo unico que me falta y que no se como se hace son la opcion de desaser y la opcion de imprimir utilizando el common dialog

Estuve buscando en google y los codigos que encontre no me funcionaron.
Por favor si alguien sabe como poostelo

Salu2


Título: Re: Ayuda con editor de texto
Publicado por: HaDeS, - en 25 Agosto 2007, 03:09 am
Para deshacer el texto se hace:
Código
  1. Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
  2. Private Const DESHACER = &HC7
  3.  
  4. Private Sub Command1_Click()
  5. SendMessage Text1.hwnd, DESHACER, 0&, 0&
  6. End Sub
  7.  

Con el codigo para imprimir debe ser algo como
Código
  1. CommonDialog1.ShowPrinter
  2.  

pero no se que mas le sigue, como no tengo impresora no puedo publicar con certeza el codigo, asi que lo dejo a medias :P
alguien que tenga impresora o donde conseguir la forma de imprimirlo que nos de una mano que tmb quiero aprender.
saludos ;)