Du bist nicht angemeldet.

[Beta] SmallPad

chenjung

Registrierter Benutzer

  • »chenjung« ist männlich
  • »chenjung« ist der Autor dieses Themas

Beiträge: 19

Dabei seit: 21. Mai 2010

Wohnort: Marburg / Hessen

Hilfreich-Bewertungen: 6

  • Private Nachricht senden

101

Samstag, 12. Juni 2010, 15:53

Zitat von »jvbsl«

die Verbesserung mit DialogResult war richtig und geplant, damit du nicht nur kopierst :P
VB macht ja glücklicherweiße beim Schreiben schöne vorschläge...
ich habe dir zwei Codes gepostet, wie gesagt ist der erste Code ohne Formatierungen und der zweite mit...jenachdem was du halt willst...
natürlich musst du für formatierten Text das Laden noch entsprechend ändern, wie wärs mit RichTextBox.LoadFile :P


Das nenn ich mal Fett Krass!! :)

Also Hirn an, und Probieren =D THX

Aber müsste dann nich auch beim Speichern was mit richtextbox1.Savefile stehen?

Ich geh mal davon aus, das loadfile irgendwo hier rein muss:

Visual Basic Quellcode

 
1
2
3
4
5

If OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
            Dim whatever As New IO.StreamWriter(OpenFileDialog1.FileName)
            whatever.WriteLine(RichTextBox1.Text) 'Richtige Nummer von der Richtextbox einsetzen
            whatever.Close()
        End If

Dieser Beitrag wurde bereits 2 mal editiert, zuletzt von »chenjung« (12. Juni 2010, 16:23)

martinustreveri

Deine Mama.

  • »martinustreveri« ist männlich

Beiträge: 363

Dabei seit: 26. November 2008

