есть у меня такая функция в главном модуле

Public Function ClearFilter(fr As String)
Dim col As TrueOleDBGrid80.Column
For Each col In TDBGrid1.Columns
col.FilterText = ""
Next col
End Function

fr - имя передаваемой формы

но она не работает до тех пор, пока вместо этого:
TDBGrid1.Columns
не напишешь вот это:
frm_tel.TDBGrid1.Columns
т.е. надо перед этим указать имя формы.

передаю имя формы так:
ClearFilter(form.name) - тут всё ок, она переходит в функцию.
вопрос, как передать имя формы правильно в функцию?
пыталась так:
fr.TDBGrid1.Columns - не работает
" & fr. & " & TDBGrid1.Columns - тоже на работает. Помогите!!!

А как сам параметр передавать?

эта строка уже не катит

ClearFilter(form.name)

Спасибо огромное, всё работает.