Hi,
weniger Schreibarbeit, weniger text
*gg* Du bekommst fertigen Code, Du musst gar nichts tippen. 
Erzeugt Dein Programm Formen?
nein
OK, dann wird’s einfach.
die werden vor der fertigstellung erstellt, danach ist es eine
feste anzahl von formen.
wenn es irgendie helfen könnte: keine der wert-formen wird
jemals geladen, die laufen alle im hintergrund, halt wie
konstanten, nur nicht ganz so speicherfreundlich^^
nein, das ist unerheblich.
Jetzt habe ich alles zusammen …
Aber heute schreibe ich keinen Code mehr, der soll ja Fehlerfrei werden. Die halbe Flasche Sherry würde das heute verhindern. *gg*
Gruß Rainer
weniger Schreibarbeit, weniger text
*gg* Du bekommst fertigen Code, Du musst gar nichts tippen.
-)
hm…
naja, wenn ichs mal woanders benutze^^
Erzeugt Dein Programm Formen?
nein
OK, dann wird’s einfach.
sehr gut:smile:
die werden vor der fertigstellung erstellt, danach ist es eine
feste anzahl von formen.
wenn es irgendie helfen könnte: keine der wert-formen wird
jemals geladen, die laufen alle im hintergrund, halt wie
konstanten, nur nicht ganz so speicherfreundlich^^
nein, das ist unerheblich.
Jetzt habe ich alles zusammen …
ahhh
es wird immer besser
Aber heute schreibe ich keinen Code mehr, der soll ja
Fehlerfrei werden. Die halbe Flasche Sherry würde das heute
verhindern. *gg*
vllt. kriegst du sie ja noch leer 
…
tja, die uhrzeit wohl auch noch etwas:smile:
naja, muss jetzt auch schlafen, hab zwar morgen zur zweiten stunde, aber muss trotzdem zur schule:frowning: (das ist ja das schlimmste; da gewöhnt man sich daran, um 6 Uhr einzuschlafen und plötzlich muss man um 6 schon aufstehn^^)
werd wohl so um 14:00 wieder hier sein…
dann schon mal danke im voraus
mfg, CheNetzer
Hallo,
es war nur immer so, dass ich dachte, alles wichtige sei
erklärt, aber dann war für eine bestimmte funktion noch eine
andere angabe nötig…
na ja. Besser wäre es gewesen zu erzählen, was das Progamm tut, wie es aufgebaut ist. Beispiel:
Das Programm besteht aus verschiedenen Formen.
Die Captions von Formen, deren Name mit ‚Wert‘ beginnt sollen gesichert und später geladen werden.
Auf einer der anderen Formen liegt ein Button. Wenn der geklickt wird sollen die Captions gesichert werden.
Auf einer weiteren der anderen Formen liegt der Button zum Laden.
Die Daten sollen in dem verzeichnis gesichert werden, in dem die .exe liegt.
… *gg* Wusstest Du das am Anfang schon alles?
Ich glaube, ein Teil davon ist erst in der Diskussion entstanden. Richtig?
Hätte die Frage so ausgesehen, hättest Du als erste Antwort den Code bekommen, den Du suchst.
Aber ich denke, Du hast so noch ein wenig mehr über VB gelernt als sonst und dann war die Diskussion ja sinnvoll.
Gruß Rainer
naja, das mit den wert…-formen wird helfen, hatte ich noch nie dran gedacht:smile:
mfg, CheNetzer
Hallo,
es geht leider doch nicht mit der Schleife. 
Die Erklärung warum wäre jetzt zu umständlich, ändert auch nichts.
Du musst leider doch die Namen der Formen einzeln tippen.
Der Code für die Form Speichern:
Option Explicit
Private Sub cmdSpeichern\_Click()
Dim Pfd As String, Datei As String, ff As Integer
ff = FreeFile
Pfd = App.Path
If Right(Pfd, 1) "\" Then
Pfd = Pfd & "\"
End If
Datei = Pfd & "Speicherdatei.dat"
Open Datei For Output As #ff
Print #1, Wert1.Caption
Print #1, Wert2.Caption
'... weitere Formen
Close #ff
End Sub
Private Sub Form\_Load()
frmLaden.Show
End Sub
Und noch der Code für die Form Laden:
Option Explicit
Private Declare Function PathFileExists \_
Lib "shlwapi.dll" Alias "PathFileExistsA" \_
(ByVal pszPath As String) As Long
Private Sub cmdLaden\_Click()
Dim Pfd As String, Datei As String, ff As Integer
Dim Zl As String
ff = FreeFile
Pfd = App.Path
If Right(Pfd, 1) "\" Then
Pfd = Pfd & "\"
End If
Datei = Pfd & "Speicherdatei.dat"
If PathFileExists(Datei) Then
Open Datei For Input As #ff
Input #ff, Zl
Wert1.Caption = Zl
Input #1, Zl
Wert2.Caption = Zl
'... Weitere Formen
Close #ff
End If
End Sub
Getestet, läuft bei mir.
Gruß Rainer
es funktioniert!
danke nochmal für die codes und die geduld
mfg, CheNetzer
Hallo,
es funktioniert!
schön, daß Du den Einbau hin bekommen hast.
Viel Spaß!
Gruß Rainer