|
Registriert seit: 28. Apr 2008
Ort: Stolberg (Rhl)
6.659 Beiträge
FreePascal / Lazarus
|
AW: Text bei Cursor??? DelphiXE
2. Aug 2011, 10:43
Versuch es doch mal hiermit:
Delphi-Quellcode:
mychktext:=WordObj.Selection.Text;
mychktext:=Trim(mychktext);
if length(mychktext>0 then { es gibt Text}
else { es gibt keinen Text}
Gruß
K-H
Programme gehorchen nicht Deinen Absichten sondern Deinen Anweisungen
R.E.D retired error detector
|