Forum: Programmieren allgemein
Delphi
by EdAdvokat,
5. Mai 2019
Stahli, Danke mit Deinem Beitrag #24 hast Du den konkreten Nachweis erbracht dass der Storch wirklich fliegt (showMessage('flieg').
Entschuldigung, es tut mir leid, euch genervt zu haben, doch manchmal hat man einen Klemmer.
Forum: Programmieren allgemein
Delphi
by EdAdvokat,
5. Mai 2019
type
TVogel = class(TInterfacedObject, IFlieg)
private
public
procedure Flieg;
end;
TStorch = class(TVogel)
private
Forum: Programmieren allgemein
Delphi
by EdAdvokat,
5. Mai 2019
So ist auch mein Verständnis, jedoch die Tatsache, dass weder TAdler noch TStorch die der von IFlieg verlangten procedure Flieg haben, irritiert mich.Zusammengefasst: Warum läßt sich TAdler und TStorch ohne die procedure flieg erstellen? Wenn ich bei TVogel die procedure flieg auskommentiere, meckert der Compiler zu recht. Bei den abgeleiteten und mit allen Merkmalen der Vorfahren ausgestatteten...
Forum: Programmieren allgemein
Delphi
by EdAdvokat,
5. Mai 2019
Ich komme nochmals auf das Projekt von Stahli zurück.
TVogel hat das Interface IFlieg und die diesem eigene procedure Flieg.
TStorch wurde von TVogel abgeleitet. Also sollte doch auch TStorch, ebenso wie TAdler auch die das Interface IFlieg
besitzen, doch weder TStorch noch TAdler haben die von IFlieg verlangte procedure Flieg.
Bisher bin ich davon ausgegangen, dass die abgeleiteten Klassen...
Forum: Programmieren allgemein
Delphi
by EdAdvokat,
4. Mai 2019
Hinweise 1-3 aus #11 habe ich abgeändert.
Den letzten Stabstrich verstehe ich nicht:
var
lSchwimm: ISchwimm;
…
if Supports(I, ISchwimm, lSchwimm) then
lSchwimm.Schwimm;
Forum: Programmieren allgemein
Delphi
by EdAdvokat,
4. Mai 2019
Hallo zusammen,
nun habe ich mit meiner Drohung ernst gemacht und biete eine neue "Lösung" der Problematik (!) Interface an.
Um nicht auch eines Plagiats verdächtig zu sein verweise ich auf eine 3-teilige Videoaufzeichnung von StahliSoft in seinem Youtubekanal zu diesem Thema.
Ich habe diese Videos aufmerksam verfolgt und mit dem beiliegenden Projekt nachempfunden. Ich danke dem Euch sicher...
Forum: Programmieren allgemein
Delphi
by EdAdvokat,
3. Mai 2019
Danke
zum ersten Punkt: Das habe ich bereits selbst erkannt und verändert. Wenn FSeiteA und FSeiteB im Basisobject deklariert sind, müssen sie nicht nochmals im abgeleiteten Objekt aufgeführt werden.
Punkt 2 habe ich noch nicht so richtig verstanden. Sicher gibt es keine allgemeingültige Formel für Umfang und Flächeninhalt versch. Figuren.
Diese habe ich jedoch dann in den jeweiligen Klassen...
Forum: Programmieren allgemein
Delphi
by EdAdvokat,
3. Mai 2019
ich will meine Frage erweitern: Wenn ich also ein Basisobjekt
type
TFigure = class(TInterfacedObject, IFigur)
FSeiteA : Double;
FSeiteB : Double;
function Umfang: Double;
function Flaecheninhalt: Double;
end;
Forum: Programmieren allgemein
Delphi
by EdAdvokat,
3. Mai 2019
Hallo zusammen,
ich habe mich etwas mit dem Thema Interface beschäftigt und daraus entstand ein kleines Übungsbeispiel, um zu überprüfen ob ich das Thema
Interface im Ansatz verstanden habe.
Bitte schaut doch mal darüber. Für Hinweise und Korrekturen bin ich dankbar. Sollte es ok sein, wäre meine Freude fast grenzenlos.
Ich will die Sache aber später noch weiterführen.
Danke