Forum: Algorithmen, Datenstrukturen und Klassendesign
by himitsu,
21. Feb 2015
Man kann natürlich aus einer Mücke einen Elefanten machen.
Statt var s: string; nimmt man ein TRichEdit,
bzw. statt einer TStringList nimmt man ein TMemo
und statt TPersistent eine ganze Form, (wenn schon, dann maximal ein TDataModul)
statt TBitmap/TPicture nimmst du ein TImage,
statt mit dem Smart machst du deinen Freitagseinkauf mit einem 80-Tonner
usw.
Forum: Algorithmen, Datenstrukturen und Klassendesign
by himitsu,
21. Feb 2015
Ich brauch nur eine String-Variable und nehm dafür ein TRichEdit? :wall:
Es wurde doch genau gesagt, was man braucht.
> Published und/oder {$M+} (also TPersistent/TComponent)
Forum: Algorithmen, Datenstrukturen und Klassendesign
by himitsu,
20. Feb 2015
procedure TForm1.Hello_World(Sender: TObject);
TExecute = procedure of object;
Und schon hat jemand Mist gebaut, denn die Signaturen stimmen nicht überein.
Zum Glück liegt dieser Parameter zufällig in den Registern und nicht auf'm Stack,
so steht da nur Schrott drin und es knallt nicht gleich.
Forum: Algorithmen, Datenstrukturen und Klassendesign
by himitsu,
20. Feb 2015
Nein und vielleicht auch ja.
Der Standard ist "public", außer die Klasse oder ein Vorfahre ist mit {$M+} compiliert, wie z.B. TPersistent/TComponent, wo es dann "published" wird.