openen kleur van tekst richtextbox

[johannetje2]

hallo! ik heb een soort notepad gemaakt.

maar nu zit ik met het volgende probleem:

als ik het in een bestand opsla, dan zet hij de ingestelde kleur in het bestand. Maar nu wil ik hem gaan oproepen, maar nu weet ik niet hoe ik die zo in kan stellen dat de kleur in de richtextbox wordt gezet. Ik heb dit al geprobeerd:

bij de save optie heb ik dit gedaan: (wat wel werkt)

Write.WriteLine(ColorDialog1.Color)

en bij de open optie heb ik dit gedaan: (wat niet werkt)

richtextbox1.forecolor = read.readline

ik heb ook geprobeerd, het eerst in een textbox te laten zetten.
Code van de textbox: (Dit werkt!)

textbox3.text = read.readline

maar zodra ik hem wil instellen op de richtextbox werkt het niet meer
ik gebruik dan dit:

richtextbox1.forecolor = textbox3.text

kan iemand me helpen?

het liefst had ik eerst een oplossing voor de eerste directe optie!

 

[ErikBooy007]

Wellicht is dat om dat richtextbox1.forecolor een color-object verwacht en niet een string.

Als je nu eens dit doet:

[CPP]
richtextbox1.forecolor = System.Drawing.Color.FromName(read.readline)
[/CPP]

Maar ik kan me vergissen. Ben ook niet zo'n held met VB.

 

[johannetje2]

om de een of andere rede werkt het niet.

 

[ErikBooy007]

Wat is de waarde van read.readline?

[EDIT]
Kijk ook eens hier naar http://msdn.microsoft.com/en-us/library/system.drawing.color_methods.aspx
[/EDIT]

 

[johannetje2]

Wat is de waarde van read.readline?

[EDIT]
Kijk ook eens hier naar http://msdn.microsoft.com/en-us/library/system.drawing.color_methods.aspx
[/EDIT]

ik zou het liefste een nederlandse uitleg hebben...

ik kom er helemaal niet uit

 

[ErikBooy007]

Je zou de kleur als RGB value kunnen opslaan.

Dan sla je het zo op 255,0,0.

[CPP]
Dim sColor as String = read.readline
Dim aColor[] as String = sColor.split(",")

richtextbox1.forecolor = System.Drawing.Color.FromArgb(Val(aColor[0]), Val(aColor[1]), Val(aColor[2]))
[/CPP]

Zoiets denk ik... Maar misschien zit ik er nog helemaal naast Misschien dat iemand anders nog even z'n advies kan geven.

 

[johannetje2]

Je zou de kleur als RGB value kunnen opslaan.

Dan sla je het zo op 255,0,0.

[CPP]
Dim sColor as String = read.readline
Dim aColor[] as String = sColor.split(",")

richtextbox1.forecolor = System.Drawing.Color.FromArgb(Val(aColor[0]), Val(aColor[1]), Val(aColor[2]))
[/CPP]

Zoiets denk ik... Maar misschien zit ik er nog helemaal naast Misschien dat iemand anders nog even z'n advies kan geven.

jammer genoeg werkt dat OOK niet!

 

[ErikBooy007]

Nou, dan moet ik me er misschien niet meer mee bemoeien. Laat het topic gewoon open staan, dan komt er vast nog een ander met meer kennis van VB.

Succes...