Wann is Class von TObject abgeleitet (FreeAndNil)

[DenkDirNix]

Zitat:

Wie könnte man denn dann eine Klasse erstellen, die nicht von TObject abgeleitet ist?

Das geht laut Doku mit dem Schlüsselwort "object", siehe unter "Object Types" in

http://docwiki.embarcadero.com/RADSt...jects_(Delphi)

[dummzeuch]

Zitat von DenkDirNix:

Zitat:

Wie könnte man denn dann eine Klasse erstellen, die nicht von TObject abgeleitet ist?

Das geht laut Doku mit dem Schlüsselwort "object", siehe unter "Object Types" in

http://docwiki.embarcadero.com/RADSt...jects_(Delphi)

Wow, die guten alten Turbo-Pascal Objekte sind inzwischen offiziell dokumentiert? Ich dachte, die hätten schon seit 20 Jahren den Status "der Compiler unterstützt sie noch, aber wenn Du ein Problem hast, hast Du halt Pech gehabt". Manchmal wären die echt noch praktisch, aber ich traue mich nicht, sie einzusetzen.

[norwegen60]

Alles klar und vielen Dank.
Meine Fragen sind ausreichend beantwortet.

[DeddyH]

Die haben bei mir den Weg von GoTo und With genommen, d.h. in meinem Wortschatz existieren sie nicht

[norwegen60]

GoTo ist klar. Aber was spricht gegen With?
Ausser dass man dann im Code nicht gleich sieht, wo das Property/Object her kommt.
Gibt es noch andere Gründe?

PS: Mein Problem ist auch gefunden. Er ist nie in die FreeAndNil-Zeile gekommen

[Jasocul]

Zitat von norwegen60:

Aber was spricht gegen With?

1. Versuche mal, solche Stellen zu debuggen.
2. Manchmal soll es auch vorkommen, dass der Compiler da was verwechselt.

Da ich with aus dem ersten Grunde schon nicht verwende, habe ich keine praktischen Erfahrungen mit dem zweiten Phänomen.

[Uwe Raabe]

Zitat von Jasocul:

2. Manchmal soll es auch vorkommen, dass der Compiler da was verwechselt.

Das wird dann wohl eher der Entwickler sein.

[himitsu]

Zitat von Jasocul:

2. Manchmal soll es auch vorkommen, dass der Compiler da was verwechselt.

Jo, der Entwickler, bzw. das arme Schwein, was später das mal lesen soll.

Zitat von Jasocul:

Zitat von norwegen60:

Aber was spricht gegen With?

1. Versuche mal, solche Stellen zu debuggen.

Erstmal das und dann das beste Beispiel

Delphi-Quellcode:

var R: TRect;

with R do
  {Self.}Width := {R.}Right - {R.}Left;  // was der Entwickler sich dachte und wie es früher war
  
{with R do}
  R.Width := R.Right - R.Left;  // Was Delphi jetzt macht, seitem TRect mit einem Helper verbessert wurde
  
{Self.}Width := R.Width;  // und was man jetzt auch machen kann

[dummzeuch]

Zitat von DeddyH:

Die haben bei mir den Weg von GoTo und With genommen, d.h. in meinem Wortschatz existieren sie nicht

With ist böse, klar, aber was spricht gegen Goto?

SCNR

[himitsu]

Nichts?
IF ist ein oder zwei versteckte GOTO, CASE ist mehrere GOTO, WHILE und REPEAT sind GOTO, ... (bzw. alle sind JUMPs)

Und WITH ist auch nur eine unsichtbare temporäre Variable, der man leider nicht ansieht, wo die nun alles dranhängt.