Wohnort: Zuhause (:

Hilfreich-Bewertungen: 17

  • Private Nachricht senden

102

Sonntag, 13. Juni 2010, 00:10

Hey,

anscheinend hast du LoadFile ja schonmal benutzt, ersetze die Methode einfach mit

Visual Basic Quellcode

 
1
2

Dim whatever As New IO.StreamWriter(OpenFileDialog1.FileName)            whatever.WriteLine(RichTextBox1.Text) 'Richtige Nummer von der Richtextbox einsetzen  
            whatever.Close()



@jvbsl:
Das mit dem RichTextBox.Document.Text hab ich mir wohl vom FireBall.CodeEditor abgeschaut ;D

lg.
"Five exclamation marks, the sure sign of an insane mind."

jvbsl

Noob

  • »jvbsl« ist männlich

Beiträge: 7 206

Dabei seit: 7. April 2010

Hilfreich-Bewertungen: 397

  • Private Nachricht senden

103

Sonntag, 13. Juni 2010, 00:27

Visual Basic Quellcode

 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

Private Sub SpeichernToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SpeichernToolStripMenuItem1.Click
        SaveFileDialog1.Filter = "Textdatei (*.txt)|*.txt|Rich Text Format (*.rtf)|*.rtf|Alle Datein (*.*)|*.*"
        If SaveFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
            RichTextBox1.SaveFile(SaveFileDialog1.FileName,RichTextBoxStreamType.RichText)
        End If
    End Sub
 Private Sub ÖffnenToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ÖffnenToolStripMenuItem1.Click
        OpenFileDialog1.Filter = "Textdatei (*.txt)|*.txt|Rich Text Format (*.rtf)|*.rtf|Alle Datein (*.*)|*.*"
        OpenFileDialog1.InitialDirectory = FileIO.SpecialDirectories.MyDocuments
        OpenFileDialog1.Title = "Datei öffnen"

        If OpenFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
            RichTextBox1.LoadFile(OpenFileDialog1.FileName,RichTextBoxStreamType.RichText)
        End If
    End Sub


aber einfacher kann ichs dir nicht machen...
Ich wollte auch mal ne total überflüssige Signatur:
---Leer---

chenjung

Registrierter Benutzer

  • »chenjung« ist männlich
  • »chenjung« ist der Autor dieses Themas

Beiträge: 19

Dabei seit: 21. Mai 2010

Wohnort: Marburg / Hessen

Hilfreich-Bewertungen: 6

  • Private Nachricht senden

104

Sonntag, 13. Juni 2010, 00:51

Zitat von »jvbsl«

Visual Basic Quellcode

 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

Private Sub SpeichernToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SpeichernToolStripMenuItem1.Click
        SaveFileDialog1.Filter = "Textdatei (*.txt)|*.txt|Rich Text Format (*.rtf)|*.rtf|Alle Datein (*.*)|*.*"
        If SaveFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
            RichTextBox1.SaveFile(SaveFileDialog1.FileName,RichTextBoxStreamType.RichText)
        End If
    End Sub
 Private Sub ÖffnenToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ÖffnenToolStripMenuItem1.Click
        OpenFileDialog1.Filter = "Textdatei (*.txt)|*.txt|Rich Text Format (*.rtf)|*.rtf|Alle Datein (*.*)|*.*"
        OpenFileDialog1.InitialDirectory = FileIO.SpecialDirectories.MyDocuments
        OpenFileDialog1.Title = "Datei öffnen"

        If OpenFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
            RichTextBox1.LoadFile(OpenFileDialog1.FileName,RichTextBoxStreamType.RichText)
        End If
    End Sub


aber einfacher kann ichs dir nicht machen...


Erstmal vielen dank!

Visual Basic Quellcode

 
1

 RichTextBox1.SaveFile(SaveFileDialog1.FileName,RichTextBoxStreamType.RichText)


da war ich ja "fast" auf den richtigen weg :\

chenjung

Registrierter Benutzer

  • »chenjung« ist männlich
  • »chenjung« ist der Autor dieses Themas

Beiträge: 19

Dabei seit: 21. Mai 2010

Wohnort: Marburg / Hessen

Hilfreich-Bewertungen: 6

  • Private Nachricht senden

105

Freitag, 18. Juni 2010, 19:51

Nu versuche ich, die Texte in der Box einzeln anzusprechen, sodass man diese einzelen mit dem Fontdialog bearbeiten kann. =D

Es geht als weiter ^^

chenjung

Registrierter Benutzer

  • »chenjung« ist männlich
  • »chenjung« ist der Autor dieses Themas

Beiträge: 19

Dabei seit: 21. Mai 2010

Wohnort: Marburg / Hessen

Hilfreich-Bewertungen: 6

  • Private Nachricht senden

106

Mittwoch, 23. Juni 2010, 08:58

Kleines Update:

  • Schritt vor Button ist nun eingebaut

martinustreveri

Deine Mama.

  • »martinustreveri« ist männlich

Beiträge: 363

Dabei seit: 26. November 2008

Wohnort: Zuhause (:

Hilfreich-Bewertungen: 17

  • Private Nachricht senden

107

Samstag, 26. Juni 2010, 01:50

Hey,

zu deinem Formatierungsproblem in der RTB, suche einfach mal nach einigen Methoden, die die Position der aktuellen Selektion genau herausfinden kann, die brauchst du ja zum Formatieren ;)

lg.
"Five exclamation marks, the sure sign of an insane mind."

chenjung

Registrierter Benutzer

  • »chenjung« ist männlich
  • »chenjung« ist der Autor dieses Themas

Beiträge: 19

Dabei seit: 21. Mai 2010

Wohnort: Marburg / Hessen

Hilfreich-Bewertungen: 6

  • Private Nachricht senden

108

Samstag, 26. Juni 2010, 02:45

Zitat von »martinustreveri«

Hey,

zu deinem Formatierungsproblem in der RTB, suche einfach mal nach einigen Methoden, die die Position der aktuellen Selektion genau herausfinden kann, die brauchst du ja zum Formatieren ;)

lg.


Danke für den Tipp :)

chenjung

