![]() |
Re: Dateien verschlüsselt abspeichern
Hallo,
Zitat:
![]() ganz unten auf der Seite... |
Re: Dateien verschlüsselt abspeichern
Zitat:
Delphi-Quellcode:
Ist so irgendwie das gleiche was ich geschrieben hatte.. Nur mit viel Stream overhead für alle Copy/Paste programmierer...
P := pBuf;
if( FCodeKey <> '' )then for I := 0 to BufLen - 1 do begin P^ := Byte(FCodeKey[1 + ((I - 1) mod Length(FCodeKey))]) xor P^; inc(P); end; Frank :stupid: |
Re: Dateien verschlüsselt abspeichern
Wir hatten doch gestern einen Thread zum Thema Verschlüsselung. Vielleich hilft dir der ja.
![]() |
Re: Dateien verschlüsselt abspeichern
Zitat:
Wie kommt das zum Einsatz und wie binde ich es ein? Ich habe erstmal die pas-Datei in meinen Programmpfad kopiert, aber ich kann einfach nicht darauf zugreifen. Mit installieren ist da nix. Bin ich so doof, oder was mache ich da falsch!? |
Re: Dateien verschlüsselt abspeichern
Vielleicht so:
in den uses DataFile miteinbinden. Dann eine Variable deklarieren:
Delphi-Quellcode:
später im Programmtext
var
TestFile: TDataFile
Delphi-Quellcode:
Grüße
TestFile:= TDataFile.create("FileName");
Klaus |
Alle Zeitangaben in WEZ +1. Es ist jetzt 10:41 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz