Delphi-PRAXiS
Seite 1 von 4  1 23     Letzte »    

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   Delphi Startzähler für Programm erstellen (Wichtig) (https://www.delphipraxis.net/162949-startzaehler-fuer-programm-erstellen-wichtig.html)

GouJetir 10. Sep 2011 12:52

Startzähler für Programm erstellen (Wichtig)
 
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 10. Sep 2011 12:59

AW: Startzähler für Programm erstellen (Wichtig)
 
Anzahl der Starts irgendwo speichern - zum Beispiel in der Registry oder in einer Datei und beim nächsten Programmstart wieder auslesen.

GouJetir 10. Sep 2011 13:02

AW: Startzähler für Programm erstellen (Wichtig)
 
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 10. Sep 2011 13:06

AW: Startzähler für Programm erstellen (Wichtig)
 
Zitat:

Zitat von GouJetir (Beitrag 1123135)
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 10. Sep 2011 13:24

AW: Startzähler für Programm erstellen (Wichtig)
 
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 10. Sep 2011 13:38

AW: Startzähler für Programm erstellen (Wichtig)
 
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 10. Sep 2011 17:10

AW: Startzähler für Programm erstellen (Wichtig)
 
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. :D

stahli 10. Sep 2011 17:13

AW: Startzähler für Programm erstellen (Wichtig)
 
Ich erzeuge nur eine Ini und schreibe und lese ein paar Daten daraus.
Hast Du Dir mal die Hilfe zur Ini angesehen?

GouJetir 10. Sep 2011 17:27

AW: Startzähler für Programm erstellen (Wichtig)
 
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 10. Sep 2011 17:30

AW: Startzähler für Programm erstellen (Wichtig)
 
Zitat:

Zitat von GouJetir (Beitrag 1123181)
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...


Alle Zeitangaben in WEZ +1. Es ist jetzt 12:16 Uhr.
Seite 1 von 4  1 23     Letzte »    

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