Registrierter Benutzer

  • »chenjung« ist männlich
  • »chenjung« ist der Autor dieses Themas

Beiträge: 19

Dabei seit: 21. Mai 2010

Wohnort: Marburg / Hessen

Hilfreich-Bewertungen: 6

  • Private Nachricht senden

109

Donnerstag, 8. Juli 2010, 23:13

Leider nur noch wenig Zeit, für das Projekt :\

Aber hier ein kleines Update ^^

  • Fontdialgo
    -> Hier muss ich noch einiges machen, das man den Text einzeln bearbeiten kann
  • Schritt vor Button
»chenjung« hat folgendes Bild angehängt:
  • pad.png

chenjung

Registrierter Benutzer

  • »chenjung« ist männlich
  • »chenjung« ist der Autor dieses Themas

Beiträge: 19

Dabei seit: 21. Mai 2010

Wohnort: Marburg / Hessen

Hilfreich-Bewertungen: 6

  • Private Nachricht senden

110

Samstag, 10. Juli 2010, 12:13

Soo ich versuche mich gerade an de Richtextbox

Ich habe folgendes gamacht:

Visual Basic Quellcode

 
1
2
3
4
5
6
7

Private Sub RichTextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RichTextBox1.TextChanged
        If RichTextBox1.SelectedText.Count <> Nothing Then
            RichTextBox1.SelectionColor = Color.Blue 'Hier einsetzen was du mit dem Markierten Text machen willst :D
        Else
            RichTextBox1.Text = Text 'Hier einsetzen was du machen willst wen nichts markiert ist, sprich mit dem ganzen Text
        End If
    End Sub


RichTextBox1.SelectionColor = Color.Blue -> Habe ich gemacht, mit der absicht, das der markierte Text blau sein soll

Allerdings, wenn ich es Starte, erscheint wenn ich auf die Tastaur drücken nur der Name meines Projektes ??

RichTextBox1.Text = Text <- das hängt wohl damit zusammen, oder?

Hawk1337

Registrierter Benutzer

  • »Hawk1337« ist männlich

Beiträge: 120

Dabei seit: 21. Mai 2010

Wohnort: Niedersachsen

Hilfreich-Bewertungen: 1

  • Private Nachricht senden

111

Samstag, 10. Juli 2010, 12:38

Wieso packst du dass auf ein TextChanged Event?

chenjung

Registrierter Benutzer

  • »chenjung« ist männlich
  • »chenjung« ist der Autor dieses Themas

Beiträge: 19

Dabei seit: 21. Mai 2010

Wohnort: Marburg / Hessen

Hilfreich-Bewertungen: 6

  • Private Nachricht senden

112

Samstag, 10. Juli 2010, 12:46

Ich bin davon ausgegangen, das ich dort den Code einfügen soll !

Um eben den gewünschten Effekt zu erreichen.

ChaosBernd

Registrierter Benutzer

Beiträge: 2 280

Hilfreich-Bewertungen: 129

  • Private Nachricht senden

113

Samstag, 10. Juli 2010, 13:21

Mach dir ein KontextMenü,
dort kannst du dann z.B. Farbe oder Schriftart belegen.

Also für jede Aktion die du ausführen möchtest.
Und genau da packst du die nötigen Codes, wie oben gezeigt, rein.
Mein SuperControl2010 im Showroom
Ich leide an LRS.
Multifunktions Explorer: 25%

chenjung

Registrierter Benutzer

  • »chenjung« ist männlich
  • »chenjung« ist der Autor dieses Themas

Beiträge: 19

Dabei seit: 21. Mai 2010

Wohnort: Marburg / Hessen

Hilfreich-Bewertungen: 6

  • Private Nachricht senden

114

Samstag, 10. Juli 2010, 13:44

Hi Bernd =D

Joa, da muss ich mich mal reinfuchsen ^^ bei der Hitze geht mein hirn heute nich, aber danke für den Hinweiß :)

Meinst du so, wie ich z.b. rückgäng bzw. ausscheiden gemacht habe?
Also z.b. Menü
dann Fett auswälen?

