Отправлено: 25.07.07 22:30. Заголовок: Подскажите чем заменить функцию SETRC() из CT

Народ, скажите плиз чем можно заменить SETRC() в хХарборе.
По доке хХарбора нашел только SetPrc().


SETRC()
Задает номера строки и столбца позиции курсора.
──────────────────────────────────────────────────────────────────────────────

Синтаксис

SETRC([<nRow>], [<nColumn>]) -->

Параметры

<nRow> - необязательный числовой параметр, задающий номер строки
курсора. По умолчанию строка, установленная в BIOS.

<nColumn> - необязательный числовой параметр, задающий номер столбца
курсора. По умолчанию столбец, установленный в BIOS.

Возвращаемое значение

cNull - всегда пустая строка.

Описание

Функция устанавливает внутренние значения, возвращаемые Clipper-
функциями ROW() - строки и COL() - столбца. Одновременно курсор
автоматически перемещается на новую позицию.
Внутренние значения для функций ROW() и COL() могут отличаться от
действительных, зафиксированных в BIOS, тогда, когда вывод
осуществляется не через Clipper. Если функция SETRC() вызвана без
параметров, то позиция, записанная в BIOS, будет установлена и для
Clipper.

Примечания
При задании отрицательных или превышающих максимально допустимые
значения номеров строк или столбцов функцией производится их
автоматическая коррекция.

 Отправлено: 26.07.07 07:41. Заголовок: Re:

Попробуй функцию SetPos(). Делает то же самое, но только не используется без параметров.

 Отправлено: 26.07.07 12:31. Заголовок: Re:

эта функция имела смысл для среды дос, когда все программы разделяли один экран, и одна из них могла поменять позицию курсора

Для харбора она смысла не имеет, но для совместимости можно написать

func SetRC(nRow, nCol)
if nRow == nil
nRow := Row()
endif
if nCol == nil
nCol := Col()
endif
SetPos(nRow, nCol)
retu ""

 Отправлено: 26.07.07 23:00. Заголовок: Re:

Спасибо Паша !!!!!
Наверно с тобой и не расчитаешься за твою скорую помощь....