Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Software-Projekte der Mitglieder (https://www.delphipraxis.net/26-software-projekte-der-mitglieder/)
-   -   FileCrypter v1.0 (https://www.delphipraxis.net/56535-filecrypter-v1-0-a.html)

Danniolo 7. Nov 2005 15:21


FileCrypter v1.0
 
Liste der Anhänge anzeigen (Anzahl: 1)
Wie der Name "FileCrypter v1.0" schon sagt, handelt es sich um ein Programm, mit
dem man Dateien ganz einfach durch ein Passwort sichern kann.
FileCrypter nutzt den 256 Bit starken Verschlüsselungsalgorythmus
"BFH" von Steffen Kirbach.

Bekannte Bugs:
- wenn man per Kontextmenü Exedateien zusammen mit anderen (Dateien) Verschlüsseln
möchte, werden die Exefiles nich in die todo Liste aufgenommen.

ToDo:
- wenn man per Kontextmenü Dateien zum Ver-/ Entschlüsseln hinzufügt ist das Programm relativ träge, mal nach einer schnellern "Mutex" Routine Ausschau halten ^^
- Verschlüsselte Archive (wie WinRar, nur statt Kompression - Verschlüsselung)
- mal ein schickeres Icon designen

So, euer Code:
Delphi-Quellcode:
//Dies ist die Function, mit der ich das Programm für alle Dateitypen
//registreirt habe:
function InstallExt2(Extension, ExtDescription, FileDescription,
OpenWith, ParamString: string; IconIndex: Integer): Boolean;
var
  Reg: TRegistry;
begin
  Result := False;
  if Extension <> '' then
  begin
    if Extension[1] <> '.' then
      Extension := '.' + Extension;

    Reg := TRegistry.Create;
    try
      Reg.RootKey := HKEY_CLASSES_ROOT;
      if Reg.OpenKey(Extension, True) then
      begin
       Reg.WriteString('', ExtDescription);
       if Reg.OpenKey('\' + ExtDescription, True) then
       begin
         Reg.WriteString('', FileDescription);
         if Reg.OpenKey('DefaultIcon', True) then
         begin
           Reg.WriteString('', Format('%s,%d', [OpenWith, IconIndex]));
           //ab hier: wichtige Programmzeilen:
           if Reg.OpenKey('\*\shell\Verschlüsseln\Command', True) then
           begin
             Reg.WriteString('', Format('"%s" %s"', [OpenWith, ParamString]));
             Result:=True;
           end;
         end;
       end;
     end;
  finally
    Reg.Free;
  end;
end;
end;

cruso 7. Nov 2005 15:57

Re: FileCrypter v1.0
 
Nur als Tipp: Ein schöneres Icon suchst (und findest) du besser im Internet (einfach mal bei Google schauen), denn selbst bekommt man diese nie besonders gut hin, dann die pixelorientierte Grafik ist nicht jedermanns Sache!

phXql 7. Nov 2005 16:21

Re: FileCrypter v1.0
 
Zitat:

Zitat von cruso
Nur als Tipp: Ein schöneres Icon suchst (und findest) du besser im Internet (einfach mal bei Google schauen), denn selbst bekommt man diese nie besonders gut hin, dann die pixelorientierte Grafik ist nicht jedermanns Sache!

Ja, DAS habe ich auch immer gedacht.

http://www.gimp.org/tutorials/Creating_Icons/ ;)

Chrissi91 12. Nov 2005 15:32

Re: FileCrypter v1.0
 
Wenn ich eine Datei verschzlüssele und dann entschlüssele ist sie wiederergestellt worden, aber ich kann sie nicht mehr öffnen ... bzw. ich öffne immer das programm mit ...

ich fordere meine alten dateien zurück, sonst wirst du von meinem anwalt hören :-)

Danniolo 13. Nov 2005 11:38

Re: FileCrypter v1.0
 
Zitat:

Zitat von Chrissi91
Wenn ich eine Datei verschzlüssele und dann entschlüssele ist sie wiederergestellt worden, aber ich kann sie nicht mehr öffnen ... bzw. ich öffne immer das programm mit ...

ich fordere meine alten dateien zurück, sonst wirst du von meinem anwalt hören :-)

ARG! War mir auch aufgefallen..., nur ich hab das hier nicht wider zurückgezogen, denn ich hab ausversehen einen falschen Regeintrag vorgenommen. Werde den Anhang wohl löschen, ich schick dir demnächst ne PN, in der ich einen Weg beschreibe, die ursprünglichen Dateiverknüpfungen wiederherzustellen. sry, tut mit echt leid :pale:

Danniolo 13. Nov 2005 11:47

Re: FileCrypter v1.0
 
Egal, ich poste am besten den Weg zum Wiederehrstellen der Dateiverknüpfungen hier rein:
- Benutzer muss Adminrechte haben
- Start->Ausführen->regedit
- HKEY_CLASSES_ROOT->erster Eintrag (*)->shell
- Eintrag "Verschlüsseln" löschen (rechtsklick->löschen)
- Programm auch löschen, da dieser Regeintrag jedem Programmstart vorgenommen wird :pale:
- falls Interesse vorhanden ist kann ich das Programm auch nochmal ohne diesem schwerern Bug posten...

Chrissi91 13. Nov 2005 13:58

Re: FileCrypter v1.0
 
interessant ... nur versteh ich nicht ganz, wie du das geproggt hast ... könntest du vll mal den code posten? wenigstens den mit der rgistry?

Thorben77 13. Nov 2005 14:40

Re: FileCrypter v1.0
 
Zitat:

Zitat von Chrissi91
könntest du vll mal den code posten? wenigstens den mit der rgistry?

Sollte er eigentlich noch tun, schließlich hat er es im Open-Source-Bereich vorgestellt :stupid:

Chrissi91 13. Nov 2005 15:47

Re: FileCrypter v1.0
 
wir können ihn ja erpressen ;)

