Einzelnen Beitrag anzeigen

Benutzerbild von SirThornberry
SirThornberry
(Moderator)

Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
 
Delphi 2006 Professional
 
#5

AW: Mausklick auf einen geteilten button auslösen.

  Alt 24. Jun 2010, 09:14
Wenn ich mir den Quelltext im ersten Beitrag ansehe glaube ich kaum das er so funktionieren kann. Denn dort wird nach TWinControl gesucht und es ist mir noch NIE untergekommen das jemand direkt ein TWinControl auf seinem Formular platziert.
Grund ist das ein TWinControl eigentlich nichts anderes macht als da zu sein. Deswegen leitet man höchstens davon ab und hat dann eine neue Klasse die ein Nachfahre von TWinControl ist. Aber dieses findet man dann nicht mehr wenn man nach TWinControl sucht.
Das nächste ist folgender Konstruct:
Delphi-Quellcode:
wndChild := FindWindowEx(wndMain, 0, 'TPageControl', nil);
wndChild := FindWindowEx2(wndChild,'TTabSheet', 5);
wndChild := FindWindowEx2(wndChild,'TRxSpinEdit', 6);
wndChild := FindWindowEx(wndChild, 0, 'TWinControl', nil);
Wenn das erste FindWindowEx fehl schlägt (also 0 zurück gibt) macht es keinen Sinn weiter zu suchen. Du würdest dann also 3 mal FindWindowsEx(2) ausführen obwohl bereits klar ist das diese Funktionsaufrufe nichts mehr bringen.
Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
  Mit Zitat antworten Zitat