Komponenteneigenschaften herausfinden mit Handle

[Alex_ITA01]

Hallo erstmal,
ich habe folgende Situtation: (Ich programmiere an einer Komponente herum)
Ich befinde mich irgendwo mit der Maus auf meinem Formular...
Ich habe die Mauskoordinaten und kann mir auch ein Handle von dem Control unter der Maus geben lassen (ClassName erhalte ich dadurch auch)...
Kann ich jetzt irgendwie überprüfen, ob diese Komponente die Eigenschaft ShowHint und Enabled besitzt?
Ich muss nur wissen, ob es die Eigenschaft für das unter der Maus liegende Control gibt...
Geht das irgendwie???
Ich hoffe ihr könnt mir helfen.
MFG Alex

[SirThornberry]

Enabled gibt es auf jeden Fall, den Jedes Control das ein Handle hat ist ein Fenster unter Windows und kann somit disabled werden (also enabled auf false per Windowmessage)

[Stevie]

Hi Alex_ITA01,

das ist nicht schwer:

Delphi-Quellcode:

uses
  TypInfo;

{...}
  if IsPublishedProp(FindControl(Handle), 'Enabled') then
    {...}

MfG
Stevie

[Alex_ITA01]

danke steve.
das ist schonmal richtig gut für mich.
kann ich jetzt noch irgendwie die eigenschaft lesen?
Also wenn die Maus unter einem Control mit der Eigenschaft ShowHint ist UND ShowHint auch auf True ist dann...

MFG Alex

[Alex_ITA01]

Habs schon hinbekommen:

Delphi-Quellcode:

if FindControl(Handle).Enabled = False then
//...

Danke nochmals

MFG Alex

[Stevie]

Das geht aber auch nur, weil die Eigenschaften in TControl implementiert sind.

Ansonsten könntest du das mit den Methoden GetOrdProp machen:

Delphi-Quellcode:

if Boolean(GetOrdProp(Control, 'Enabled')) then {...}

Um herauszufinden, ob's überhaupt vom Typ Boolean ist, kannst folgendes machen:

Delphi-Quellcode:

if PropIsType(Control, 'Enabled', tkEnumeration) then {...}

MfG
Stevie

[Alex_ITA01]

sorry Stevie :-)

danke für die weiteren Tips. Habe mein Problem damit erfolgreich gelöst

:bounce2:

MFG Alex

[Stevie]

Zitat:

Zitat von Alex_ITA01

sorry Stevie :-)

Oh, er hat sogar meinen subtilen Hinweis bemerkt... :zwinker:

[Alex_ITA01]

ja hab ich gemerkt :-)
vorhin war aber wirklich ein Steve online (hab mich da irgendwie verguckt, ist ja auch schon spät) :-)

MFG Alex

[Steve]

Zitat:

Zitat von Alex_ITA01

vorhin war aber wirklich ein Steve online

:hi:



sorry für ot