Hi
Thank you so much for your code
Did You examine that yourself?
when i want to use that it return this error : Type Mismatch
at this line

lvRet = ThisForm.oform.kdphone1.GetLineCaps(ThisForm.combo1.ListIndex, @lvLineCaps) && Geting LineCaps