inter1292
К сожалению не вижу в отчете задваивания заголовков, можно скрин?

поправил баг, который вы описали в предыдущем сообщении но почему то удалили, пока я его исправлял )

6,853

(6 replies, posted in General)

Pay attention, in the latest version introduced a new protection that will stop the project after a while if you used crack.

6,854

(6 replies, posted in General)

Crack don't work with version 1.52 ? smile

6,855

(2 replies, posted in Russian)

Form1.Edit1.Value := Trunc(Random*99999999);

6,856

(6 replies, posted in General)

sonixax
You have many scripts for coloring TableGrid and its 2500 records.
Try to disable script for check it.



Also try optimized version
added:

Main.TransGrid.BeginUpdate; 
Main.TransGrid.EndUpdate; 

and limited quantity of records for show in TableGrid

     Main.TransGrid.dbLimit := 500;
     Main.KontaktGrid.dbLimit := 500;

6,857

(63 replies, posted in Russian)

kunar80 wrote:
DriveSoft wrote:

1. У меня работает все так, как вы описали, открывается форма frmViewDetails

У меня тоже, ПОКА НЕ ЗАЛОГИНИШЬСЯ!

на 283 строке у вас данный запрет снимается

frmMain.TableGrid1.dbPopupMenu.Items[0].Enabled := True;

6,858

(2 replies, posted in Reports)

tcoton wrote:

Would it be possible to:

- Remove the edition feature from a report preview as when it is saved, all the report is messed up.

place this code on event OnShow of main form:

Form1.frxReport.PreviewOptions.Buttons := pbPrint+pbExport+pbZoom+pbFind+pbOutline+pbPageSetup+pbTools+pbNavigator+pbExportQuick;

all available values for the setting

pbPrint+pbLoad+pbSave+pbExport+pbZoom+pbFind+pbOutline+pbPageSetup+pbTools+pbEdit+pbNavigator+pbExportQuick+pbNoClose+pbNoFullScreen+pbNoEmail

tcoton wrote:

- Change the name of the preview window ?

It's not possible in the current version.

d.v.aleinikov
Поправил ваш проект.

6,860

(63 replies, posted in Russian)

kunar80

исправил немного SQL запрос для кнопки frmMain.ButtonSQL

SELECT
tasks.dateRecording,
tasks.contentTask,
tasks.dateCompletion,
(CASE WHEN ((SELECT Count(*) FROM details WHERE details.id_tasks=tasks.id AND details.status=1) > 0 OR details.status=1) then 'НА КОНТРОЛЕ' else  '' end),
tasks.note,
details.dateCompletion,
details.status
FROM tasks

LEFT OUTER JOIN details ON details.id_tasks = tasks.id

WHERE details.dateCompletion = {DateTimePicker3} AND details.status = 1


1. У меня работает все так, как вы описали, открывается форма frmViewDetails


С остальными вопросами помочь не смогу, я могу помочь вам только с чем то конкретным.

6,861

(1 replies, posted in General)

Checked, not found error, please send me your project to support@drive-software.com

6,862

(7 replies, posted in Russian)

pha1984
Пришлите пожалуйста ваш проект с базой для тестов на support@drive-software.com


также можете с помощью свойства dbLimit ограничить максимальное количество загружаемых записей, ведь вряд ли имеет смысл загружать все записи, например можно ограничиться 500


Form1.TableGrid1.dbLimit := 500;

6,863

(4 replies, posted in General)

Yes, unfortunately there is no easy way to change the icon.

6,864

(7 replies, posted in Russian)

jazzitcool
Возможно у вас есть какие либо скрипты? которые постоянно обращаются к БД?
Пришлите пожалуйста вашу бд для тестов на support@drive-software.com

inter1292 wrote:

форма frmChoice, кнопка Роздрукувати звіт далі форма frmZvit кнопка Сформувати журнал відмов

Готово.

6,866

(4 replies, posted in General)

You can change icon in the file builder.dll using program Resoure Hacker, then run project using MVD for update exe file in your project.

d.v.aleinikov
Можно одну и туже.
Просто блокировать кнопку сохранения записи в нужном случае

Form2.ButtonSave.Enabled := False;

приложите пожалуйста свой проект (zip файл без exe и dll), с описанием, какой TableGrid и форма необходима для вызова.

d.v.aleinikov wrote:

Скрипт для таблицы:
Доброго времени суток!
Подскажите пожалуйста скрипт для таблицы (TableGrid) - необходимо, чтобы при двойном щелчке на записи в таблице (например, отображенной в таблице по результатам поиска) запускалась определенная форма, а не та которая задается по умолчанию при назначении действия "редактирование" для кнопки.

так вы можете отключить действие по двойному клику.

procedure Form1_OnShow (Sender: string; Action: string);
begin
    Form1.TableGrid1.dbPopupMenu.Items.Items[0].Enabled := False; 
end;

а так открыть другую форму при двойном клике

procedure Form1_TableGrid1_OnCellDoubleClick (Sender: string; ACol, ARow: Integer);
begin
    Form2.Show;
end;

d.v.aleinikov
здесь можете посмотреть последовательность создания отчета в картинках.
http://myvisualdatabase.com/forum/viewtopic.php?id=4

6,870

(6 replies, posted in General)

tcoton
It has no relation to this issue.
This is true when importing data.

jenek wrote:

отлично ))) все работает! респект!

сорри. работает на примере просто великолепно...
очень просить не охота. но, похоже, без вашей помощи - никак.
перенес скрипт в свою базу и вылезла ошибка. на кнопку не реагирует. не поправите?
заранее спасибо.
MVD версия 1_46

Исправил.

inter1292
Пожалуйста, дайте знать, на какой форме и какая кнопку запускает данный отчет.

kunar80

1.

t := SQLExecute('SELECT group_concat(person, char(13)) FROM abonents WHERE strftime(''%d.%m'', birthday)=strftime(''%d.%m'', ''now'', ''+1 day'')');

2.

SELECT person.name FROM abonents WHERE strftime('%d.%m', birthday)=strftime('%d.%m', {DateTimePicker})

6,874

(63 replies, posted in Russian)

Приложите пожалуйста ваш проект, так будет проще помочь.

I can help you only with specific questions.