>>>Is there a way to change the code in all textbox gotfocus & lostfocus to this.backcolor= etc without going into each one and adding the code?
>>
>>In design mode? If so yes. Get references with aselobj() and use readmethod(),writemethod().
>>Cetin
>Yes this way would be great! Can you give me an example?

A quick one as its name suggests:)

* QuickAndDirtyBuilder.prg
local ix, lcMethodCode, lcMethodName
local array aObj[1]

lcMethodName = 'LostFocus'

text to m.lcMethodCode noshow
*Write your method code here
endtext
aselobj(aObj)
for m.ix=1 to alen(aObj)
  if lower(aObj[m.ix].baseclass == 'textbox'
    aObj[m.ix].WriteMethod(m.lcMethodName, m.lcMethodCode)
  endif
endfor

During design you might select the textboxes you want, go to command prompt:
modi comm QuickAndDirtyBuilder

Edit the code to your taste, select all, rightclick and 'Execute selection'.
Cetin