wenn er ihn heute nicht postet, laden wir auf seinen funpic acc nur pornografisches und rechtsradiklaes ;)

aber bitte im internetcafe ... sonst gibts ärger, wenn funpic die ip von uns bekommt ;)

nein nein ... spaß beiseite ... aber source sollte trotzdem noch kommen

edit: rechtschreibfehler verbessert (cource --> source)

Danniolo 13. Nov 2005 15:54

Re: FileCrypter v1.0
 
Ja, morgen werd ich den Code posten, hatte ich bis heute ja auch, aber da war dieser doofe Bug, diesen Fehler hervorgerfen hat :roll: Habt noch ein bissl Geduld (also bis morgen) dann poste ich das hier.
Versprochen :roll:

Chrissi91 13. Nov 2005 16:23

Re: FileCrypter v1.0
 
Okay

wollen wir auch hoffen :lol: 8)

Danniolo 1. Dez 2005 20:35

Re: FileCrypter v1.0
 
schön gehofft? :lol: Ich hab die neue Version (falls es euch noch interessiert) schon vor über nem Monat hochgeladen.

Triples 31. Mär 2006 11:02

Re: FileCrypter v1.0
 
Zitat:

Zitat von Danniolo
schön gehofft? :lol: Ich hab die neue Version (falls es euch noch interessiert) schon vor über nem Monat hochgeladen.

Hi Danniolo :lol:
nettes prog,ich wollte deinen source code mal testen und mußte festellen obwohl ich deine mit gelieferten kompos entpackt habe ,und ins lib verzeichnis kopiert habe kommt trotzdem immer noch beim öfnen der Projeckt datei mit Delphi7 diese Error meldung!
Zitat:


Class TBFH Not found?was mache ich falsch?
Danke schon mal für deine hilfe!
Oder haste diese datei vergessen?
Gruß
triples :roll:

Delphijunkie2006 31. Mär 2006 11:25

Re: FileCrypter v1.0
 
Verschlüsselung ist immer sinnvoll,

noch ne Frage zu dem GIMP, kann man damit auch gute Buttons machen und wenn auf welche Seite muß ich gehen?

mkinzler 31. Mär 2006 11:31

Re: FileCrypter v1.0
 
Zitat:

welche Seite muß ich gehen?
Fertig benutzbar Installer findest du auf SourceForge

Delphijunkie2006 31. Mär 2006 11:37

Re: FileCrypter v1.0
 
Nein, ich meinte in GImp selber, eine Anleitung und einen Link, wie ich schöne Buttons hinbekomme.

Luckie 31. Mär 2006 13:08

Re: FileCrypter v1.0
 
@Delphijunkie2006. Klär dies bitte in einem separatem Thread in der "Klatsch und Tratsch" Sparte, das hat hier nichts zu suchen.

Danniolo 1. Apr 2006 14:42

Re: FileCrypter v1.0
 
@ Triples: Sorry, aber ich dachte keiner interessiert sich mehr hierfür.
Der Fehler ist mir auch aufgefallen, ich werde den Source sofort nochmal mit funktionierenden Kompos nachreichen :roll:

Triples 1. Apr 2006 23:33

Re: FileCrypter v1.0
 
Zitat:

Zitat von Danniolo
@ Triples: Sorry, aber ich dachte keiner interessiert sich mehr hierfür.
Der Fehler ist mir auch aufgefallen, ich werde den Source sofort nochmal mit funktionierenden Kompos nachreichen :roll:

Hi schön das du dich meldest :-D
Est mal ein lob zu deinem tool,es funzt super und sagt mir echt zu :wink:
Ich werde mal gucken obs nun klapen möchte!
Ps ich ediere später das posting noch mal zum Featback :mrgreen:
Ps ist ja noch der alte source ohne Compo,aber ich kann warten :wink:

ichbins 2. Apr 2006 07:49

Re: FileCrypter v1.0
 
vielleicht solltest du ja einen Button "Registry-Einträge entfernen" hinzufügen.

Achja, ein Programm namens FileCrypter gibts hier schon ;) von Luckie

Danniolo 2. Apr 2006 12:01

Re: FileCrypter v1.0
 
Neue Version hochgeladen. Ich hoffe jetzt funktioniert alles!
@ ichbins: Wird gemacht.
@ Lukies "FileCrypter": Ich bin gerade dabei, das Programm zu Verbessern (siehe ToDo im 1. Post). Die neue Version wird dann "FileCryptor" heißen. Ich glaub, diesen Namen gibbet noch net sooft :mrgreen:


Alle Zeitangaben in WEZ +1. Es ist jetzt 16:55 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