Leeren sämtlicher Editfelder mit einer Schleife???

[danielA]

Hallo Hansa,

1. jupp, ist sicher mußte vor jahren schonmal in so einer Schleife auf Parent prüfen, da nur Komponenten die auf einem bestimmten Tabsheet lagen geändert werden durften.

2. Ja den "Monster Thread" konnte man nicht übersehen, fand ich Gut.

Darauf bin ich noch gar nicht gekommen sollte aber Funktionieren.
Aber aufpassen:

Delphi-Quellcode:

var MyEdi : TMyEdit;
    Edit : TEdit;

...
if Edi is TEdit  // True
if Edi is TMyEdit  // False
if MyEdi is TMyEdit  // Klar True
if MyEdi is TEdit  // auch True da TEdit Vorfahrklasse

Gruß danielA

[Hansa]

Zitat:

Zitat von danielA

if MyEdi is TEdit // auch True da TEdit Vorfahrklasse

Einen Sonderfall muß man auch als solchen behandeln. Das ist wohl klar. Aber das geht wirklich so. Tja, OOP muß man verstanden haben, dann geht vieles einfacher. Deshalb auch dieser "Monster-Thread". :bounce2: Leider befassen sich nur wenige damit.

[danielA]

Zitat:

Leider befassen sich nur wenige damit.

Davon kann ich leider auch ein Lied singen.

Gruß danielA