hacker


Ingresar con nombre de usuario, contraseña y duración de la sesión
| Portal Hacker | Editorial | Descargas | Ezine |
Inicio Ayuda Ingresar Registrarse
25 de Julio de 2008, 04:40:49
Noticias: Convocatoria E-zine CPH #2
Para ver este enlace Registrate o Inicia Sesion
Aquí

+  Foros pOrtal Hacker
|-+  Programacion
| |-+  Programación en general
| | |-+  Visual Basic (Moderadores: ranefi, crypto136, ziBboh, >> s E t H <<)
| | | |-+  Editor de texto [Ayuda]
0 Usuarios y 1 Visitante están viendo este tema. « anterior próximo »
Páginas: [1] Ir Abajo Imprimir
Autor Tema: Editor de texto [Ayuda]  (Leído 196 veces)
HNAFE
NZ2
**
Desconectado Desconectado

Mensajes: 220

|| ذµㄙиㄅ£ ||


Ver Perfil
« : 26 de Agosto de 2007, 05:32:01 »

Estoy haciendo un pequeño editor de texto, pero el problema es que no encuentro el code para la opción de abrir y guardar, y la otra duda que tengo es como le ago para que cuando agrande el formulario, el textbox se agrande con el  Huh

$4!u2
En línea

-SharK_90-
Colaborador
****
Desconectado Desconectado

Mensajes: 677


NO SPAM


Ver Perfil WWW
« Respuesta #1 : 26 de Agosto de 2007, 06:12:28 »

Para la opcion de abrir y guardar tenes que usar un CommandDialog

Código:
Private Sub Command1_Click()
CommandDialog1.ShowOpen
End Sub

Bueno fijate como funciona... y todo eso..!
Para abrir la pantalla "Guardar" pone: CommandDialog1 .ShowSave
Para abrir la pantalla "Abrir" pone: CommandDialog1 .ShowOpen


Citar
como le ago para que cuando agrande el formulario, el textbox se agrande con el

SALu2

Fijate si te sirve esto: (Agrega un Text1)

Código:
Private Sub Form_Resize()
Text1.Width = Form1.Width
Text1.Height = Form1.Height
End Sub
En línea

---BasketBall----
ActiveSheet
NZ2
**
Desconectado Desconectado

Mensajes: 108


Hack México.


Ver Perfil WWW
« Respuesta #2 : 26 de Agosto de 2007, 11:09:59 »

jajajajaja xD

me rio por todo, mira chico no te recomiendo el commandialog por que no es compatible con  muchos SO aun teniendo el control ActiveX referente.

mejor usa esto asi puedes abrir a guardar cosas sin persepcion del usuario

Abrir
Código:
Private Sub cmdAbrir_Click()
   Dim i As Integer
    i = FreeFile
    Open Environ("TMP") & "\xD.txt" For Input As #i
        Text1.Text = Input(LOF(i), #i)
    Close #i
End Sub

Escribir
Código:
Private Sub cmdEscribir_Click()
 Dim i As Integer
    i = FreeFile
    Open Environ("TMP") & "\xD.txt" For Output As #i 'Output o append
        Print #i, Text1.Text
    Close #i
End Sub

y algo mas elegante sobre el suceso resize

Código:
Private Sub Form_Resize()
Text1.Move ScaleLeft + 100, ScaleTop + 100, ScaleWidth - 200, ScaleHeight - 200
End Sub
« Última modificación: 26 de Agosto de 2007, 11:11:14 por ActiveSheet » En línea


Para ver este enlace Registrate o Inicia Sesion




En que te puedo ayudar?.
>> s E t H <<
Moderador
*****
Conectado Conectado

Mensajes: 892


jelou guorld


Ver Perfil WWW
« Respuesta #3 : 27 de Agosto de 2007, 07:54:16 »

habria que ver xq el commondialog tiene varias opciones que ya vienen incorporadas y lo del tamaño si es mejor lo de abajo xq es mas prolijo
En línea


Para ver este enlace Registrate o Inicia Sesion
MI FIRMA Tongue


Para ver este enlace Registrate o Inicia Sesion
Citar
Cue3008 dice:
algun dia El Polaco se fusionara con el PUNCHI-PUNCHI, permitiendo que Chetos y Villeros convivan en paz por los siglos de los siglos, amen
Cita de: vassily
Me banneare por 10 minutos
Update: No me puedo bannear =(

Para ver este enlace Registrate o Inicia Sesion
Mi guia de reacion de worms en vb parte 1

Para ver este enlace Registrate o Inicia Sesion
Mi guia de reacion de worms en vb parte 2


Para ver este enlace Registrate o Inicia Sesion
Bajar VB6 - Librerias - Tools para programar

Para ver este enlace Registrate o Inicia Sesion
Guias de VB


Para ver este enlace Registrate o Inicia Sesion
Compiladores ACA
y mira los fijos
LAS PREGUNTAS EN EL FORO, NO X MP!
-SharK_90-
Colaborador
****
Desconectado Desconectado

Mensajes: 677


NO SPAM


Ver Perfil WWW
« Respuesta #4 : 27 de Agosto de 2007, 07:57:26 »

Citar
me rio por todo, mira chico no te recomiendo el commandialog por que no es compatible con  muchos SO aun teniendo el control ActiveX referent

Si.. pero lo que el esta haciendo es un editor de texto... y cuando pone Guardar... supuestamente el usuario elige la ruta donde guardarlo.! y para eso le tiene que aparecer una ventana para elegir la ruta.:!! Y para eso es más conveniente el CommandDialog.

Tambien puede usar las API's de Windows.. pero es más complicado!

Yo te recomiendo usar el CommandDialog
SALu2
En línea

---BasketBall----
ActiveSheet
NZ2
**
Desconectado Desconectado

Mensajes: 108


Hack México.


Ver Perfil WWW
« Respuesta #5 : 27 de Agosto de 2007, 07:19:48 »

na pues es algo muy sencillo  mejor que lo aga en Visual Basic 9

en eso tipo de softwares es nula la diferencia de sintaxis
En línea


Para ver este enlace Registrate o Inicia Sesion




En que te puedo ayudar?.
Páginas: [1] Ir Arriba Imprimir 
« anterior próximo »
Ir a:  


Ingresar con nombre de usuario, contraseña y duración de la sesión

Powered by SMF 1.1.5 | SMF © 2006-2008, Simple Machines LLC hacker

Juegos gratis - Articulos PHP - Juegos - Trucos - Letras - Juegos - Juegos Online