Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Titel + Speichern einer Datei (MDI)
Autor: moenchen
Datum: 29.03.06 19:34
Hallo, ich möchte, dass im Caption eines MDI-Childs nur der Dateiname angezeigt wird und nicht der ganze Path. Wie funktioniert das? 2.Problem: ich höre immer dass der Code zum Speichern einer Datei so ähnlich ist wie der Code zum Öffnen. Was musst denn im Code geändert werden, damit das Speicher funktioniert? Und wie sind die Code-Unterschiede zwischen Speichern und Speichern unter..? danke Code: Private Sub mnuOpenFile_Click() Dim FNum As Integer Dim txt As String Dim windex As Integer Dim i As Integer Dim filename As String windex = FindFree() If windex = -1 Then MsgBox "You must close one of the" & _ " documents before another one can be opened" Exit Sub End If Load DocumentForms(windex) DocumentForms(windex).Show currentDocument = windex On Error GoTo FileError CoD_OpenFile.CancelError = True CoD_OpenFile.Flags = cdlOFNFileMustExist CoD_OpenFile.DefaultExt = "*.*" CoD_OpenFile.Filter = "Text files (*.txt)|*.txt|Excel files (*.xls)|*.xls|All files (*.*)|*.*" CoD_OpenFile.ShowOpen FNum = FreeFile Open CoD_OpenFile.filename For Input As #1 txt = Input(LOF(FNum), #FNum) Close #FNum DocumentForms(currentDocument).Editor.Text = txt OpenFile(currentDocument) = CoD_OpenFile.filename DocumentForms(currentDocument).Tag = OpenFile(currentDocument) DocumentForms(currentDocument).Caption = OpenFile(currentDocument) Exit Sub FileError: If Err.Number = cdlCancel Then Exit Sub Else MsgBox "Unknown error while opening file " & CoD_OpenFile.filename OpenFile(currentDocument) = "" End If End Sub

Titel + Speichern einer Datei (MDI)	640	moenchen	29.03.06 19:34
Re: Titel + Speichern einer Datei (MDI)	386	Zero-G.	30.03.06 09:02

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen