AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein GUI-Design mit VCL / FireMonkey / Common Controls Delphi Wert von ini Datei lesen und wenn nicht vorhanden dann Exit

Wert von ini Datei lesen und wenn nicht vorhanden dann Exit

Ein Thema von Delphiturbo · begonnen am 5. Mai 2008 · letzter Beitrag vom 6. Mai 2008
Antwort Antwort
Seite 2 von 2     12
Benutzerbild von Fussball-Robby
Fussball-Robby

Registriert seit: 22. Okt 2007
Ort: Nähe Köln
1.063 Beiträge
 
Delphi 7 Enterprise
 
#11

Re: Wert von ini Datei lesen und wenn nicht vorhanden dann E

  Alt 5. Mai 2008, 21:29
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var MyIniFile : TInifile;
begin
if FileExists('MyIniFile3.ini') then
begin
MyIniFile := TIniFile.Create(ExtractFilePath(ParamStr(0)) + 'MyIniFile3.ini');
Edit1.Text := MyIniFile.ReadString('Section1','text1','nicht gefunden')
end
else
begin
//close;
ShowMessage('nicht gefunden ');
MyIniFile.Free;
end;
Was ist das denn? Wenn die Datei existiert, erstellst du die IniFile, wenn sie nicht existiert, gibtst du sie frei? Außerdem solltest du dir angewöhnen, den Code einzurücken:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
  MyIniFile: TInifile;
  FName: String;
begin
  FName := ExtractFilePath(ParamStr(0)) + 'MyIniFile3.ini';
  if FileExists(FName) then
  begin
    MyIniFile := TIniFile.Create(FName);
    try
      Edit1.Text := MyIniFile.ReadString('Section1', 'text1', 'nicht gefunden')
    finally
      MyIniFile.Free;
    end;
  end
  else
  begin
    //close;
    ShowMessage('nicht gefunden ');
  end;
end;
Robert L.
Der folgende Satz ist richtig!
Der vorherige Satz ist falsch!

Paradox
  Mit Zitat antworten Zitat
Delphiturbo
(Gast)

n/a Beiträge
 
#12

Re: Wert von ini Datei lesen und wenn nicht vorhanden dann E

  Alt 5. Mai 2008, 21:57
Es ist ok mit dem Code, möchte ich aber noch den Code ändern

wenn die INI-Datei vorhanden ist aber die Zeile text1 nicht da, dann soll das Programm auch beendet werden und nicht eine Meldung zeigen "nicht gefunden"
  Mit Zitat antworten Zitat
Blackheart

Registriert seit: 4. Mai 2005
846 Beiträge
 
Delphi 7 Enterprise
 
#13

Re: Wert von ini Datei lesen und wenn nicht vorhanden dann E

  Alt 5. Mai 2008, 22:12
Zitat von Delphiturbo:
Es ist ok mit dem Code, möchte ich aber noch den Code ändern

wenn die INI-Datei vorhanden ist aber die Zeile text1 nicht da, dann soll das Programm auch beendet werden und nicht eine Meldung zeigen "nicht gefunden"
Und wo ist nun dein Problem ?
If IniFile.ReadString(bla then...
Blackheart
  Mit Zitat antworten Zitat
Delphiturbo
(Gast)

n/a Beiträge
 
#14

Re: Wert von ini Datei lesen und wenn nicht vorhanden dann E

  Alt 6. Mai 2008, 00:42
Ich habe jetzt ein anderes Problem

Es wird immer eine neue Zeile in Ini-Datei hinzugefügt !
Delphi-Quellcode:
...
MyIniFile.WriteString('Daten1','Text1', 'blabla');
...
d.h. wenn ich die INI-Datei öffne dann finde ich folgendes :
Delphi-Quellcode:
[Daten]
Text=blabla
[Daten]
Text=blabla
[Daten]
Text=blabla
[Daten]
Text=blabla
...
Wie kann ich die Zeile in ini Datei ersetzen ? Also die alte zuerst löschen
und dann die neue hinschreiben.
  Mit Zitat antworten Zitat
Blackheart

Registriert seit: 4. Mai 2005
846 Beiträge
 
Delphi 7 Enterprise
 
#15

Re: Wert von ini Datei lesen und wenn nicht vorhanden dann E

  Alt 6. Mai 2008, 17:20
Normalerweise wird der Wert überschrieben du musst da wohl irgendetwas
verkehrt machen am besten du zeigst mal etwas code.
Blackheart
  Mit Zitat antworten Zitat
Benutzerbild von SaFu
SaFu

Registriert seit: 8. Nov 2006
1.360 Beiträge
 
Delphi 10.3 Rio
 
#16

Re: Wert von ini Datei lesen und wenn nicht vorhanden dann E

  Alt 6. Mai 2008, 17:26
Hatte das Problem auch schonmal wenn irgendwo noch ein leerzeichen drin ist wurde es bei mir auch immer wieder neu geschrieben. Raus gemach ging

vielleicht hilfts ja
"... Wie gesagt, die Nutzer von 10, 12, 14 Zoll Display's werden deine Seite nicht in voller Pracht sehen können, ...

Surft Ihr mit dem Taschenrechner?"
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.534 Beiträge
 
Delphi 11 Alexandria
 
#17

Re: Wert von ini Datei lesen und wenn nicht vorhanden dann E

  Alt 6. Mai 2008, 17:27
Spätestens beim 2. Anruf sollte der Wert dann aber trotzdem überschrieben werden.
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
Benutzerbild von Deltachaos
Deltachaos

Registriert seit: 20. Feb 2008
Ort: Berlin
195 Beiträge
 
Delphi 7 Personal
 
#18

Re: Wert von ini Datei lesen und wenn nicht vorhanden dann E

  Alt 6. Mai 2008, 17:46
Delphi-Quellcode:
...
MyIniFile.WriteString('Daten1','Text1', 'blabla');
...
d.h. wenn ich die INI-Datei öffne dann finde ich folgendes :
Delphi-Quellcode:
[Daten]
Text=blabla
[Daten]
Text=blabla
[Daten]
Text=blabla
[Daten]
Text=blabla
...
kleine Frage:

Warum steht oben 'Daten1' und unten '[Daten]' dass muss eigentlich dan '[Daten1]'

gibst du den die ini Datei auch wieder frei. nur so ne vermutung.


  inidatei.free;
Maximilian Ruta
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

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 02:08 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