Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

TextEditor pitanja...

[es] :: Visual Basic 6 :: TextEditor pitanja...

[ Pregleda: 2330 | Odgovora: 2 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

Aleksandar Ružičić
Software Architect, Appricot d.o.o.
Beograd

Član broj: 26939
Poruke: 2881

Jabber: krckoorascic@gmail.com
Sajt: krcko.net


+44 Profil

icon TextEditor pitanja...11.07.2004. u 19:44 - pre 202 meseci
Poceo sam da pravim jedan text editor, ali imam nekoliko pitanja:
1. Kada se npr. otkuca if i pritisne se space da se automatski doda:
Code:

if ( )
    {
    }

i da se kursor postavi izmedju malih zagrada?

2. Kako da neke reci obojim razlicitim bojama (color syntax)?

3. Kada se selektuje odredjeni text i pritisne TAB da se selektovani redovi pomere a ne da se izbrisu (nadam se da me razumete)?

Ako neko moze nek mi pomogne..

Hvala unapred i pozdrav svima!
 
Odgovor na temu

Ero S Ovoga Sveta

Član broj: 21509
Poruke: 173
*.teol.net



Profil

icon Re: TextEditor pitanja...12.07.2004. u 17:35 - pre 202 meseci
Probaj Ovako

Koristio sam jedan RichTextBox koji sam imenovao sa RTB1.

1:

U KeyPress Event RTB1 ubaci ovaj kod
Code:

Dim L As Long
Dim S As String
Dim S1 As String

Const strDodaj = " ()" & vbCrLf & " {" & vbCrLf & " }"

If KeyAscii = 32 Then

    S = Right(RTB1.Text, 2)
    S1 = LCase(S)
    
     If S1 = "if" Then
        RTB1.Text = RTB1.Text & strDodaj
        L = Len(RTB1.Text)
        RTB1.SelStart = Len(RTB1.Text) - 9
     End If

End If

2:
Code:

Const Crvena = &HFF&
Const Plava = &HFF0000
Const Zuta = &HFFFF&
Const Zelena = &HFF00&

RTB1.SelColor = Crvena

3:

u General Forme deklarisi promjenjivu strSelText i definisi je kao string.

U RTB1_KeyDown ubaci sledeci kod:
Code:

Dim S As String
Dim I As Integer


If KeyCode = 9 Then
 
 S = RTB1.SelText
 
  If Len(S) > 0 Then
   strSelText = S
  Else
   strSelText = ""
  End If

End If

a u RTB1_KeyUp ubaci:

Code:

If KeyCode = 9 Then
  RTB1.SelText = strSelText
End If





_______________________________________
Ero
 
Odgovor na temu

Aleksandar Ružičić
Software Architect, Appricot d.o.o.
Beograd

Član broj: 26939
Poruke: 2881

Jabber: krckoorascic@gmail.com
Sajt: krcko.net


+44 Profil

icon Re: TextEditor pitanja...14.07.2004. u 22:35 - pre 202 meseci
Hvala, radi!
 
Odgovor na temu

[es] :: Visual Basic 6 :: TextEditor pitanja...

[ Pregleda: 2330 | Odgovora: 2 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.