AGB  ·  Datenschutz  ·  Impressum  







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

DEC 6.1 generelle Fragen

Ein Thema von DieDolly · begonnen am 15. Feb 2021 · letzter Beitrag vom 23. Feb 2021
Antwort Antwort
TurboMagic

Registriert seit: 28. Feb 2016
Ort: Nordost Baden-Württemberg
3.023 Beiträge
 
Delphi 12 Athens
 
#1

AW: DEC 6.1 generelle Fragen

  Alt 15. Feb 2021, 19:17
Ich glaube dass das geht, bin aber gerade nicht am PC.
Stichwort wäre Metaklasse als Parameter...
Dann kannst du Instanzen beider Klassen übergeben.
Evtl. mal den Klassenregistrierungsmechanismus anschauen,
der könnte in die Richtung gehen...
  Mit Zitat antworten Zitat
DieDolly

Registriert seit: 22. Jun 2018
2.175 Beiträge
 
#2

AW: DEC 6.1 generelle Fragen

  Alt 15. Feb 2021, 19:22
Bin schon überfordert, sorry.
  Mit Zitat antworten Zitat
Aviator

Registriert seit: 3. Jun 2010
1.611 Beiträge
 
Delphi 10.3 Rio
 
#3

AW: DEC 6.1 generelle Fragen

  Alt 15. Feb 2021, 22:49
Das was du meinst/suchst nennt sich Polymorphie. Vielleicht kannst du mit dem Begriff etwas anfangen bzw. dir zusätzliche Infos anlesen und zusammensuchen. Wichtig wäre hier, dass du eine gemeinsame Basisklasse von allen Ver-/Ent-/Hashing-Verfahren findest, die noch alle Methoden die du benötigst zur Verfügung stellst. Gibt es die nicht, musst du auf zwei Methoden ausweichen die du dann als overload deklarieren könntest.
  Mit Zitat antworten Zitat
DieDolly

Registriert seit: 22. Jun 2018
2.175 Beiträge
 
#4

AW: DEC 6.1 generelle Fragen

  Alt 15. Feb 2021, 23:27
Zitat:
Wichtig wäre hier, dass du eine gemeinsame Basisklasse von allen Ver-/Ent-/Hashing-Verfahren findest, die noch alle Methoden die du benötigst zur Verfügung stellst.
Das habe ich versucht. Ich dachte wenn ich bis runter auf TDECHash gehe, ist das die gemeinsame Basisklasse aber das erzeugt eine AV beim Ausführen.
  Mit Zitat antworten Zitat
Aviator

Registriert seit: 3. Jun 2010
1.611 Beiträge
 
Delphi 10.3 Rio
 
#5

AW: DEC 6.1 generelle Fragen

  Alt 15. Feb 2021, 23:42
Ich habe jetzt nur mal schnell in GitHub direkt in den Sourcen geschaut. Versuch mal die THashBaseMD4 Klasse. Die sieht mir eigentlich nach der passenden Basisklasse aus. Mit TDECHash bist du ja schon fast ganz oben angekommen.
  Mit Zitat antworten Zitat
DieDolly

Registriert seit: 22. Jun 2018
2.175 Beiträge
 
#6

AW: DEC 6.1 generelle Fragen

  Alt 15. Feb 2021, 23:47
Gerade auch schon versucht.
Delphi-Quellcode:
function X(Hash: THashBaseMD4): string;
begin
...
 Result := Hash.CalcString('123');
...
end;

showmessage(X(THash_MD5));
Zitat:
E2010 Inkompatible Typen: 'THashBaseMD4' und 'class of THash_MD5'
Ansonsten lege ich mir einfach ein type THashMethods = (MD5, SHA256);, übergebe als parameter THashMethods.XYZ und gucke dann in in der Funktion mittels case was übergeben wurde.
Eine sehr schlechte Umsetzung wäre das aber.

Geändert von DieDolly (15. Feb 2021 um 23:51 Uhr)
  Mit Zitat antworten Zitat
Aviator

Registriert seit: 3. Jun 2010
1.611 Beiträge
 
Delphi 10.3 Rio
 
#7

AW: DEC 6.1 generelle Fragen

  Alt 16. Feb 2021, 00:08
Naja du musst schon eine Instanz und nicht die Klasse übergeben. Ich habe mal schnell ein Testprojekt zusammen geknüppelt. Kompiliert zumindest einwandfrei. Auch zur Laufzeit kommen bei mir keinerlei Fehler.

Delphi-Quellcode:
program Project1;

{$APPTYPE CONSOLE}

{$R *.res}

uses
  System.SysUtils, DECHash;

type
  THashTest = class
  private

  public
    function HashData(HashClass: THashBaseMD4): string;
  end;


{ THashTest }

function THashTest.HashData(HashClass: THashBaseMD4): string;
begin
  Result := HashClass.CalcString('');
end;

var
  sha256: THash_SHA256;
  md5: THash_MD5;
  hashTest: THashTest;

begin
  try
    sha256 := THash_SHA256.Create;
    md5 := THash_MD5.Create;
    hashTest := THashTest.Create;
    Writeln(hashTest.HashData(sha256));
    Writeln(hashTest.HashData(md5));
    Readln;
  except
    on E: Exception do
      Writeln(E.ClassName, ': ', E.Message);
  end;
end.
  Mit Zitat antworten Zitat
Antwort Antwort


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 11:07 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 by Thomas Breitkreuz