1 Reply by sts36

(19 replies, posted in Russian)

Добрый день, может кто подсказать как привязать карту (находится на форме 2) к кнопке сохранения что находится на другой форме (форма 1), чтобы компонент Map1 участвовал в сохранении записи на форме 1?

Так понимаю что сообщество затрудняется ответить на данный вопрос ((( Можно ли передать координаты маркера с формы 2 на форму 1 в тот же едит?

Go to forum: Russian

2 Reply by sts36

(5 replies, posted in Russian)

zc13569 wrote:

Тормозит база при работе по сети.

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

Go to forum: Russian

3 Reply by sts36

(4 replies, posted in Russian)

indigen wrote:

Мне кажется в SQL запросе было упущено поле id, вот программа и не знает что вы выбрали в гриде

Точно... Спасибо, запрос большой упустил...

Go to forum: Russian

4 Reply by sts36

(4 replies, posted in Russian)

k245 wrote:

легко реализуется на уровне SQL-запроса с помощью ключевых слов OFFSET и LIMIT

Добрый день, при таком выводе данных не могу открыть форму редактирования. dbItemID у TableGrid всегда -1. Есть идеи как исправить?

 frmMain.TableGrid4.dbSQL:='SELECT DISTINCT ... LIMIT 50 OFFSET '+inttostr(cp*50)+'';
 frmMain.TableGrid4.dbGeneralTable := 'REC';
 frmMain.TableGrid4.dbSQLExecute;

UPD: При любом запросе реализованном таким способом не даёт открыть форму для просмотра/редактирования, пишет "Не выбрана запись для редактирования"...

Go to forum: Russian

5 Reply by sts36

(5 replies, posted in Russian)

Дмитрий Спасибо!!

Go to forum: Russian

6 Reply by sts36

(5 replies, posted in Russian)

Ссылку для скачки отправил на емайл support@drive-software.com

Go to forum: Russian

7 Reply by sts36

(5 replies, posted in Russian)

Доброго всем... Проявился баг - не работают отчёты на других формах кроме главной выдает ошибку в запросе, в 4.12 всё нормально.

Go to forum: Russian

8 Reply by sts36

(8 replies, posted in Russian)

DriveSoft wrote:

попробуйте так

Спасибо..метод работает....чёт ступил...))
Хотя я уже отказался от данного метода фильтрации.. Возникло мнение что приложение будет жутко лагать при большом количестве записей (ИМХО) в моём случае около 10к в год....Сейчас реализовал поиск путём точечных запросов...

Go to forum: Russian

9 Reply by sts36

(8 replies, posted in Russian)

derek wrote:

Здравствуйте
Попробуй это
Derek.

Спасибо за ответ, но наверно Вы меня не поняли...
Есть таблица, в ней в футере есть значение количества строк ... есть комбобокс на котором есть событие ончэнж где скрываются строки которые не подходят критерию поиска. 

frmMain.TableGrid3.BeginUpdate;
  c := frmMain.TableGrid3.RowCount-1;
  for iRow := 0 to c do
    if frmMain.ComboBox21.Text <> 'Toate' then frmMain.TableGrid3.RowVisible[iRow] := LowerCase(frmMain.TableGrid3.Cells[1,iRow]) = LowerCase(frmMain.ComboBox21.Text)
    else frmMain.TableGrid3.RowVisible[iRow] := true;
  frmMain.TableGrid3.EndUpdate;

При фильтрации значение в футере не меняется (остаётся обшее количество). Так вот вопрос в том как сделать вывод количества видимых строк в таблице после события в комбобокс.
PS: Пробовал так

frmMain.TableGrid3.Columns[1].Footer.FormulaKind := fkCount; 
 frmMain.TableGrid3.CalculateFooter;

Выводется общее количество...

Go to forum: Russian

10 Reply by sts36

(8 replies, posted in Russian)

Доброго дня всем, а как вывести в футер таблицы количество видимых строк, после скрытия по фильтру?

Go to forum: Russian

11 Reply by sts36

(12 replies, posted in Russian)

DriveSoft wrote:

в скором времени я сделаю возможность формировать отчет без использования SQL, процесс будет почти такой же, как настройка кнопки Поиск.

Доброго дня, реализована ли данная возможность в текущей версии программы? Если да то подскажите как сделать? sad
Необходимо вывести в отчет содержимое компонента TableGrid которое формируется кнопкой Поиск в (поиске участвуют 10 компонентов), или только так 

WHERE
(case when '{edFirstName}'='' then 1=1 else person.firstname LIKE '%{edFirstName}%' end) AND
(case when '{edLastName}'='' then 1=1 else person.lastname LIKE '%{edLastName}%' end);

Ворпос снят. Разобрался.

You should set up button [REPORT] in the same way like button [SEARCH] after that you will get same result for the report.

Go to forum: Russian