Startzähler für Programm erstellen (Wichtig)

[GouJetir]

Hallo,
ich arbeite gerade an einem Programm,was mehrere Funktionen enthält.
Will aber,dass die Funktionen nacheinander benutzbar sind.Die Funktionen habe ich alle fertig.

Damit die Funktionen freigeschaltet werden,muss der jenige zum Beispiel 10 mal das Programm pro Tag hintereinander starten,dann schaltet sich eine Funktion frei.

Ich würd das Programm noch bevor Wochenende zu ende ist fertig haben.

Habe auch noch eine unbeantwortete Frage: http://www.delphipraxis.net/162935-l...ebbrowser.html

Würde mich sehr freuen,wenn ihr mir schnell helft.

Gruß
GouJetir

[Thom]

Anzahl der Starts irgendwo speichern - zum Beispiel in der Registry oder in einer Datei und beim nächsten Programmstart wieder auslesen.

[GouJetir]

Aber wie mach ich das?
Bin noch anfänger und ich will das so machen,dass das Programm die Starts einmal am Tag zählt.Nicht mehrmals an einem Tag.

[Matze]

Zitat von GouJetir:

Aber wie mach ich das?
Bin noch anfänger und ich will das so machen,dass das Programm die Starts einmal am Tag zählt.Nicht mehrmals an einem Tag.

Das Datum auslesen und zusammen mit dem Zähler z.B. in einer Ini-Datei ablegen. Beim Programmstart schaust du, ob es einen Eintrag mit dem aktuellen Datum gibt, wenn ja, liest du die Zahl aus und erhöhst sie, wenn nicht, legst du einen neuen Eintrag an bzw. setzt den Zähler zurück und Das Datum auf das aktuelle.

Möglicher Aufbau der Datei:

Code:

[Konfiguration]
Datum=10.09.2011
Starts=4

Manipulieren lässt sich das natürlich alles, aber das ist ein anderes Thema.

[GouJetir]

Danke für die schnelle Antwort.
Ich habe aber noch ein Problem.
Ich hatte mich in einem anderem Delphi Forum angemeldet und da wusste ich nicht wie ich eine .ini schreibe und die haben mir ein Tutorial gezeigt,aber ich versteh es immernoch nicht und funktionieren tut es durch den Tutorial Codes auch nicht.

Kann mir vielleicht jemand einen exakten Code für mein Programm schreiben,der also die Ini-Datei schreibt?
Oder vielleicht ganz leicht erklärt,damit ich es versteh.

Gruß
GouJetir

[stahli]

ein Beispiel:

Delphi-Quellcode:

procedure ReadOptionsIni;
var
  IniFile: TIniFile;
begin
  IniFile := TIniFile.Create(Path + OptionsIniFileName);
  KOResultsPosition := 0;//TKOResultsPosition(IniFile.ReadInteger('Options', 'KOResultsPosition', 0));
  ShowingTimePanels := IniFile.ReadBool('Options', 'ShowingTimePanels', True);
  GamePaperAuto := IniFile.ReadBool('Options', 'GamePaperAuto', True);
  GamePaperPictures := 0;//TGamePaperPictures(IniFile.ReadInteger('Options', 'GamePaperPictures', 0));
  RecoverMinutes := IniFile.ReadInteger('Options', 'RecoverMinutes', 5);
  PlayerNameAbbr := IniFile.ReadInteger('Options', 'PlayerNameAbbr', 0);
  AutoSaveMinutes := IniFile.ReadInteger('Options', 'AutoSaveMinutes', 0);
  HelpMode := IniFile.ReadInteger('Options', 'HelpMode', 0);
  IniFile.Free;
...
end;

procedure WriteOptionsIni;
var
  IniFile: TIniFile;
begin
  IniFile := TIniFile.Create(Path + OptionsIniFileName);
  IniFile.WriteInteger('Options', 'KOResultsPosition', Integer(KOResultsPosition));
  IniFile.WriteBool('Options', 'ShowingTimePanels', ShowingTimePanels);
  IniFile.WriteBool('Options', 'GamePaperAuto', GamePaperAuto);
  IniFile.WriteInteger('Options', 'GamePaperPictures', Integer(GamePaperPictures));
  IniFile.WriteInteger('Options', 'RecoverMinutes', RecoverMinutes);
  IniFile.WriteInteger('Options', 'PlayerNameAbbr', PlayerNameAbbr);
  IniFile.WriteInteger('Options', 'AutoSaveMinutes', AutoSaveMinutes);
  IniFile.WriteInteger('Options', 'HelpMode', HelpMode);
  IniFile.Free;
end;

[GouJetir]

Hallo,
habe irgendwie den oberen Beitrag von Stahli nicht verstanden.

Ich glaub das mit dem Täglichen Start lass ich weg,vielleicht merkt es keiner,dass man das Programm immer neu starten kann.

[stahli]

Ich erzeuge nur eine Ini und schreibe und lese ein paar Daten daraus.
Hast Du Dir mal die Hilfe zur Ini angesehen?

[GouJetir]

Ok ist egal mit Ini. Trotzdem Danke.

Stattdessen mach ich das jetzt einfach mit jedem Start zählen,die Zeit ist dann egal.
Brauch denk ich auch noch ini,aber wird dann wohl leichter zu schreiben sein.

So soll es ablaufen:

1.Starte Programm und Label1 steht auf 0
2.Schließe das Programm
3.Starte das Programm und Label1 steht auf 1
4.Schließe das Prograrmm
5.Starte das Programm und Label1 steht auf 2

Das geht dann immer so weiter bis unendlich.

Wie kann ich meine aktuelle Label1 als Ini datei speichern und dann beim starten wieder in die Label1 +1 drauf machen?

[jaenicke]

Zitat von GouJetir:

Brauch denk ich auch noch ini,aber wird dann wohl leichter zu schreiben sein.

Das funktioniert logischerweise exakt genauso, nur dass du eben weniger Daten speicherst und liest.

Aber sag doch was genau du dabei nicht verstehst. Sonst kann dir dabei auch niemand helfen...