Kirjautuminen

Haku

Tehtävät

Keskustelu: Ohjelmointikysymykset: VB.NET: Merkin väri(.net)

salafi [24.07.2004 15:53:40]

#

Miten saan määriteltyä merkin värin? Olen tekemässä ohjelmaa joka lukee ensimmäisestä tidostosta merkkejä ja tallentaa ne toiseen tiedostoon tietty merkki tietyn värisenä.

Gaxx [24.07.2004 18:00:09]

#

Lue merkki, anna sille väri(vaikkapa case:lla) ja tallenna se tiedostoon väriarvon kera.

esimerkki:

Dim merkki As String * 1
Dim vari As Integer

Open "tiedosto" For Input As #1 'Luettava tiedosto
    Open "tiedosto2" For Output As #2 'Kirjotettava tiedosto
        Do Until EOF(1) 'Kunnes tiedosto loppuu
            merkki = Input(1, 1) ' luetaan merkki
            Select Case merkki 'selectin alotus
                Case Is = "a" 'jos merkki on a
                    vari = 1 'niin väriarvo on 1
                Case Is = "b" 'jos merkki on b
                    vari = 2 'niin väriarvo on 2
                Case Is = "c" 'jos merkki on c
                    vari = 3 'niin väriarvo on 3
            End Select 'selectin lopetus :D
            Print #2, merkki + "," + Str(vari) 'tallennetaan merkki väriarvon kera
        Loop
    Close #2
Close #1

Jos luet tuota tiedostoa, johon merkit tallennetaan väriarvojen kera, omalla ohjelmalla, suosittelisin jättämään tuon tallentamisen väliin ja näyttää ne sen sijaan. Toivottavasti ymmärsin oikein :)

salafi [24.07.2004 20:20:21]

#

Ongelma on juuri se, että tuota teksti tiedosto pitäisi pystyä lukemaan ilman itse ohjelmaa.
Ehkäpä sen vois tehdä jotenkin muokkaamalla tekstiä vaikka wordpadin kautta... Mutta ei hajuakaan voiko sitä sillä tavalla tehdä ja vielävähemmän miten semmonen tehtäs.

Antti Laaksonen [24.07.2004 21:08:14]

#

Tavallisessa tekstitiedostossa ei voi olla värejä, joten sinun täytyy käyttää jotain monimutkaisempaa tiedostomuotoa. Ihan hyvä vaihtoehto voisi olla RTF, jonka käsittelyyn on olemassa jopa oma kontrolli (Project->Components, Microsoft Rich Textbox Control). Voit käyttää tallennuksessa suoraan kontrolliin kuuluvaa SaveFile-toimintoa. Tekstin kohdan värin muuttamiseen löytyy vinkkejä haulla.

salafi [25.07.2004 13:40:59]

#

Kiitos erittäin paljon, mutta kysympä tähän samaan hengen vetoon miten vb.net:ssä korvataan control arrayn puuttuminen.

Vastaus

Aihe on jo aika vanha, joten et voi enää vastata siihen.

Tietoa sivustosta