Re: Hyperlink

Author

Message

Sergey Tkachenko

Posted: 02/11/2004 21:46:06

Sorry, I missed this question.

You can do it by processing OnRVMouseUp. In this event use GetItemAt to find

the clicked item. If this is a hyperlink, execute it.

If you include the attached unit to the project, text hyperlinks will always

show hypertext cursor.

> hi,

> May I know where to set the property to let single click for hyperlink

> without pressing ctrl button?

> best regards,

> Chen Yap

begin 666 ForceHyperText.pas

M=6YI="!&;W)C94AY<&5R5&5X=#L-"@T*:6YT97)F86-E#0IU<V5S($-L87-S

M97,L(%)64W1Y;&4L4E9)=&5M+"!#4E9&1&%T82P@1F]R;7,L(%)I8VA6:65W

M.PT*#0IT>7!E#0H@(%125E1E>'1)=&5M26YF;T5X(#T@8VQA<W,@*%125E1E

M>'1)=&5M26YF;RD-"B @("!P<FEV871E#0H@(" @<'5B;&EC#0H@(" @("!F

M=6YC=&EO;B!-;W5S94UO=F4H4VAI9G0Z(%13:&EF=%-T871E.R!8+%DL($ET

M96U.;SH@26YT96=E<CL@4E9$871A.B!43V)J96-T*3I";V]L96%N.R!O=F5R

M<FED93L-"B @96YD.PT*#0II;7!L96UE;G1A=&EO;@T*#0IU<V5S($=R87!H

M:6-S.PT*#0I[(%125E1E>'1)=&5M26YF;T5X('T-"@T*+R\@<F5T=7)N('9A

M;'5E.B!C=7)S;W(@:7,@8VAA;F=E9 T*9G5N8W1I;VX@5%)65&5X=$ET96U)

M;F9O17@N36]U<V5-;W9E*%-H:69T.B!44VAI9G13=&%T93L@6"P@62P-"B @

M271E;4YO.B!);G1E9V5R.R!25D1A=&$Z(%1/8FIE8W0I.B!";V]L96%N.PT*

M=F%R(%)64W1Y;&4Z(%125E-T>6QE.PT*8F5G:6X-"B @4E93='EL92 Z/2!4

M0W5S=&]M4E9&;W)M871T961$871A*%)61&%T82DN1V5T4E93='EL93L-"B @

M4F5S=6QT(#H]($=E=$)O;VQ686QU945X*')V8G!*=6UP+"!25E-T>6QE*3L-

M"B @:68@4F5S=6QT('1H96X-"B @("!40W5S=&]M4E9&;W)M871T961$871A

M*%)61&%T82DN4V5T0W5R<V]R*$=E=$AY<&5R=&5X=$-U<G-O<BA25E-T>6QE

M*2D[#0IE;F0[#0H-"FEN:71I86QI>F%T:6]N#0H@(%)I8VA6:65W5&5X=$ET

G96U#;&%S<R Z/2!44E9497AT271E;4EN9F]%>#L-"@T*96YD+@T*

end