કૅપ્શન: = IntToStr (ક્લિક્સ); ક્લિક્સ: = ક્લિક્સ + 1; અંત ; હવે આપણે ક્લિક્સ કાઉન્ટર માટે અનિનિલેટેડ વેરીએબલ વાપરી રહ્યા છીએ.