Привет всем участникам форума!
Не могу справиться с двумя задачами:
1. Требуется создавать файлы .dbf, используя в качестве имени, к примеру, значение определённого поля или переменной. Как это можно сделать?
Например, в переменной содержится определённая дата (10-02-2005), и надо, чтобы образовался файл с таким же именем именем (10-02-2005.dbf).
Думаю, что такая или похожая задача уже обсуждалась. Если так - то просто киньте ссылку на топик. Или подскаэите ответ.

2. Как сделать поиск таким образом, чтобы при вводе символов курсор сразу становился на нужную строку. То есть, имеется список фамилий. С целью быстро перейти на нужную фамилию, набираем подряд её буквы. По мере набора курсор устанавливается на подходящую.

Заранее благодарен всем, кто сможет помочь.
Надеюсь влиться в общий коллектив

Опишу пример решения 2-й проблемы:
Вариантов масса, ну вот один из них, при наборе фрагмента фамилии в справочнике пациентов с каждым новым вводимым символом строится новый sql-запрос и выводимый список фамилий сужается - можно посмотреть весь дистрибутив, но он достаточно большой под 8Mb, а вот скриншот, как это выглядит на деле:
www.adenta.ru - так таблица выглядит приблизительно до начала поиска, контекстное меню здесь ни при чем.
www.adenta.ru- так выглядит после набора контекста

Эту мулю можно вшить в класс, и тогда такой поиск легко реализовать для любого справочника.



Отредактировано (10.02.05 18:38)

1) имя файла из даты:

CHRTRAN(DTOC(DATE()),".","-")+".dbf"

2) Такой поиск называется инкементальным

forum.foxclub.ru

Сообщи E-mail на ''.phorum_html_encode('ak113@rambler.ru').''
Пришлю программу

По первому вопросу - см. синтаксис команды CREATE TABLE. Пример:

d = date()
c = CHRTRAN( DTOC( m.d ),".","-")+".dbf"

create table free &c ( Fld1 C(10), Fld2 I, Fld3 D )
или вообще сформировать цедуюкоманду:

c = [create table free ] +c + [ ( Fld1 C(10), Fld2 I, Fld3 D )]
&c

Кстати, имя файла в виде 15-02-2005.dbf или 15_02_2005.dbf т.е. ДДММГГГГ.DBF неудобно для сортировки и просмотра, поэтому я лично делаю так:

matod
c = [create table free ] +c + [ ( Fld1 C(10), Fld2 I, Fld3 D )]

Данная строка может (но это не значит, что оны будет очень длинной) выйти за допустимый размер (>254), тогда будет выдано сообщение об ошибке.
Когда очень много полей, я делаю так, формирую массив, аналогичный AFIELDS(<array>,<alias>), заполняю его значениями, а затем:

Если говорить об удобствах, в частности - сортировки, то предпочтительнее использовать функцию DTOS(),
которая всегда возвращает дату в формате YYYYMMDD

dtoc(DATE(),1) и dtos(DATE()) - это одно и тоже.

2 Перминов Игорь

Цитата:

Данная строка может (но это не значит, что оны будет очень длинной) выйти за допустимый размер (>254),

За допустимый предел 254 символа может выйти строковая константа, что всегда можно скорректировать, разбив ее на несколько строк:
c = [create table free ] + m.c + [( p1 C(10), p2 C(10), .....много еще полей ] + [p80 C(10), .... еще поля...]
т.е. то, что стоит в [] действительно не должно выходить за 254, а вот их сумма может быть значительно больше.

Ограничение на длинну выполняемой макроподстановки составляет 8192 символа (по крайней мере VFP6.0), что, как правило вполне достаточно для формирорвания команды создания таблиц (учитывая, что такое же ограничение имеется на максимальный размер одной команды.)

С остальным вполне согласен

При использовании DTOS меньше стука по клавиатуре...