Fetstil Fetstil Kursiv Understrykning linje färgläggning tabellverk Punktlista Nummerlista Vänster Centrerat högerställt Utfyllt Länk Bild htmlmode
  • Forum & Blog
    • Forum - översikt
      • .Net
        • asp.net generellt
        • c#
        • vb.net
        • f#
        • silverlight
        • microsoft surface
        • visual studio .net
      • databaser
        • sql-server
        • databaser
        • access
        • mysql
      • mjukvara klient
        • datorer och komponenter
        • nätverk, lan/wan
        • operativsystem
        • programvaror
        • säkerhet, inställningar
        • windows server
        • allmänt
        • crystal reports
        • exchange/outlook
        • microsoft office
      • mjukvara server
        • active directory
        • biztalk
        • exchange
        • linux
        • sharepoint
        • webbservers
        • sql server
      • appar (win/mobil)
      • programspråk
        • c++
        • delphi
        • java
        • quick basic
        • visual basic
      • scripting
        • asp 3.0
        • flash actionscript
        • html css
        • javascript
        • php
        • regular expresssion
        • xml
      • spel och grafik
        • DirectX
        • Spel och grafik
      • ledning
        • Arkitektur
        • Systemutveckling
        • krav och test
        • projektledning
        • ledningsfrågor
      • vb-sektioner
        • activeX
        • windows api
        • elektronik
        • internet
        • komponenter
        • nätverk
        • operativsystem
      • övriga forum
        • arbete karriär
        • erbjuda uppdrag och tjänster
        • juridiska frågor
        • köp och sälj
        • matematik och fysik
        • intern information
        • skrivklåda
        • webb-operatörer
    • Posta inlägg i forumet
    • Chatta med andra
  • Konto
    • Medlemssida
    • Byta lösenord
    • Bli bonsumedlem
    • iMail
  • Material
    • Tips & tricks
    • Artiklar
    • Programarkiv
  • JOBB
  • Student
    • Studentlicenser
  • KONTAKT
    • Om pellesoft
    • Grundare
    • Kontakta oss
    • Annonsering
    • Partners
    • Felanmälan
  • Logga in

Hem / Forum översikt / inlägg

Posta nytt inlägg


concat rtf

Postades av 2004-11-08 09:52:20 - Benny Jonsson, i forum vb.net, Tråden har 17 Kommentarer och lästs av 640 personer

Finns det något sätt som man kan concatinera två RichTextBox till en ny utan att använda copy-past funktionerna.

<code>
'Finns det något bättre sätt?
RichTextBox1.SelectAll()
RichTextBox1.Copy()
RichTextBox3.Paste()
RichTextBox2.SelectAll()
RichTextBox2.Copy()
RichTextBox3.Paste()
</code>

/Benny


Svara

Sv: concat rtf

Postades av 2004-11-08 13:01:02 - Patrik Löwendahl

RichTextBox3.RtfText = RichTextBox1.RftText + RichTextBox2.RtfText ??


Svara

Sv: concat rtf

Postades av 2004-11-08 13:10:31 - Benny Jonsson

Du skjuter ganska vilt från höften Patrik.
Nej inte ett enda rätt där inte :(

Om det skulle vara något skulle det vara
<code>
'Fel!!!
RichTextBox3.Rtf = RichTextBox1.Rtf + RichTextBox2.Rtf
</code>

Men det sätter inte ihop rtf-texterna till en ny!

/Benny


Svara

Sv: concat rtf

Postades av 2004-11-08 13:20:44 - Andreas Håkansson

Tja kanske


Imports System.Text

Dim MergedText As StringBuilder = New StringBuilder()
With MergedText
   .Append(RichTextBox1.Rtf)
   .Append(RichTextBox2.Rtf)
End With

RichTextBox3.Rtf = MergedText.ToString()


Svara

Sv: concat rtf

Postades av 2004-11-08 13:33:05 - Benny Jonsson

Nej det blir inte rätt det heller!


Svara

Sv: concat rtf

Postades av 2004-11-08 13:44:41 - Andreas Håkansson

Benny,

Och tanken slog dig inte att beskriva vad det är som blir fel? =P

<b>Edit: </b> Benny tog mig en titt på de Kunskaper du anget i din profil - det kan inte vara så att de kanske var lite tillhöftade? 5a i VB.NET ? Personligen bryr jag mig inte om vad du angett där, men för att vi som hjälper till här skall veta på vilken nivå man kan lägga svaren på, så är det bra om man svarat så bra som möjligt på kunskaperna.


Svara

Sv: concat rtf

Postades av 2004-11-08 13:46:24 - Patrik Löwendahl

eh,

rent tekniskt så skall den sätta ihop det till en ny? Text är immutable så när man gör så där så skapas det ett helt nytt objekt?


Svara

Sv: concat rtf

Postades av 2004-11-08 13:57:40 - Johan Bovin

Enligt http://www.dotnetforums.net/showthread.php?t=72428 så ska det finnas null tecken (gissar att det är asciitecken 0 de refererar till) i sluet på en rtf-sträng. Så om du kör en replace på ascii 0 till ingenting så kanske det fungerar....
EDIT: nä, det funkade ju inte, men om man editerar rtf:en funkar det kanske bätre

Dim test As String = richTextBox1.Rtf.Substring(0, richTextBox1.Rtf.Length - 4)
test += richTextBox2.Rtf.Substring(6)
richTextBox3.Rtf = test


Svara

Sv: concat rtf

Postades av 2004-11-08 14:14:54 - Benny Jonsson

Förlåt, det var inte meningen att vara otrevlig!

Men om du provar att sätta samman utdata (.rtf) från två richtextbox med + eller & så blir det inte samma resultat som i exemplet som jag angav från början.


Svara

Sv: concat rtf

Postades av 2004-11-08 14:23:29 - Benny Jonsson

Jupp det funkar, men det borde ju finnas en "snyggare" lösning på problemet.

Tackar Johan Bovin.

/Benny


Svara

Sv: concat rtf

Postades av 2004-11-08 14:39:30 - Mikael Wedham

<code>
RichTextBox3.Select(RichTextBox3.Text.Length, 0)
RichTextBox3.SelectedRtf = RichTextBox2.Rtf
</code>

/micke


Svara

Sv: concat rtf

Postades av 2004-11-08 16:25:34 - Oskar Johansson

Jag skulle tippa på att Mikaels lösning skulle fungera, men se då till att den box du använder för att klippa ihop i är gömd eller något ;)

