Forum: Object-Pascal / Delphi-Language
Delphi
by Der schöne Günther,
13. Aug 2013
Interfaces in Delphi habe ich mir immer noch nicht angeschaut, aber ich meine Vorgaben vom zu implementierenden Interface auf Methoden von aggregierten Objekten delegieren.
Ich versuchs. Später rächt sich das immer :oops:
Forum: Object-Pascal / Delphi-Language
Delphi
by Der schöne Günther,
13. Aug 2013
Tippen an sich sollte man noch jedem zutrauen können :-D
Es sollte ja nicht darum gehen, weniger Tasten drücken zu müssen, sondern das ganze leichter wartbar zu machen und die Gelegenheit hier etwas falsch oder uneinheitlich zu machen zu entfernen. Wenn ich mittels Interface oder Oberklasse die Signatur schon vorgebe (wie z.B. bei Sir Rufo) erreiche ich das ja. Nur meiner Meinung nach für so...
Forum: Object-Pascal / Delphi-Language
Delphi
by Der schöne Günther,
13. Aug 2013
Nichts großartiges - Es ging um das Empfangen von Netzwerkpaketen und Erstellen einer Antwort. Je nachdem was für eine Information im ankommenden Paket enthalten ist, werden vollkommen unterschiedliche Dinge getan.
if ankommendesPaket.commandStr = 'zooBesuch' then
TPaketbehandler.zooBesuchProc(ankommendesPaket, ausgehendesPaket, weitereParams)
else if ankommendesPaket.commandStr =...
Forum: Object-Pascal / Delphi-Language
Delphi
by Der schöne Günther,
13. Aug 2013
Ja die Eventhandler wie TNotifyEvent sind mir auch als erstes eingefallen - Und gerade dort sehe ich so etwas nicht: Einmal gibt der TNotifyEvent-Typ die Parameterliste vor, dann beinhaltet die Deklaration jeder "onClick"-Methode wieder (redundant?) die Parameterliste in Form von "Sender: TObject".
Forum: Object-Pascal / Delphi-Language
Delphi
by Der schöne Günther,
13. Aug 2013
Ein weiterer absolut nichtssagender Titel. Bessere Vorschläge erbeten. Tags habe ich auch keine...
Nehmen wir an, ich bin im Begriff einen Batzen an Prozeduren zu deklarieren welche alle die gleiche Parameterliste haben. Anstatt nun jedes mal hinzugehen und zu sagen
type TMeineKlasse = class
procedure proc1(input1: Integer; input2: TSomeClass; out output: Double);
procedure...
