Was mache ich falsch? Datei mit bestimmter Endung mit einem mit Delphi erstellten Programm öffnen und dort verwerten. Geht das und wie? Ich bin gerade dabei, mit Borland Delphi 5 ein Programm zu schreiben, das eine Datenbank verwaltet. Dazu werden in Edits Strings eingegeben, die in eine TStringList zusammengefasst werden und diese TStringList wird dann mit dem Befehl SaveToFile gespeichert. Ich habe dafür die Dateiendung. spieler gewählt, d. h. Textdatei zeilenweise einlesen - Delphi-PRAXiS. ein neues Dateiformat. Wenn ich die SPIELER-Datei öffnen will, fragt mich Windows 10, mit welchem Programm das geschehen soll. Geht es, dass ich die Datei mit meinem selbst geschriebenen Programm öffne und die Daten aus der SPIELER-Datei in eine TStringList im Programm geladen werden? Und wenn ja, wie? Falls das jetzt zu kompliziert geschrieben war, hier noch mal besser erklärt. Mit Microsoft Word erstelle ich DOC-Dateien. Wenn ich auf eine DOC-Datei klicke, öffnet sich Microsoft Word und der Inhalt der Datei wird mir im Programm angezeigt. --- Ich habe mit dem Programm eine SPIELER-Datei erstellt.
Diese besitzt eine Methode LoadFromFile und erlaubt einen direkten Zugriff auf einzelne Elemente der Liste. Gruß Hawkeye Registriert seit: 29. Nov 2003 Ort: San Diego, CA/USA 1. 446 Beiträge Delphi 2006 Architect 21. Apr 2006, 17:41 In einem Label kannst aber nix eingeben... Nimm stattdessen ein TEdit-Feld. Um etwas Neues zu schaffen muss man seine Ohren vor den Nein-sagern verschliessen um seinen Geist öffnen zu können. (George Lukas) 21. Apr 2006, 17:49 @ Mackhack klar, hast recht, war nur ein Leichtsinnsfehler von mir. @Hawkeye Danke für den Tipp, kann ich damit auch auf einzelene Zeilen in einer Textdatei zugreifen? Gruss, Ludwig 21. Apr 2006, 17:51 Auf die einzelnen Zeilen kannst du nach dem Laden per Index zugreifen. Registriert seit: 26. Textdatei einlesen - Administrator.de. Jan 2006 Ort: Leipzig 529 Beiträge Delphi 7 Professional 21. Apr 2006, 17:55 Wenn das ganze eine "Datenbank" werden soll, warum nimmst du nicht einfach TIniFile? Dort wird das ganze schon strukturiert und ist auch einfach mit Funktionen ausles- und schreibbar.
6. Okt 2007, 22:42 Ok, aber ist meine bescheidene Lösung denn akzeptabel? 6. Okt 2007, 22:48 Das musst du für dich entscheiden. Wenn du damit zufrieden bist, wieso nicht? Ist die Textdatei nicht sonderlich groß, dann ist deine Lösung in Ordnung. Je größer jedoch die Datei, desto länger benötigt das Einlesen in die StringList und desto mehr RAM wird belegt. Edit: Aber vergiss die Ressourcenschutzblöcke nicht. 6. Okt 2007, 23:01 Zitat: Ressourcenschutzblöcke Habe ich noch nie gehört 6. Okt 2007, 23:05 Zitat von Tommy1988: Aber du weißt sicher schon, was das ist, nämlich try - finally try //... finally FreeAndNil(sl); Das sorgt dafür, dass der Speicher auch dann wieder freigegeben wird, falls beim Zugriff auf die Stringlist oder ähnlichem (das im try-Abschnitt) eine Exception geworfen werden sollte. Edit: ich sehe gerade, dass ich "finally-Abschnitt" geschrieben hatte. 6. Wie kann man in Delphi Daten aus einer Textdatei auslesen?. Okt 2007, 23:27 Ahhhh.. doch unter diesem Namen ist mir das durchaus bekannt Zitat
Ist die Datei vorhanden wird sie geöffnet, ist sie nicht vorhanden wird sie erstellt und geöffnet. Zum Schluss müssen wir den Speicher natürlich wieder freigeben. Zur Sicherheit kommt das Ganze in einen Try-Finally-Block. Und so schreibt man in INI-Dateien: procedure WriteString( const SectionName, Schluessel, Wert: string); Ergänzen wir unsere obenstehende Procedure um folgende Zeile, damit sie so aussieht: Ini. WriteString('Section', 'Schlüssel1', 'Wert'); Ini. WriteInteger('Section', 'Schlüssel2', 10); Ini. WriteBool('Section', 'Schlüssel3', True); Der erste Befehl schreibt eine Zeichenkette (String) in die Datei, der zweite Befehl schreibt eine Integerzahl und der dritte einen booleschen Wert (True/False) in die Datei. Bei booleschen Werten wird aber nicht True und False sondern 1 und 0 in die Datei geschrieben. Dieses Beispiel erzeugt folgende INI-Datei: [Section] Schlüssel1=Wert Schlüssel2=10 Schlüssel3=1 Mit wird belegter Speicher wieder freigegeben, aber das erwähnte ich schonmal.
Eine INI-Datei ist eine einfache Textdatei, die man ganz simpel mit NotePad bearbeiten kann. Sie ist in mehrere Sections unterteilt. Eine neue Section beginnt mit dem Namen der Section, der in eckige Klammern gefasst wird. In jeder Section gibt es dann wie in der Registry Werte. Der Grundsätzliche Aufbau einer INI-Datei: [Section1] Schlüssel1=Wert1 Schlüssel2=Wert2 Schlüssel3=Wert3 [Section2] Schreiben in INI-Dateien Jede stellt sich natürlich jetzt die Frage, wie man solche Dateien erstellen und daraus Informationen entnehmen kann. Zuerst muss die Unit "IniFiles" eingebunden werden: uses IniFiles; Jetzt benötigen wir das Object TIniFile: procedure rmCreate(Sender: TObject); var Ini: TIniFile; begin (''); try {hier kommen gleich die Lese/Schreibbefehle rein} finally; end; Wir haben jetzt das Object deklariert und createt. Der Parameter bei gibt an, um welche Datei es sich handelt. Wichtig: Es sollte immer der vollständige Pfad zur Datei angegeben werden, da ansonsten das aktuelle Arbeitsverzeichnis, das nicht das Programm-Verzeichnis sein muss, genommen wird.