Saken är att rtf som format börjar med en "stilmall" och sedan kommer texten. Det blir lite krock om man bara trycker ihop två rtf-dokument ;)


Svara

Sv: concat rtf

Postades av 2004-11-09 10:42:37 - Benny Jonsson

Jo jag skall trycka ihop en hel hög dokument dynamiskt. Jag hade hoppats att det fanns något bra sätt att göra det på utan att behöva hålla på med stränghantering etc. Men antagligen så är det ingen på Microsoft som tänkte att man möjligen ville sätta samman rtf-dokument :(


Svara

Sv: concat rtf

Postades av 2004-11-09 11:04:13 - Andreas Håkansson

Benny,

Jo? Får en känsla av att du tänker lite för kort. Ta koden och skapa en metod (sub) som t.ex tar emot två rtfkontroll-objekt parametrar och som utför koden ovan. Då kan du juh återanvända den om och om igen. Eller skriv en metod som tar några andra paramterar som gör att du kan göra sin sammanslagning så enkelt som möjligt. Du har verktyget för ett enkelt slå ihop två dokument (stränghanteringen är väl inga bekymmer?), nu behöver du skrida till verket och förenkla processen att genomföra sammanslagningen mellan en rad olika kontroller.

Hoppas det löser sig =)


Svara

Sv: concat rtf

Postades av 2004-11-09 11:22:19 - Benny Jonsson

Jo då designen är ju inte så svår. Man överlagrar ju givetvis ;) Så får man en kontrol som funkar som man vill!

<code>
Public Class bjRichTextBox
Inherits System.Windows.Forms.RichTextBox

#Region " Windows Form Designer generated code "

Public Sub New()
MyBase.New()

'This call is required by the Windows Form Designer.
InitializeComponent()

'Add any initialization after the InitializeComponent() call

End Sub

'UserControl overrides dispose to clean up the component list.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub

'Required by the Windows Form Designer
Private components As System.ComponentModel.IContainer

'NOTE: The following procedure is required by the Windows Form Designer
'It can be modified using the Windows Form Designer.
'Do not modify it using the code editor.
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
components = New System.ComponentModel.Container()
End Sub

#End Region


Public Sub addRtf(ByVal rtbToAdd As RichTextBox)
Me.Select(Me.Text.Length, 0)
Me.SelectedRtf = rtbToAdd.Rtf
End Sub
End Class
</code>


Svara

Sv: concat rtf

Postades av 2004-11-09 12:41:18 - Mikael Wedham

Jag hade valt att inte behöva skicka textboxen...

Public Sub addRtf(ByVal rtbToAdd As String)

/micke


Svara

Sv: concat rtf

Postades av 2004-11-09 13:25:48 - Benny Jonsson

Min implementation ser igentligen ut så här. Så kan man skicka vad man vill! Men tänkte inte att jag behövde skicka med allt ;)

<code>
Public Sub addRtf(ByVal rtbToAdd As RichTextBox)
addRtf(rtbToAdd.Rtf)
End Sub

Public Sub addRtf(ByVal strToAdd As String)

Try
Me.Select(Me.Text.Length, 0)
Me.SelectedRtf = strToAdd
Catch ex As Exception

End Try
End Sub
</code>


Svara

Sv: concat rtf

Postades av 2004-11-09 13:26:59 - Andreas Håkansson

Benny,

Toppen, då har du en lösning som fungerar =) Tänk på att markera dina inlägg som "lösta" eller "stängde" beroende på statusen av tråden när du är klar med den.


Svara

Nyligen

  • 19:55 kick-off med fokus på hälsa?
  • 19:53 kick-off med fokus på hälsa?
  • 16:24 Föreslå en skönhetsklinik online
  • 16:23 Föreslå en skönhetsklinik online
  • 18:42 Hvor finder man håndlavede lamper
  • 18:41 Hvor finder man håndlavede lamper
  • 16:36 Allt du behöver veta om keramiskt
  • 16:14 Vem anlitar man egentligen när tak

Sidor

  • Hem
  • Bli bonusmedlem
  • Läs artiklar
  • Chatta med andra
  • Sök och erbjud jobb
  • Kontakta oss
  • Studentlicenser
  • Skriv en artikel

Statistik

Antal besökare:
Antal medlemmar:
Antal inlägg:
Online:
På chatten:
4 570 722
27 958
271 751
350
0

Kontakta oss

Frågor runt konsultation, rådgivning, uppdrag, rekrytering, annonsering och övriga ärenden. Ring: 0730-88 22 24 | pelle@pellesoft.se

© 1986-2013 PelleSoft AB. Last Build 4.1.7169.18070 (2019-08-18 10:02:21) 4.0.30319.42000
  • Om
  • Kontakta
  • Regler
  • Cookies