Thema: Delphi Abfrage

Einzelnen Beitrag anzeigen

Benutzerbild von jaenicke
jaenicke

Registriert seit: 10. Jun 2003
Ort: Berlin
9.580 Beiträge
 
Delphi 11 Alexandria
 
#19

Re: Abfrage

  Alt 8. Apr 2009, 20:51
So machst du es dir unnötig schwer, denn Indy und TIdFTP ist da sehr viel einfacher. Aber gut.

Der Rückgabewert sollte dir anzeigen, ob die Datei erfolgreich gefunden und heruntergeladen werden konnte. Wenn ja, dann kannst du jetzt die lokale Datei öffnen und auslesen:
Delphi-Quellcode:
var
  MyFile: TStringList;
  PasswordMatches: Boolean;
begin
  MyFile := TStringList.Create;
  try
    MyFile.LoadFromFile(YourFileName);
    PasswordMatches := Trim(MyFile.Text) = YourPassword;
  finally
    MyFile.Free;
  end;
end;
Wobei YourPassword das zu prüfende Passwort, YourFileName die lokale heruntergeladene Datei und PasswordMatches die Variable für das Ergebnis des Passwortvergleichs ist.
Sebastian Jänicke
Alle eigenen Projekte sind eingestellt, ebenso meine Homepage, Downloadlinks usw. im Forum bleiben aktiv!
  Mit Zitat antworten Zitat