Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Shareware-Zähler
Autor: Fat-Sheep
Datum: 07.10.02 21:52
Hallo zusammen Ich möchte mein Sharewareprogramm in den nächsten Tagen ins Internet stellen. Ich möchte auch eine Demoversion zur verfügung stellen , die 10 mal gestartet werden darf. Was ist die gescheitesete Methode um die "Öffnungs-Zahl" zu speichern? Ich hab das mal so gemach: Private Sub Form_Load() Dim male, wenn, save wenn = GetSetting("Name", "Start", "male") Label2.Caption = wenn male = GetSetting("Name", "Start", "male") On Error GoTo hyp Label.Caption = male Label.Caption = Label.Caption + 1 If Label.Caption > 10 Then Command1.Enabled = False Command2.Enabled = True Timer1.Enabled = True End If SaveSetting "Name", "Start", "male", Label.Caption Exit Sub hyp: SaveSetting "Start", "Start", "male", "0" End Sub Das funktionier ja auch schön, aber ich möchte den Wert verschlüsseln. Wie geht das am besten? Gruss & Danke im Voraus Fat-Sheep

Shareware-Zähler	324	Fat-Sheep	07.10.02 21:52
Re: Shareware-Zähler	215	Marcus W	07.10.02 22:00
Re: Shareware-Zähler	202	Fat-Sheep	07.10.02 22:10

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen