Mensajes

bueno otra vez yo. ultimamente andube preguntando demasiado, pero creanme q no es x falta de voluntad.

bueno, con la funcion q me dio seba, cree una funcion para numerar las lineas, pero resulta q tenia un par de bugs. intente sacarselos pero no he podido hacerlo. mi funcion quedo asi:

Código (vbnet) [Seleccionar] Expandir


    Public Sub UpdateNumber(ByVal text As RichTextBox, Optional ByVal newline As Boolean = False)
        Try
            Main.Numerator.Font = text.Font
            Main.Numerator.Clear()
            Dim index As Integer, fLine As Integer, lLine As Integer
            Dim pos As New Point(0, 0)
            index = text.GetCharIndexFromPosition(pos)
            fLine = text.GetLineFromCharIndex(index)
            pos = Cursor.Position
            index = text.GetCharIndexFromPosition(pos)
            If newline = True Then
                lLine = text.GetLineFromCharIndex(index) + 1
            Else
                lLine = text.GetLineFromCharIndex(index)
            End If
            If text.Lines.Count() > 200 And lLine < text.Lines.Count - 1 Then lLine += 1
            For l = fLine To lLine
                If 100000 < l < 1000000 Then
                    Main.Numerator.Text &= l & "." & vbNewLine
                ElseIf 10000 < l < 100000 Then
                    Main.Numerator.Text &= " " & l & "." & vbNewLine
                ElseIf 1000 < l > 10000 Then
                    Main.Numerator.Text &= "  " & l & "." & vbNewLine
                ElseIf 100 < l < 1000 Then
                    Main.Numerator.Text &= "   " & l & "." & vbNewLine
                Else
                    Main.Numerator.Text &= "    " & l & "." & vbNewLine
                End If
            Next
        Catch ex As Exception

        End Try
    End Sub

la verdad es q lo q yo quiero es algo asi: http://solidfiles.com/d/a017/(es el programa el cual estoy intentando copiar pero con mejoras, si no lo quieren bajar de ese link y lo quieren buscar se llama pawno.)

¬¬
si se la parte de obtener el color, pero como se q seleccionar? ese es mi problema, como seleccionar el texto q no este dentro de la lista de palabras.

despues de varios intentos, casi logro lo que queria. la funcion hace lo que quiero, pero solo tengo un problema. supongamos q colorea una palabra del listado de su color, hasta ahi todo perfecto, pero cuando yo empiezo a borrarla, el color sigue = intente cambiar el color antes, pero queda negro. alguna forma de comparar el color de un texto? xq no puedo usar split, para separar la cadena x partes y chequear el color de cada una y no se me ocurrio alguna forma de poder comparar el color en un string asi x ej:

Código [Seleccionar] Expandir

if(variable= 1 ){

problema resuelto. el problema era q no cargaba la linea por completo la funcion input

lo resolvi usando streams.
perdon x molestar.

no lo del highlight no lo pude resolver todavía asi q decidi descansar la cabeza x unos dias sobre eso y volverlo a empezar de 0. esto es para leer una lista de funciones q pueden usarse desde los includes.

bueno yo tengo una linea como x ej esta:

Código [Seleccionar] Expandir

native print(const string[]);

las lineas son diferentes pero cumplen ese formato.
( native nombre(parametros); )

ahora yo tengo definido un hashtable para almacenar la funcion y los parametros. para lo q cree este codigo:

Código (vbnet) [Seleccionar] Expandir


If line.IndexOf("native") <> -1 Then
   Main.ListBox1.Items.Add(Mid(line, 8, line.IndexOf("(") - 7))
   funct.Add(Mid(line, 8, line.IndexOf("(") - 7), Mid(line, line.IndexOf("(") + 2, line.IndexOf(";")-(line.IndexOf("(") + 2)))
End If


el problema es q me dice q el largo en el 2º mid debe ser mayor a 1. aun q desconozco xq tengo este problema siendo q todas las lineas terminan en un ";"

gracias.

edit:
las lineas son leidas desde un archivo, pero note q no las lee completas a algunas. ej:
si la linea es algo asi:

Código [Seleccionar] Expandir

native print(const string[]);
o asi:

Código [Seleccionar] Expandir

native GetTickCount();
pero si es asi:

Código [Seleccionar] Expandir

native printf(const format[], {Float,_}:...);
no la lee completa, solo lee una parte (x lo q pude notar lee hasta el primer "[]") y ahi para.

para leer las lineas uso:

Código (vbnet) [Seleccionar] Expandir

FileOpen(FF, i, OpenMode.Input)
While Not EOF(FF)
   Input(FF, line)

Como dijo Seba, busca Syntax Highlighter en Google, o proba buscando en recursosvisualbasic.net


Saludos, Sancho.Mazorka   

ya busque y ninguno me sirvio ademas de q intente editar varios y tmp funcionaron como necesito. x eso vine a pedir ayuda aca.

perdon x el doble post pero segui buscando segui intentando y no encuentro la forma (N) de resaltar la sintaxis sin ningun bug. debido a q no puedo separar las palabras x " ". alguien me puede dar alguna solucion o ayudarme a encontrar una?
gracias.

gracias es lo q buscaba.

but i want to do something like this:
http://wiki.sa-mp.com/wroot/images2/4/43/Editor_pawno_small.jpg