AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen Object-Pascal / Delphi-Language Delphi Datei beim Programmstart erstellen lassen
Thema durchsuchen
Ansicht
Themen-Optionen

Datei beim Programmstart erstellen lassen

Ein Thema von Wolverine · begonnen am 8. Dez 2004 · letzter Beitrag vom 10. Dez 2004
Antwort Antwort
Seite 2 von 2     12   
Benutzerbild von jim_raynor
jim_raynor

Registriert seit: 17. Okt 2004
Ort: Berlin
1.251 Beiträge
 
Delphi 5 Standard
 
#11

Re: Datei beim Programmstart erstellen lassen

  Alt 10. Dez 2004, 13:31
Ohne Quellcode und Fehlermeldung wird es schwer dir zu helfen. Wichtig ist, dass die Datei auch geöffnet wurde und nicht mehrfach geöffnet wird.
Christian Reich
Schaut euch mein X-COM Remake X-Force: Fight For Destiny ( http://www.xforce-online.de ) an.
  Mit Zitat antworten Zitat
Wolverine

Registriert seit: 30. Mai 2003
Ort: Düsseldorf (NRW)
109 Beiträge
 
Delphi 7 Enterprise
 
#12

Re: Datei beim Programmstart erstellen lassen

  Alt 10. Dez 2004, 13:37
Hi jim_raynor.
Code ist da wie man sieht und die Fehlermeldung gibt es als Bild im Anhang
Miniaturansicht angehängter Grafiken
schreibproblem.jpg  
Guido L.
The nice thing about Windows is - It does not just crash, it displays a dialog box and lets you press 'OK' first.
Guten Rutsch und Start ins neue Jahr 2005
  Mit Zitat antworten Zitat
Benutzerbild von jim_raynor
jim_raynor

Registriert seit: 17. Okt 2004
Ort: Berlin
1.251 Beiträge
 
Delphi 5 Standard
 
#13

Re: Datei beim Programmstart erstellen lassen

  Alt 10. Dez 2004, 13:50
Zitat von Wolverine:
Hi jim_raynor.
Code ist da wie man sieht
Das ist ja Betrug Nachträglich bearbeitet ! Du Bösewicht.

Also. Ich würde für dein ganzes Problem eine Stringliste nutzen (macht die Sache wesentlich einfacher.

Du machst dir ne Variable TStringList (genau wie jetzt dein F).

In OnCreate erstellst du die dannList:=TStringList.Create; und mit
Delphi-Quellcode:
if FileExists('Daten.txt') then
  List.LoadFromFile('Daten.txt')
else
  List.Add(Ueberschrift);
kannst du dann die Datei laden.

Bei deinem ButtonClick musst du dann nur List.Add(xxx) machen und bei OnDestroy könntest du dann mit List.SaveToFile('Daten.txt') die Datei wieder abspeichern.

Zu deinem Code:
Leider nutze ich diese Funktionen (AssignFile, Reset und so) nicht selber. Deshalb kann ich nur raten. ich denke mal du solltest bei OnCreate das CloseFile machen und anschliessend mit Append (Datensätze hinzufügen) öffnen. Bei ButtonClick machst dann nur noch WriteLn ohne CloseFile und Rewrite.

Aber ich würde dir die Variante mit der StringListe empfehlen. Weiss garnicht warum das noch niemand gemacht hat.
Christian Reich
Schaut euch mein X-COM Remake X-Force: Fight For Destiny ( http://www.xforce-online.de ) an.
  Mit Zitat antworten Zitat
Wolverine

Registriert seit: 30. Mai 2003
Ort: Düsseldorf (NRW)
109 Beiträge
 
Delphi 7 Enterprise
 
#14

Re: Datei beim Programmstart erstellen lassen

  Alt 10. Dez 2004, 14:50
Das ist kein Betrug, ich habe ja gesagt das der Code noch kommt ^^
Zitat von Ich:
... Ich werde auch noch etwas Code uppen um euch die Suche zu erleichtern. ...
Aber das mit einer StringList zu machen ist auch ´ne Idee.
Nur da gibt es ein Problem, ich habe das zwar schon gehört habe abe keinen Plan was dat ist

Daher ist das ja ne super Gelegenheit sich mal mit StringListen zu befassen
Guido L.
The nice thing about Windows is - It does not just crash, it displays a dialog box and lets you press 'OK' first.
Guten Rutsch und Start ins neue Jahr 2005
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 2 von 2     12   


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 10:38 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz