Mensajes

x cierto si kiers q tp c vea la barra d herramientas kixas sea 1 chapuza,pero yo kito el caption dl frm y tbn el controlbox y ya ocupa todo.
y la verdad para q c mantenga el tamaño = a la pantalla dps d cambiar la resolución lo uniko k c m ocurre es una cosa asi...

Código [Seleccionar] Expandir


'el frm centrado "CenterScreen" y al cargar q esté

en el load:
'creo k habria q ponerlo en el load aparte de en el timer pq sino, aunq esté centrado al empezar el timer, c agrandaria a la drcha y hacia abajo.

Form1.Width = Screen.Width
Form1.Height = Screen.Height

en un timer:
Form1.Width = Screen.Width
Form1.Height = Screen.Height


pero m da k tbn es una chapuza, cuestión d probarlo...( es k aki no tengo el vb)

saludos!

[CenterScreen]

Eso ya lo tengo solucionado, aparte, de esa forma, se agranda para abajo y hacia la derecha, pero no queda perfectamente cubierto del todo.

sí, se rueda a la drcha debido a la posicion dl frm. En las propiedades si cambias StartUpPosition a "2 - CenterScreen" se keda perfectamente alineado.
weno hace tiempo k hice esto para un proyecto, pero m parece q era así...

  y esto no serviría??

Código [Seleccionar] Expandir

    Form1.Width = Screen.Width
    Form1.Height = Screen.Height

  gracias, hay codes d gran ultilidad en esa pag
salu2!

hay un foro de troyanos, empieza a leer los q tienen chincheta , en mi opnión está todo muy completo

[pantalla]

con ese método ves el fondo de la pantalla, pero como sería para q c viera el fondo del form? (x ejemplo en caso d q se quisiera ver una imagen en el picture dl form?)

si es guardar una imagen q esté en un Image con un commondialog yo lo haría así..

Código [Seleccionar] Expandir

Private Sub Command1_Click()
On Error Resume Next
CommonDialog1.DialogTitle = "Guardar imagen" ' titulo
CommonDialog1.Filter = "Extensiones de Imágenes(*.jpg)|*.jpg|" ' las q c kieran
CommonDialog1.ShowSave
SavePicture Image1.Picture, CommonDialog1.FileName ' guardar
'con un picture seria = pero cambiando image1 x picture1
End Sub

Spero q esot t ayude

Código [Seleccionar] Expandir

Private Declare Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long
Private Const PROCESS_QUERY_INFORMATION = &H400

Dim DirArchivo As String

Private Sub Form_Load()
DirArchivo = "C:\texto.txt"
Comprobar (DirArchivo) ' comprobamos q exista ese archivo
End Sub

Public Sub Comprobar(Directorio As String)
On Error Resume Next ' en caso d error continúa
Open Directorio For Input As #1

If Err Then ' error x tanto no existe
MsgBox "El archivo no existe"
Else
MsgBox "El archivo existe"
End If
Close #1

End Sub

Saludos!

  x cierto muxos chats q he visto con vb usan siempre y lógicamente la ip. Pero no habria alguna forma de conectarse al usuario como con el NoIp? m refiero a si es posible q los q tengan ese programa mantengan una ip fija y se guarde. Así si abren el programa cambiar la ip y en una lista ver a todos los que lo tienen abierto y elegir con kien hablar...Y si esto fuese posible, guardando la ip fija de quienes quieras podrías hacer algo similar a la lista de contactos agregados como la dl msn...no? ...weno no c si es toy desvariando, pero m preguntaba si era posible para evitar tener k estar poniendo ips.

saludos!

  está bastante bien ( con alguna faltilla de ortografía, pero genial! )