Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by VkPenguin,
16. Dez 2014
@Himitsu: Vielen Dank für die Wiederholung deines Tipps. Wie man merkt hat es zwar ein bisschen gedauert, ich habe es aber nochmal mit Deiner Idee versucht und schließlich klappt es nun auch, wie ich es mir vorstelle.
Danke euch allen!
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by VkPenguin,
9. Dez 2014
Ich poste einfach mal meinen Versuch. Um die Befehle etwas auszutesten wollte ich zunächst nur eine Datei lesen und in einer anderen Abspeichern. Die Verschlüsselung füge ich später ein, wenn das klappt. Ich habe dazu den von euch vorgegebenen Code genommen und versucht, diesen zu vervollständigen
if Opendialog1.Execute then
Begin
AssignFile(F,OpenDialog1.FileName);
Reset(F,1);
W...
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by VkPenguin,
9. Dez 2014
Wirklich etwas seltsam, ich habe zwischendrin den PC neu gestartet und nun geht's, ohne, dass ich etwas verändert hätte. Aber wenn Rewrite alles löscht, ist der Befehl für meine Zwecke doch völlig falsch, oder...?
Ich habe bei DelphiBasics nachgesehen und da stand:
Oder Missverstehe ich das etwa?
Ich werde mich jedenfalls noch weiter dran versuchen, wenn ich noch ein konkretes...
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by VkPenguin,
9. Dez 2014
@OlafSt: Nein, bin ich leider nicht, sonst würde ich ja nicht danach fragen. Was du gesagt hast, habe ich ja oben bereits angedeutet, aber da ich mit keinem dieser Begriffe bisher gearbeitet habe fehlt mir die Erfahrung, um die "Idee" auch tatsächlich umzusetzt. Wie gesagt, ich meine es ernst, wenn ich sage, es tut mir Leid, dass ich mich so blöd anstelle. Aber es ist eben mein "erstes Mal". :-)...
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by VkPenguin,
5. Dez 2014
Guten Abend,
es tut mir wirklich leid, dass ich mich scheinbar so blöd anstelle, aber ich habe vorhin alle drei von euch vorgeschlagenen Möglichkeiten ausprobiert und komme bei keiner ein Stück weiter. Es muss doch irgendwo eine Art Tutorial für ein einfaches Verschlüsseln von Dateien geben.
Mir ist klar, dass es sehr aufwendig werden kann, wenn man eine wirklich sichere Technik braucht,...
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by VkPenguin,
5. Dez 2014
Aber was soll ich denn nun tun? Ich kann doch nicht einfach die Version in die .inc aufnehmen, oder?
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by VkPenguin,
3. Dez 2014
Diese Stelle verursacht das Problem:
{$IFDEF VER_D3H}
procedure ModuleUnload(Instance: Integer);
var // automaticaly deregistration/releasing
I: Integer;
begin
if IsObject(FClasses, TList) then
for I := FClasses.Count -1 downto 0 do
if Integer(FindClassHInstance(TClass(FClasses))) = Instance then
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by VkPenguin,
2. Dez 2014
Guten Tag zusammen,
ich habe eine Frage zu einem kleinen Projekt, dass zur Datensicherheit dienen soll. Ich würde mir gerne ein kleines Programm schreiben, dass eine einzelne Datei auf Knopfdruck "verschlüsselt" und in ein vorher festgelegtes Verzeichnis verschiebt. Ich habe zwar bereits Themen gefunden, die sich mit Passwörtern und ähnlichem beschäftigen, das ist aber gar nicht nötig. Die...