Hi Gérald;
>
>CTRL+A your code
>CTRL+C to clipboard
>Run the following code
>CTRL+P back in place
>
>

>*not tested!
>nlines=ALINES(lCodeArray,_CLIPTEXT)
>_CLIPTEXT=""
>FOR i = 2 to nLines  && start with 2 to avoid trouble with lCodeArray[i-1]
>	IF lCodeArray[i]="DEFINE" AND !lCodeArray[i]="DEFINE CLASS"
>		*take the same number of tabs - chr(9) - of the prev line
>		nTabs=OCCURS(CHR(9),lCodeArray[i-1])
>		IF nTabs > 0
>			lCodeArray[i]=REPLICATE(CHR(9),nTabs)+lCodeArray[i]
>		ENDIF
>	ENDIF
>	_CLIPTEXT=_CLIPTEXT+lCodeArray[i]+ CHR(13)
>ENDFOR
>

>

Wise boy, clever idea.. But, didn't worked ! :))

It seems that nothing have been changed on the _CLIPTEXT !! Maybe, beacause I've been using spaces instead of tabs !

Claudio