Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Mensajes - Zeroql

#161
Bueno se que esto suena sencillo. pero no me cuadra

Tengo un archivo con una informacion almacenada como un .INI
asi:
[DATABSE]
Version=1.0
Encoding=UTF-8
Name=Usuarios
UsePass=False
NumTables=1

bueno, quiero borrar una linea completa, para ello uso el sistema fileopen apra abrir el archivo.

pero como puedo borrar la liena completa, sin que me quede un espacio vacio???
he intentado de todo y no me da. agradezco toda la ayuda.
#162
Acabe de borrar los archivos de actualizacion eso sirve?
#163
COMO PUEDO CANCELAR UNA ACTULIZACION DE BIOS HECHA DESDE WINDOWS...
OSEA que EL PROGRAMA ME PIDE REINICIAR LA PC PARA LA ACTUALIZACION Y NO QUIERO que LA ACTUALIZE....




Buenas. bueno resulta que descarge una actualizacion para una bios de otra board es una foxconn.
el caso es que venia un instalador y pense que serian los archivos comprimidos, le di instalar, pero en ves de descomrimirme me hace la tarea de actualizar de una ves la bios

mi pc es un emachines d620 y por guevon, al descomprimir ese archivo fue que practicamente le dije a mi pc que actualizara la bios con la de otro pc, NO HE APAGADO NI REINICIADO, pero el pc me pide que lo haga para la actualizacion,

mi pregunta es como puedo revertir este proceso para que no haga ninguna actualizacion de bios y yo pueda estar tranquilo...
de ante mano muchas gracias
#164
Muchas gracias por el code 43H4FH44H45H4CH49H5
pero solucione todo de una forma mas facil.
usando una variable global que cuando se llame form este es true, y al cerrar le form este comprueba si es true, si es asi, que recarge lo que necesito....
igual a todos muchas gracias por su tiempo, y dedicacion, espermos que a alguien que tambien necesite lo mismo le puedan servir los codes y ayudas propuestos., igual tambien me puede servir en otro programa que tengo empezado el code...
#165
seba123neo ya intente tu propuesta y tira el siguiente error

Un formulario que no es de nivel superior no se puede mostrar como un cuadro de diálogo modal. Quite el formulario de los formularios primarios que lo contengan antes de llamar a showDialog.

43H4FH44H45H4CH49H5 ti digo que eso de la varible es interesante, pero como la controlo en la funcion???

heee resulta kelo llamo en modal por la razon de que la funcion que lo llama es de datos y el form es para agregar nuevos datos, cuando devuelve el control a la funcion debe recargar la lista de datos con el agregado por el form. por eso ese diseño
#166
No puedo usar showdialog, por que el form tambien hace parte de un mdiparent, y me tira error al llamaro con showdialog.
autoResetEven, no me sirve, avanza normalmente la funcion que llama al form.
alguien tiene otra idea?
#167
Buenas. pues es simplemente lo que dice el titulo
resulta que tengo una funcion para guardado de datos, pero necesito llamar un form que me muestre otros datos para seleccionarlos. el punto es que los form son form hijos asi que no se puede usar el showdialog.

como puedo llamar al form y hacer k la operacion de la funcion se pause hasta que el form se descarge???

De ante mano muchas gracias.
#168
Posteo el que tengo actualmente.


