Demoversion Programm beenden

[Sir Rufo]

Direkt in das Anwendungsverzeichnis zu schreiben ist eine ganz doofe Idee - oder muss der Anwender zwingend als Administrator arbeiten

Und das ist ja so durch die Brust ins Auge gehüpft und am Fuß wieder rausgesprungen:

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
begin
  // Zähler erhöhen, ok
  Inc(Zaehler);
  // Zähler in ein Edit-Feld schreiben (Int->Str) ... öh soll der User das ändern können???
  Edit1.Text := IntToStr(Zaehler);
  // Wieso denn jetzt wieder Str->Int, du hast doch Zugriff auf Zaehler???
  if Edit1.Text = '1' then Label1.Caption:='1.Versuch';
  if Edit1.Text = '2' then Label1.Caption:='2.Versuch';
  if Edit1.Text = '3' then Label1.Caption:='Testzeitraum ist beendet!';
  if Edit1.Text = '3' then Button2.Caption:='Ende!';
  // Form1 ist eher fehleranfällig. Besser:
  // HauptForm schließen: Application.MainForm.Close
  // Diese Form schließen: Self.Close oder einfach Close
  if Edit1.Text = '4' then Form1.Close; 
end;

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
begin
  Inc(Zaehler);
  Edit1.Text := IntToStr(Zaehler);
  case Zaehler of
    1: Label1.Caption:='1.Versuch';
    2: Label1.Caption:='2.Versuch';
    3: 
      begin
        Label1.Caption:='Testzeitraum ist beendet!';
        Button2.Caption:='Ende!';
      end;
    4: Close;
  end;
end;

[himitsu]

Demos mit Zeitbegrenzung sind nicht sicher machbar.
- die Uhr kann man verstellen
- eine Uhrzeit aus dem Internetabfragen, kann man vergessen, da man meistens keinen aktiven Internetzugang voraussetzen kann und über diverse Tricks kann man sowas sowieso umgehen

Die einzig sichere Möglichkeit ist:
- bestimmten Code garnicht erst einzukompileren ('nen Button zu deaktivieren hildt nix, denn der läßt sich extrem einfach wieder aktivieren) und eine spezielle Demo-Version rauszubringen, welche sich nicht auf eine vollversion patchen läßt, da dieser nicht enthalten ist.
- also irgendwas weglassen, welchen einen dazu drängt sich dann doch mal die Vollversion zu besorgen

Zitat:

Die "tes.dat" wird noch versteckt in einem anderen Ordner.
Dieses hier ist nur ein Beispiel.Und Windows hat viele Ordner

Mir egal.
In vielen Ordner hat dein Programm sowieso keine Zugriffsrechte und verstecken kannst'e vor mir eh nix.
Und wenn sich dein Programm irgendwo an meinem System zu schaffen macht, mir dieses mutwillig zumüllen will, dann fliegt dein Programm von der Platte und ich nehm mir ein nettes Programm eines anderen Herstellers. (ich bin mir sicher, daß es besseren Alternativen geben wird)

PS: In der FORM speichern? In einer unverschlüsselten Resource, welche sich leicht ändern läßt.

[Sir Rufo]

Auch wenn ein Betriebssystem viele Ordner hat (das hat mit Bill Gates gar nichts zu tun), so haben die alle einen Sinn und Zweck - man muss sich nur damit befassen.

Es gibt zwar die Möglichkeit an eine Anwendung Daten zu hängen und dort die Anzahl der Aufrufe zu vermerken, allerdings reagieren da die Virenscanner etwas ungehalten.

[Darlo]

Ich nehme für sowas folgendes Verzeichnis:
C:\Users\[user]\AppData\Roaming

Den Ordner AppData findet ein normaler User eh nicht.
Da kannst Du ja ne verschlüsselte Datei reinlegen die die Aufrufe mitloggt. Setze bei der Datei einen bestimmten Timestamp der weit in der Vergangenheit liegt,
wenn dieser nicht mehr stimmt ist die Demoversion zu.

Um die Demo zu aktivieren muss bei mir eine Onlineverbindung bestehen und ich speichere die HDD-Id in eine Datenbank,
wenn die ID vorhanden, kann die Demo nicht mehr aktiviert werden.


Nicht 100 % sicher, aber für die meisten Anwender reicht es.

Gruß

[Sir Rufo]

Zitat von Darlo:

Ich nehme für sowas folgendes Verzeichnis:
C:\Users\[user]\AppData\Roaming

Eine schlechte Wahl ... besser

Code:

%APPDATA%

bzw.

Code:

CSIDL_APPDATA

, dann ist Windows dafür zuständig, das richtige Verzeichnis zu liefern

[Darlo]

Zitat von Sir Rufo:

Zitat von Darlo:

Ich nehme für sowas folgendes Verzeichnis:
C:\Users\[user]\AppData\Roaming

Eine schlechte Wahl ... besser

Code:

%APPDATA%

bzw.

Code:

CSIDL_APPDATA

, dann ist Windows dafür zuständig, das richtige Verzeichnis zu liefern

Das war nur der Pfad.

Code:

    SHGetSpecialFolderLocation(Einstellungen.Handle, CSIDL_APPDATA, SpecialDir);
    SHGetPathFromIDList(SpecialDir, @FBuf[0]);
    Allocator.Free(SpecialDir);
    pfad := FBuf+'\[Firma]\[Programmname]\';

Gruß

[Luckie]

Zitat von Darlo:

Ich nehme für sowas folgendes Verzeichnis:
C:\Users\[user]\AppData\Roaming

Den Ordner AppData findet ein normaler User eh nicht.

Ein normaler Benutzter crackt auch keine Demoversionen. Er sucht sie sich im Internet. Und mit der Software von Sysinternals ist das ganz schnell gefunden. Dann noch die Sprunganweisung gepatcht und das war es dann. Ein mittlemäßig erfahrener Cracker macht dir das in einer halben Stunden. Und jetzt setzte das mal ins Verhältnis zu der Zeit und den Aufwand, den ihr da schon reingesteckt habt. Hättet ihr die Zeit und Mühe in gute Features investiert, dann hättet ihr auch ein paar ehrliche Käufer mehr und die, die die gecrackte Version nutzen, würden gar nicht groß ins Gewicht fallen.

[Darlo]

Zitat von Luckie:

Hättet ihr die Zeit und Mühe in gute Features investiert, dann hättet ihr auch ein paar ehrliche Käufer mehr und die, die die gecrackte Version nutzen, würden gar nicht groß ins Gewicht fallen.

Wo liest du denn raus dass die Software nicht gut ist und dass der Absatz nicht stimmt??

[Luckie]

Wo liest du raus, dass ich gesagt habe, die Software sei schlecht?

[p80286]

Zitat von Darlo:

Zitat von Luckie:

Hättet ihr die Zeit und Mühe in gute Features investiert, dann hättet ihr auch ein paar ehrliche Käufer mehr und die, die die gecrackte Version nutzen, würden gar nicht groß ins Gewicht fallen.

Wo liest du denn raus dass die Software nicht gut ist und dass der Absatz nicht stimmt??

Wahrscheinlich wurde er an die seltenen Softwareperlen erinnert, die mit so vielen Sicherheitsfeatures zugenagelt waren, daß ein Arbeiten mit ihnen unmöglich war.

Gruß
K-H