Rich text box in Datei Speichern

Hallo,
Wie Programmiert man einen Knopf, der eine rich text box unter dem namen abspeichert, den man in eine normale textbox eingiebt?

Das würde ich Dir nicht sagen, insbesondere wegen der Form Deines Posts. Sei brav und mach’ Deine Hausaufgaben alleine. Kusch!

Was erlauben Sie sich eigentlich?
Jetzt bitte eine Ehrliche Antwort, die meine Frage beantwortet.
Gut meine Frage ist villeicht etwas grob geschrieben, aber dazu sage ich nur : URL Not Supportet, und alles war weg.

Mit Sehr verärgerten Grüßen
Marian

Moin, marian,

Wie Programmiert man einen Knopf, der eine rich text box unter
dem namen abspeichert, den man in eine normale textbox
eingiebt?

üblicherweise werden Dateien gespeichert, nicht Textboxen. Und dafür gibt es in den Programmen, die rich text bearbeiten können, Dialoge, die genau die Funktionen Datei > öffnen, speichern, speichern unter… zur Verfügung stellen.

Gruß Ralf

Ich will ja selbst ein Textverarbeitungsprogramm programmieren.
Und davür brauche ich einen Knopf zum abspeichern von einer Textbox in eine Datei.

Hi marian,

Ich will ja selbst ein Textverarbeitungsprogramm
programmieren.
Und davür brauche ich einen Knopf zum abspeichern von einer
Textbox in eine Datei.

Du brauchst keinen Knopf, sondern erstmal einen Plan, wie die Formatierung des Rich-Text-Objektes gespeichert werden soll. Das geschieht nämlich keineswegs von selbst.

Gruß Ralf

Die rich text box soll in eine .txt datei abgespeichert werden. Keine Ahnung wie das geht.

Hallo,

Wie Programmiert man einen Knopf, der eine rich text box unter
dem namen abspeichert, den man in eine normale textbox
eingiebt?

Ganz kurzes Beispiel, ohne Commondialog … Ausbauen kannst Du es ja selbst.
Ich hoffe, es geht wirklich um VB6.0, davon schreibst Du nichts.
Falls Du .NET meinst (VB2008 z.B.), dann bist Du im falschen Brett und ich habe keine Ahnung. :smile:

Lass Dich nicht von den selbst ernannten Hellsehern ärgern.

Gruß Rainer

Option Explicit

Private Sub cmdLaden\_Click()
 Dim ff As Integer, txt As String, na As String
 na = "C:\Test.txt"
 ff = FreeFile
 txt = Space(Len(na))
 Open na For Binary As #ff
 Get #ff, , txt
 Close #ff
 RichTextBox1.TextRTF = txt
End Sub

Private Sub cmdSichern\_Click()
 Dim ff As Integer
 ff = FreeFile
 Open "C:\Test.txt" For Output As #ff
 Print #ff, RichTextBox1.TextRTF
 Close #ff
End Sub

Hallo Ralf,

wenn der Text immer nur mit diesem Programm geschrieben und auch wieder gelesen wird, ist die Endung völlig egal. Man muss nur .TextRF sichern und die Daten da auch wieder einfügen, dann funktioniert das.

Gruß Rainer

Hi Rainer,

wenn der Text immer nur mit diesem Programm geschrieben und
auch wieder gelesen wird

ja mit welchem denn?

ist die Endung völlig egal. Man muss nur .TextRF sichern und
die Daten da auch wieder einfügen, dann funktioniert das.

Will er aber nicht :smile:))

[ot] Mir ist eh schleierhaft, wozu sich jemand RTF antut. Vor zig Jahren hab ich mal einen Editor dafür gesucht - alles krank, was mir unter die Vorderfüße kam.

Gruß Ralf

Hi Ralf,

wenn der Text immer nur mit diesem Programm geschrieben und
auch wieder gelesen wird

ja mit welchem denn?

na mit dem selbst geschriebenen. :smile:

ist die Endung völlig egal. Man muss nur .TextRF sichern und
die Daten da auch wieder einfügen, dann funktioniert das.

Will er aber nicht :smile:))

Nein? Dann habe ich etwas übersehen.

[ot] Mir ist eh schleierhaft, wozu sich jemand RTF antut. Vor
zig Jahren hab ich mal einen Editor dafür gesucht - alles
krank, was mir unter die Vorderfüße kam.

Da kann ich nur zustimmen. :smile: RTF reicht fast für eine Textverarbeitung, aber eben nur fast. Vor langer Zeit hatte das Format vermutlich mal eine Berechtigung.
Aber was soll’s, VB üben kann man mit so einem Projekt sicher gut.

Gruß Rainer