[pattyka]

mira si mas o menos :S:S le entiendo pero no se me marca un error talvez este equivoca ... procedure Tform1.Seleccionar(R: TRect); el error k me dice es: Undeclared identifier: 'Seleccionar'... y no se k onda:S:s