!!!Listing17


// choosing the right list entry for timezone
		LstSetSelection( FrmGetObjectPtr( formP,
			FrmGetObjectIndex( formP, ListTIME) ), PrefRec.TimeShift );
// because not the whole list is displayed list has to be moved
// so that the selected entry is visible
		LstMakeItemVisible( FrmGetObjectPtr( formP,
			FrmGetObjectIndex( formP, ListTIME) ), PrefRec.TimeShift );
// popup trigger control has to be set manually according to
// the list selection (can be treated like a button)
		CtlSetLabel( FrmGetObjectPtr( formP,
			FrmGetObjectIndex( formP, PopTrigTIME) ),
			LstGetSelectionText( FrmGetObjectPtr( formP,
			FrmGetObjectIndex( formP, ListTIME) ), PrefRec.TimeShift ) );