War das so gemeint?

Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von »chenjung« (11. Juli 2010, 16:50)

chenjung

Registrierter Benutzer

  • »chenjung« ist männlich
  • »chenjung« ist der Autor dieses Themas

Beiträge: 19

Dabei seit: 21. Mai 2010

Wohnort: Marburg / Hessen

Hilfreich-Bewertungen: 6

  • Private Nachricht senden

115

Sonntag, 11. Juli 2010, 16:55

Also so? =D


Update:

  • Neue Icons: Schriftgroß und klein machen
  • Neues Icon: für Bug Report
  • Neue Icons: Maximieren und Normalansicht
»chenjung« hat folgende Bilder angehängt:
  • menu.png
  • 001.png
  • 002.png

Dieser Beitrag wurde bereits 2 mal editiert, zuletzt von »chenjung« (11. Juli 2010, 18:25)

ChaosBernd

Registrierter Benutzer

Beiträge: 2 280

Hilfreich-Bewertungen: 129

  • Private Nachricht senden

116

Sonntag, 11. Juli 2010, 21:22

Zitat von »chenjung«

Meinst du so, wie ich z.b. rückgäng bzw. ausscheiden gemacht habe?
Also z.b. Menü
dann Fett auswälen?


Ja genau das meine ich. Mach dir einige KontextMenüs und dann belege sie mit deinem gewünschten Code.

wenn du da details brauchst meldest du dich.
Mein SuperControl2010 im Showroom
Ich leide an LRS.
Multifunktions Explorer: 25%

chenjung

Registrierter Benutzer

  • »chenjung« ist männlich
  • »chenjung« ist der Autor dieses Themas

Beiträge: 19

Dabei seit: 21. Mai 2010

Wohnort: Marburg / Hessen

Hilfreich-Bewertungen: 6

  • Private Nachricht senden

117

Montag, 12. Juli 2010, 00:51

*meld* ^^

Öhm, das funktioniert, aber, wieder nur im gesammten Text und nicht einzeln :(

Habe ich da was vergessen?

Fettmachen:

Visual Basic Quellcode

 
1

RichTextBox1.SelectionFont = New Font(RichTextBox1.Font, FontStyle.Bold)

progglord

Registrierter Benutzer

  • »progglord« ist männlich

Beiträge: 902

Dabei seit: 10. April 2009

Wohnort: Holzminden

Hilfreich-Bewertungen: 22

  • Private Nachricht senden

118

Montag, 12. Juli 2010, 12:54

Zitat von »chenjung«

Habe ich da was vergessen?

ja :D

Visual Basic Quellcode

 
1

New Font(rtb.SelectionFont.Name, rtb.SelectionFont.Size, rtb.SelectionFont.Style Or FontStyle.Bold)

chenjung

Registrierter Benutzer

  • »chenjung« ist männlich
  • »chenjung« ist der Autor dieses Themas

Beiträge: 19

Dabei seit: 21. Mai 2010

Wohnort: Marburg / Hessen

Hilfreich-Bewertungen: 6

  • Private Nachricht senden

119

Montag, 12. Juli 2010, 13:20

Danke!!!

Aso, ich habe also

rtb.SelectionFont.Size

vergessen, weil dieser sich auf Richtextbox bezieht. Das heißt, ich habe oben nur einen allgemeinen Befehl verwendet und deshalb ging es nicht?

rtb = Richtextbox

.selcectionfont = was markiert wird?

.size = was bedeutet das?? ^^

jvbsl

Noob

  • »jvbsl« ist männlich

Beiträge: 7 206

Dabei seit: 7. April 2010

Hilfreich-Bewertungen: 397

  • Private Nachricht senden

120

Montag, 12. Juli 2010, 14:12

SelectionFont die Font des marktierten Textes...
.size die größe der Schrift...
Ich wollte auch mal ne total überflüssige Signatur:
---Leer---

Verwendete Tags

Kleiner Texteditor

Social Bookmarks