Discussion :

[Talimidiusnx]

Bonjour à tous !

Bien donc, j'ai commencé à faire une fonction dans mon prog pour faire une system de log (ou plutot console) donc ma function (une seul erreur dedans) dessemble à cela:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
    Function Logout(ByVal Color As Color, ByVal Now As Date, ByVal log As String)
        console2.SelectionProtected = False
        console2.Text += log
        console2.SelectionLength = 0 
        console2.SelectionStart = console2.Text.Length
        console2.ScrollToCaret()
        console2.ForeColor = Color 'J'hésite avec un SelectionBackColor mais marche pas :s
        console2.SelectionProtected = True
 
End Function

Bref, ensuite je teste avec un bouton de click puis la seul erreur reste la couleur, je souhaiterai simpelment que je puisse changer de couleur pour n'importe quel phrase, sans changer toute la couleur de la RichTextBox.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Logout(Red, Now, log:=" [" & Now.ToString("hh:mm:ss") & "] - Bonjour bonjour !" & vbCrLf & "")

ça me met la couleur rouge, avec ok le temps tout bien, du msg aussi bon là OK.

Mais quand je rajoute une phrase genre :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Logout(Red, Now, log:=" [" & Now.ToString("hh:mm:ss") & "] - Bonjour bonjour !" & vbCrLf & "")
Logout(Steel Blue, Now, log:=" [" & Now.ToString("hh:mm:ss") & "] - Re-Bonjour bonjour !" & vbCrLf & "")

là, le blue passe en preum's, logique d'un autre côté, mais voilà ce que je souhaite c'est avoir deux couleur différente pour chaque phrase, donc par ex: la première en rouge et la seconde en bleu.

Voilà
Cordialement Talimidiusnx.

[Gurdil le nain]

Il y a des balises pour insérer du code

[hunteshiva]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Function Logout(ByVal Color As Color, ByVal Now As Date, ByVal log As String)
    console2.SelectionProtected = False
    console2.Text += log
    console2.SelectionLength = 0
    console2.SelectionStart = console2.Text.Length
    console2.ScrollToCaret() 
    console2.ForeColor = Color
    console2.SelectionProtected = True
End Function

et tu peut pas voir ou est l'erreur avec ce que te dit le compilateur?
perso je suis pas trop connaisseur des consoles,
met nous le commentaire que te génère Visual Studio.

[Talimidiusnx]

BBcoded.

Justement, il y a aucune erreur, car la synthax est niquel mais en revanche c'est plus la function qui me permet de colorier une phrase en particulier via ma function comme j'ai cité plus haut, il me manque ce petit truc

[hunteshiva]

regarde par la (je sais pas si ça va changer quelque chose ...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Console.ForegroundColor
Console.BackgroundColor

[Talimidiusnx]

Par logique, ça va me changer plus la couleur d'arrière plan de ma richbox, et le foregroundcolor je vois pas trop à quoi il sert mais je go voir ;

Edite : le foregroundcolor existe pas oO xD
et le backgroundcolor est useless c'est pas ce dont je cherche.

Talimidiusnx.

[hunteshiva]

Bizarre, j'ai pourtant un bout de cours qui me dit que sa existe

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
        Console.SetWindowSize(65, 35) 'Dimension de la fenêtre
        Console.Title = "test"        'Titre 
        Console.BackgroundColor = ConsoleColor.Blue'Couleur du fond
        Console.Clear()  'Applique la couleur du fond
        Console.ForegroundColor = ConsoleColor.Red 'Couleur du texte
        Console.SetCursorPosition(10, 20) 'Position du curseur
        Console.Write("Tapez un texte") 'ecrire sur la console
        Dim ligne As String = Console.In.ReadLine() 'récupérer le texte tapé, le mettre dans 'ligne'
        Console.Beep  'emettre un Beep
        Console.Beep(800, 1000) 'emettre un son de 800Herz pendant 1000 MilliSecondes
        Console.Read()      'lire à partir de la console

tu peut mettre le code de déclaration de ta console2 *stp*