Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by DeddyH,
26. Mär 2015
BTW: http://www.delphipraxis.net/faq.php?faq=dp_05#faq_dp_11
Damit will ich auf keinen Fall dem TE irgendetwas unterstellen, aber entsprechende Härtefälle sind eben klar geregelt.
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by DeddyH,
25. Mär 2015
Wenn Deine beiden Schleifen von 0 bis 14 laufen, dann nenne mir doch mal einen Fall, in dem
h+1>=0
j>=0
j<=14
nicht zutreffen.
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by DeddyH,
25. Mär 2015
Es gibt doch mehrere Möglichkeiten, so etwas umzusetzen: entweder man schreibt etwas "Großes", das sich um die Darstellung sowie die komplette Logik kümmert oder man verwaltet mehrere "kleine" Komponenten, die jede für sich autark mindestens die Darstellung übernehmen. Was nun "besser" oder "schlechter" ist, muss jeder für sich selbst entscheiden.
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by DeddyH,
25. Mär 2015
Und das soll was genau aussagen? "Wenn andere etwas schlecht machen, darf ich das auch" oder "Mein Code war schwer zu schreiben, dann soll er auch schwer zu lesen sein"?
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by DeddyH,
25. Mär 2015
Wenn ich schon Konstanten einführe, dann konsequent. Aber jeder so, wie er meint.
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by DeddyH,
25. Mär 2015
Man kann auch Konstanten definieren, um Magic Values zu vermeiden, das erhöht die Lesbarkeit des Codes.
Nachtrag: http://de.wikipedia.org/wiki/Magische_Zahl_%28Informatik%29
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by DeddyH,
25. Mär 2015
Um "schneller" ging es mir gar nicht. Aber ich mag nicht einsehen, dass ich Werte neu berechnen soll, wenn ich sie vorher bereits verfügbar hatte.
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by DeddyH,
25. Mär 2015
Es geht doch noch einfacher.
procedure TForm1.CreatePanelMatrix(InitialX, InitialY: Integer);
const
PANEL_WIDTH = 30;
PANEL_HEIGHT = 30;
COUNT_X = 15;
COUNT_Y = 15;
BITS_PER_BYTE = 8;
var
X, Y: Integer;
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by DeddyH,
25. Mär 2015
Oder man hinterlegt diese Information im Panel selbst (Ableitung, Tag-Property oder wie auch immer), dann spart man sich die Suche.