Hej I din VB6 mapp finns Samples. Där finns mappen RichTextBox. Ok Per. Bra svar för att skriva ut. Tack Men snälla ! Nu får du koppla på storhjärnan. Tack för det. Ok på det. mmm... har funderat ett tag på hur du tänker. För att "klistra in" text, alltså stoppa in en textsträng på ett specifikt ställe i din richtextbox så kan du väldigt enkelt använda .seltextVB6 och RichTextBox
Två frågor
1. Hur skriver man koden som klistrar in en text i dokumentet?
2. Hur skriver man koden för att skriva ut texten i dokumentet?
Ser fram emot ett bra svar.
Ha en bra dagSv: VB6 och RichTextBox
Där hittar du alla svaren. Återkom om du behöver mer hjälp.
RichText är ett stort omfattande ämne som kräver sin man. Lycka till.Sv:VB6 och RichTextBox
Tror att det var mitt eget gamla projekt jag hänvisade till.
Har lagt upp ett exempel till dig och andra intresserade.
Kolla
Programarkivet:RichTextBox experimentSv: VB6 och RichTextBox
Men ser fortfarande inte hur jag lägger in en egen textsträng i RichTextTexten
Ha det braSv:VB6 och RichTextBox
När man kör .exe är det bara att skriva som en vanlig texteditor.
I IDE läge använder du
<code>
rtbText.LoadFile (App.Path & "\Vb_kod.rtf")
</code>
Sen kan du ju klart använd Ctrl+V (Paste)
Fattar du inte nu så gå tillbaka till frimärkssamling.
Edit:
Obs jag har uppgraderat RichText.zip efter DL 2 hämta igen .Sv: VB6 och RichTextBox
Men nu var det inte en fil jag ville ha utan en sträng i programmets minne.
Och trots att jag inte samlar frimärken så vet jag inte hur man får in en sträng i minnet så jag kan simulera CtrlV. Sv:VB6 och RichTextBox
Du skall kolla in Clipboard Objektet.
Där kan man använda
Clipboard.SetData,CF_BITMAP
Clipboard.SetText,CF_TEXT
Clipboard.GetData,CF_BITMAP
Clipboard.GetText,CF_TEXT
Fritt ur minnet kolla Help på ovanstående.
Om det är en vanlig String variabel (Public) som innehåller något
<code>
Option Explicit
Dim MyString As String
'Någonstans i programmet
MyString = "Sven"
'Någonstans i programmet
rtbText.Text = MyString
</code>
Obs det måste vara en Public variabel om du skall nå den från en SubRutrinSv:VB6 och RichTextBox
Det finns en massa API som löser just ditt prob. SendMessage kom upp
I minnet skapar du en "buffer" som innehåller din text.
<code>
Dim MyBuffer As String * 64000
MyBuffer = String$(64000,Chr(0))
'Nu har du en minnesallokering på 64000 bokstäver med namnet MyBuffer
</code>
Sen är det bara att plocka från denna adress.Sv: VB6 och RichTextBox
Det finns massor av artiklar runt om på nätet, bland annat denna: http://www.developerfusion.com/article/2026/rich-text-box-controls/3/