Einzelnen Beitrag anzeigen

Benutzerbild von Lannes
Lannes

Registriert seit: 30. Jan 2005
Ort: Münster
745 Beiträge
 
Delphi 3 Professional
 
#2

Re: Überprüfen ob Text auf Form selektiert ist

  Alt 6. Feb 2006, 13:04
Hallo,

ActiveControl hilft da weiter, etwa so:
Delphi-Quellcode:
If (ActiveControl.InheritsFrom(TCustomEdit)) and
   (TCustomEdit(ActiveControl).SelLength > 0) then
   //alles ok
damit erreichst Du alle Edits, Memos, Richedits ...
MfG Lannes
(Nichts ist nicht Nichts) and ('' <> nil ) and (Pointer('') = nil ) and (@('') <> nil )
  Mit Zitat antworten Zitat