I've attached some bitmaps that show how I did it.

Gary


>>>>I've used it several apps. So far I've never had a problem with it - works great and no user complaints either. For me at least - it was well worth the $.
>>>>
>>>>>Can anyone point me to a good "How-to" resource for using DBi ctSchedule Active-X control?
>>>
>>>Do you remember how to add visual checkbox mark to the first column? Based on the Help I tried
>>>
>>>

>>>    loCt.ColumnCheckBox(m.lnIndexId ) = 2
>>>       loCt.CellCheck(m.lnIndexId, 1) = 1 && Checked

>>>
>>>but I don't see any difference in appearance and check box does not appear.
>>
>>Works for me, but only if lnIndexID = 1
>>
>>Gary
>
>What exactly do you mean and can you show some code, please?
>
>I've tried so far the following:
>
>

>*  loCT.ColumnCheckAlign( 0 ) = 1 && Right-aligned
>  
>  scan for inactive=.F.
>  	if empty(.cCurrentInstr)  && was this cleared on the filter/sort tab?  If so, select the first
>  		.cCurrentInstr  = instr_id
>  	endif
>    lcInstructorID = ALLTRIM(instr_id)
>
>    .aInstrList[alen(.aInstrList)] = m.lcInstructorId
>    dimension .aInstrList[alen(.aInstrList)+1]
>
>    lnIndexID = loCT.additem(proper(alltrim(first_name)) + ' ' + proper(alltrim(last_name))) 
>    IF TYPE(m.lcInstrAlias + '.CheckedIn') = 'L' AND CheckedIn
> *      loCt.ColumnCheckBox(m.lnIndexId ) = 2
> *      loCt.CellCheck(m.lnIndexId, 0) = 1 && Checked
>       loCT.CellPicture(m.lnIndexId,1) = 1
>    ENDIF

>
>The commented code didn't work for me - I saw no change in appearance. I tried using non-commented code and even without if / endif (so it was supposed to add a picture to every cell) and still saw no change in appearance.