Contiene, un Label=lblTitle, un panel=pnTitle,2 imagenes= picExit; picMaxMin, y algunas funciones de manejo de ventanas.
Código (vbnet) [Seleccionar]
Public Class frmAddItem

    Private maximized As Boolean                        'Indica si el formulario esta maximizado o normal

    Private Sub frmAddItem_FormClosed(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosed
        CloseForm(Me.Name)
    End Sub

    Private Sub frmAddItem_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Me.MdiParent = mdiMain
        loadImgsTitle(Me)
        loadForm(Me.Name, Me.Text)
    End Sub

    Private Sub frmAddItem_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
        Dim oPen As New Pen(Color.DimGray, 1)
        Dim oGraphics As Graphics = Me.CreateGraphics
        oGraphics.DrawLine(oPen, 0, 0, 0, Me.Height)
        oGraphics.DrawLine(oPen, Me.Width - 1, 0, Me.Width - 1, Me.Height)
        oGraphics.DrawLine(oPen, 0, Me.Height - 1, Me.Width, Me.Height - 1)
        oPen = New Pen(Color.DarkGray, 1)
        oGraphics.DrawLine(oPen, 1, 0, 1, Me.Height)
        oGraphics.DrawLine(oPen, Me.Width - 2, 0, Me.Width - 2, Me.Height)
        oGraphics.DrawLine(oPen, 0, Me.Height - 2, Me.Width, Me.Height - 2)
        oPen.Dispose()
        oGraphics.Dispose()
    End Sub

    Private Sub frmAddItem_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Resize
        If maximized = True Then
            Me.Width = mdiMain.ClientRectangle.Width - frmMenu.Width - 5
            Me.Height = mdiMain.ClientRectangle.Height - frmTaskBar.Height - 5
            If mdiMain.mnuMain.Visible = True Then
                Me.Top = mdiMain.mnuMain.Height + 2
            Else
                Me.Top = 0
            End If
        Else
            Me.Width = 687
            Me.Height = 560
            Me.Left = (mdiMain.ClientRectangle.Width - Me.Width) / 2
            Me.Top = (mdiMain.ClientRectangle.Height - Me.Height) / 2
        End If
        pnTitle.Width = Me.Width
        picExit.Left = pnTitle.Width - picExit.Width - 3
        picMaxMin.Left = picExit.Left - picMaxMin.Width - 3
        Me.Left = frmMenu.Width
    End Sub

    Private Sub picExit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles picExit.Click
        Me.Close()
    End Sub

    Private Sub picExit_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles picExit.MouseMove
        Dim shellR = New shellresx.clsRes
        picExit.Image = shellR.useImage("btExitS")
    End Sub

    Private Sub picMaxMin_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles picMaxMin.Click
        maximized = Not maximized
        frmAddItem_Resize(Nothing, Nothing)
        me.refresh
        frmAddItem_Paint(Nothing, Nothing)
    End Sub

    Private Sub picMaxMin_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles picMaxMin.MouseMove
        Dim shellR = New shellresx.clsRes
        picMaxMin.Image = shellR.useImage("btMaxS")
    End Sub

    Private Sub pnTitle_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pnTitle.MouseDown
        MoveForm(Me)
    End Sub

    Private Sub pnTitle_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pnTitle.MouseMove
        Dim shellR = New shellresx.clsRes
        picExit.Image = shellR.useImage("btExitN")
        picMaxMin.Image = shellR.useImage("btMaxN")
    End Sub
End Class



#169
Heee ya lo intente y no me da!!!
#170
Buenas bueno resulta que tengo un form que al iniciarse se dibujan unas lineas. normal uso el siguiente metodo:

Código (vbnet) [Seleccionar]
Private Sub frmAddItem_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
        Dim oPen As New Pen(Color.DimGray, 1)
        Dim oGraphics As Graphics = Me.CreateGraphics
        oGraphics.DrawLine(oPen, 0, 0, 0, Me.Height)
        oGraphics.DrawLine(oPen, Me.Width - 1, 0, Me.Width - 1, Me.Height)
        oGraphics.DrawLine(oPen, 0, Me.Height - 1, Me.Width, Me.Height - 1)
        oPen = New Pen(Color.DarkGray, 1)
        oGraphics.DrawLine(oPen, 1, 0, 1, Me.Height)
        oGraphics.DrawLine(oPen, Me.Width - 2, 0, Me.Width - 2, Me.Height)
        oGraphics.DrawLine(oPen, 0, Me.Height - 2, Me.Width, Me.Height - 2)
        oPen.Dispose()
        oGraphics.Dispose()
    End Sub


ahi no tengo problema. pero resulta que deseo hacer el form redimencionable y borrar estas lineas y crear otras nuevas con el nuevo tamaño del form.
¿Como hago para borrar las antiguas lineas?


De ante mano les agradezco la ayuda