AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Password

Ein Thema von allarich · begonnen am 24. Mai 2004 · letzter Beitrag vom 24. Mai 2004
Antwort Antwort
Seite 1 von 2  1 2      
allarich

Registriert seit: 9. Jul 2003
Ort: Erlensee
66 Beiträge
 
Delphi 7 Enterprise
 
#1

Password

  Alt 24. Mai 2004, 10:43
Hallo !!
Bin Anfänger und möchte Ablauf von einem Programm durch password-Sicherung in Form
Passwordfreigeben oder stoppen. Wiei tue ich das ???

MfG
allarich
  Mit Zitat antworten Zitat
Dax
(Gast)

n/a Beiträge
 
#2

Re: Password

  Alt 24. Mai 2004, 10:50
Kommt auf das an, was du tun willst.

Was willst du tun?
  Mit Zitat antworten Zitat
allarich

Registriert seit: 9. Jul 2003
Ort: Erlensee
66 Beiträge
 
Delphi 7 Enterprise
 
#3

Re: Password

  Alt 24. Mai 2004, 11:12
Ich möchte beim Programmstart die Form Password aufrufen,um nach Eingabe des Passwords entweder weiterfahren(wenn password korrekt),oder Eingabewiederholung und dann abbrechen.

MfG
allarich
  Mit Zitat antworten Zitat
Benutzerbild von -tobi-
-tobi-

Registriert seit: 24. Mär 2004
53 Beiträge
 
Delphi 7 Professional
 
#4

Re: Password

  Alt 24. Mai 2004, 11:28
hallo,

es kommt darauf an, od du das Passwort als Konstante fest hinterlegen willst, oder es aus einer Datei oder DB zum vergleichen lesen willst.

Gruß

tobi
  Mit Zitat antworten Zitat
Benutzerbild von -tobi-
-tobi-

Registriert seit: 24. Mär 2004
53 Beiträge
 
Delphi 7 Professional
 
#5

Re: Password

  Alt 24. Mai 2004, 12:11
Ein Vorschlag mit Konstante und 2 Formularen währe:

Hierzu sollte bei 'Projekt/Optionen' nur Form1 in 'Automatisch erzeugt' stehen und Form2 in 'verfügbare Formulare'

Form1 für Aufruf von Form2 und Programmende.
Hier muß bei uses im Interface-Teil 'Unit2' hinzugefügt werden.

Delphi-Quellcode:
procedure TForm1.cmdEndeClick(Sender: TObject);
begin
  Form1.Close; //Programmende
end;

procedure TForm1.cmdAnmeldenClick(Sender: TObject);
const
  passwd = 'test';
begin
  if passwd = txtPasswort.Text then
  begin
    Form1.Enabled := False; //Weiterarbeiten auf Form1 verhindern
    Form2 := TForm2.Create(self); //Form2 Erstellen
    try
      Form2.ShowModal //Form2 Anzeigen
    finally
      Form2.Free;
    end;
  end;
end;
Code von Form2 um zu Form1 zurückzukehren

Delphi-Quellcode:
implementation

{$R *.dfm}

uses
  unit1;

procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  Form1.Enabled := True; //ermöglichen auf Form1 weiterzuarbeiten
end;

... //In Form2 kann nun das komplette eigendliche Programm erstellt werden.
Gruß
tobi
  Mit Zitat antworten Zitat
24. Mai 2004, 12:30
Dieses Thema wurde von "sakura" von "Freeware" nach "Sonstige Fragen zu Delphi" verschoben.
Freeware ist zur Vorstellung von Programmen
allarich

Registriert seit: 9. Jul 2003
Ort: Erlensee
66 Beiträge
 
Delphi 7 Enterprise
 
#7

Re: Password

  Alt 24. Mai 2004, 12:58
Hallo tobi,

danke füe Deinen Vorschlag; sieht gut aus; werde ihn gleich nachher ausprobieren !

MfG
allarich
  Mit Zitat antworten Zitat
pizza

Registriert seit: 30. Apr 2004
30 Beiträge
 
#8

Re: Password

  Alt 24. Mai 2004, 13:37
es reicht auch wenn du nur
Form2.ShowModal; machst..
du musst es vorher nicht erstellen, da du es ja einfach mit 'neues formular erstellen'
machen kannst und dann einfach mit dem befehl oben anzeigen kannst..

mfg rob
  Mit Zitat antworten Zitat
Benutzerbild von c113plpbr
c113plpbr

Registriert seit: 18. Nov 2003
Ort: localhost
674 Beiträge
 
Delphi 2005 Professional
 
#9

Re: Password

  Alt 24. Mai 2004, 15:59
Bei Tobi's methode ist das passwort aber sehr einfach herauszufinden. Sicherer wäre eine andere, sicherere 'speicherung' des Passwortes.

ciao, Philipp
Philipp
There is never enough time to do all the nothing you want.
*HABENWILL*
  Mit Zitat antworten Zitat
Ratte

Registriert seit: 12. Dez 2003
Ort: Erfurt
345 Beiträge
 
Delphi 2005 Personal
 
#10

Re: Password

  Alt 24. Mai 2004, 16:36
Hi,

ich hatte bei einem ähnlichen Prob. einen md5-hash des Passworts gespeichert und den Hash des eingegebenen PW's und des Richtigen PW's verglichen.

Ratte
Schiffsratte der U.S.S. Delphipraxis, Laderaum 4538
BUSH:= TTerminator.create;
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 1 von 2  1 2      


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:06 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