1 Topic by Юрий (edited by Юрий 2018-08-31 08:24:24)

  • Registered: 2018-08-29
  • Posts: 42

Topic: Ключ для проекта

Здравствуйте .

Создавал проект на вер.1.44 - работает.
Решил перед покупкой вер. 4.5 протестировать.
Тема подымалась несколько раз. Но у вы, так и не хочет работать корректно.
По вашей ссылке :
http://myvisualdatabase.com/forum/viewtopic.php?id=1434
Trial and Serial перенес скрипт на свой проект.
Появились вопросы:
1. При закрытии таб. Регистрации т.е. нажимаем на верхнюю правую кнопку рамки
- Открывается главная страница проекта. Хотя должен быть " Выход из проекта".
2. При вводе ключа после нажатия на "OK" всё работает - выходим из проекта.
Запускаем проект - и опять появляется таб. регистрации - всё заново.
3. Ограничение периода "Demo" по времени. В скрипте вместо 30 дней ставим 10 но
в таб. регистрации остаётся всё по прежнему 30.

Помогите разобраться с этими проблемами.
С уважением - Юрий.

  • Registered: 2018-06-26
  • Posts: 137

Re: Ключ для проекта

Дык дайте ваш проект, что ли... Или ваши скрипты, связанные с этим вопросом.

3 Reply by Юрий (edited by Юрий 2018-08-29 12:16:08)

  • Registered: 2018-08-29
  • Posts: 42

Re: Ключ для проекта

Проект находится по ссылке - см. 1 пост.
Trial and Serial он работает также как и мой проект.

4 Reply by Юрий (edited by Юрий 2018-08-30 10:37:24)

  • Registered: 2018-08-29
  • Posts: 42

Re: Ключ для проекта

Господа программисты -  что, никто не решился взяться за эту проблему
Trial and Serial.

  • Registered: 2014-02-14
  • Posts: 10,294

Re: Ключ для проекта

Юрий


1. Пока проект имеет ознакомительный период, он не закрывается, но при необходимости можете изменить это.


В остальном протестировал, все работает.


Видимо проблема в чем то другом, пожалуйста приложите свой проект.

Dmitry.

6 Reply by Юрий (edited by Юрий 2018-08-30 12:38:00)

  • Registered: 2018-08-29
  • Posts: 42

Re: Ключ для проекта

Спасибо - проект прилагаю.

Яндекс диск PDU Ver.1.1

https://yadi.sk/d/yW4vKxN93ahPBa

  • Registered: 2014-02-14
  • Posts: 10,294

Re: Ключ для проекта

Проверил ваш проект, все работает.


2. После ввода ключа, повторно его не запрашивает.
Проверьте, происходит ли запись ключа в реестр (regedit.exe)


3. При запуске вашего проекта пишет осталось 10 дней.

Dmitry.

8 Reply by Юрий (edited by Юрий 2018-08-31 08:24:43)

  • Registered: 2018-08-29
  • Posts: 42

Re: Ключ для проекта

Спасибо - проблема была в реестре.

Но у меня возникли ещё вопросы.
1. Можно ли сделать чтоб расположение названий в таблицах "ComboBox" и "TableGrid" были в алфавитном порядке не зависимо от заполнения.
2. Авто размер окон и всего остального. Помнится Вы кому то дорабатывали проект с этой темой.

Вы пишете: 1. Пока проект имеет ознакомительный период, он не закрывается, но при необходимости можете изменить это.
Каким образом и что получится?

С уважением - Юрий.

  • Registered: 2014-02-14
  • Posts: 10,294

Re: Ключ для проекта

Юрий wrote:

Спасибо - проблема была в реестре.

Но у меня возникли ещё вопросы.
1. Можно ли сделать чтоб расположение названий в таблицах "ComboBox" и "TableGrid" были в алфавитном порядке не зависимо от заполнения.

Имеете ввиду сортировку?
Для ComboBox установите свойство Sort = True
В настройках кнопки Поиск, а также в настройках компонента TableGrid можете указать, по какому полю делать сортировку.


Юрий wrote:

2. Авто размер окон и всего остального. Помнится Вы кому то дорабатывали проект с этой темой.

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


Юрий wrote:

Вы пишете: 1. Пока проект имеет ознакомительный период, он не закрывается, но при необходимости можете изменить это.
Каким образом и что получится?

С уважением - Юрий.

Возможно я неправильно понял вопрос. При закрытии формы frmNagScreen проект не должен закрываться, иначе каким образом можно будет воспользоваться ознакомительным периодом? Просто опишите подробней, какой алгоритм вам необходим.

Dmitry.

10 Reply by Юрий (edited by Юрий 2018-08-31 15:46:01)

  • Registered: 2018-08-29
  • Posts: 42

Re: Ключ для проекта

Здравствуйте. Спасибо за содействие.

Остались некоторые заморочки.
Вы пишете:
"Возможно я неправильно понял вопрос. При закрытии формы frmNagScreen проект не должен закрываться, иначе каким образом можно будет воспользоваться ознакомительным периодом? Просто опишите подробней, какой алгоритм вам необходим."
1. Мне нужно что бы при клике на кнопку (правая верхняя красная кнопка X в рамке ) проект полностью закрывался.
Делаем кнопку "Demo" на форме frmNagScreen она запускает проект в режиме Demo пока не истекло
время этого режима.
2. Авто размер:
У меня монитор с большим разрешением, а у кого то с маленьким и рамка проекта выходит
за пределы допустимого.

Возник новый вопрос:
Как создать таб. с прокруткой по вертикали, что бы запись на ней уже была при открытии формы.

Остальное понял.
С уважением - Юрий.

  • Registered: 2014-02-14
  • Posts: 10,294

Re: Ключ для проекта

1. Проще всего убрать с формы возможность ее закрыть, установив свойство формы BorderIcons > biSystemMenu = False
Затем на форме расположить две кнопки, Demo и Закрыть


2. Настроил форму main, теперь компоненты меняют свой размер в зависимости от размера формы. Для этого у каждого компонента предусмотрено свойство Anchors, которым вы можете задать поведение компонента при изменении размеры формы.


3. Таб с прокруткой к сожалению нет возможности сделать.
С помощью скрипта можно открыть форму с данными указанной записи, пример:

Form.ShowRecord('TableName', id записи);

приложил к сообщению доработанный проект

Post's attachments

Attachment icon PDU Ver.1.1_fixed.zip 24.01 kb, 393 downloads since 2018-09-03 

Dmitry.
  • Registered: 2018-08-29
  • Posts: 42

Re: Ключ для проекта

Здравствуйте. Огромное Вам спасибо.

Всё понятно.

С уважением - Юрий.

  • Registered: 2015-10-09
  • Posts: 115

Re: Ключ для проекта

DriveSoft wrote:

1. Проще всего убрать с формы возможность ее закрыть, установив свойство формы BorderIcons > biSystemMenu = False
Затем на форме расположить две кнопки, Demo и Закрыть

Дмитрий по этой теме вопрос, как вы указали настройки форма и еще если поставить wsMaximized то форма разворачивается на весь экран включая панель задач, как настроить чтобы на панель задач не закрывало. т.е. есть свои элементы закрыть свернуть, системные убраны, но неудобно закрывается панель задачь.

  • Registered: 2014-02-14
  • Posts: 10,294

Re: Ключ для проекта

Такое поведение может случиться, если свойство формы Sizeable = False и BordersIcons > biMaximize = False, установите оба этих значение в True

Dmitry.
  • Registered: 2018-08-29
  • Posts: 42

Re: Ключ для проекта

Здравствуйте Дмитрий.
Подскажите - где можно почитать подробно о функциях "Свойства компонента".
С уважением - Юрий

  • Registered: 2014-02-14
  • Posts: 10,294

Re: Ключ для проекта

в меню: Помощь > Справка

Dmitry.
  • Registered: 2018-08-29
  • Posts: 42

Re: Ключ для проекта

Здравствуйте Дмитрий.

Вы писали:
"3. Таб с прокруткой к сожалению нет возможности сделать.
С помощью скрипта можно открыть форму с данными указанной записи, пример:"

Form.ShowRecord('TableName', id записи);
Где можно узнать ID записи.

С уважением - Юрий

  • Registered: 2014-02-14
  • Posts: 10,294

Re: Ключ для проекта

Юрий wrote:

Здравствуйте Дмитрий.

Вы писали:
"3. Таб с прокруткой к сожалению нет возможности сделать.
С помощью скрипта можно открыть форму с данными указанной записи, пример:"

Form.ShowRecord('TableName', id записи);
Где можно узнать ID записи.

С уважением - Юрий


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


Узнать id выбранной записи например из компонента TableGrid можно так

Form.ShowRecord('TableName', Form.TableGrid.dbItemID);

но в данном примере нет большого смысла, проще использовать кнопку с действием "Показать запись"

Dmitry.
  • Registered: 2018-08-29
  • Posts: 42

Re: Ключ для проекта

Здравствуйте Дмитрий.

Может я неправильно объясняю. Мне нужно: чтоб при открытии базы на поле "Memo" был открыт
заданный текст автоматически.

С уважением - Юрий

  • Registered: 2014-02-14
  • Posts: 10,294

Re: Ключ для проекта

Что значит "заданный текст автоматически"?
Откуда необходимо брать текст? Если из базы данных, тогда так

procedure Form1_OnShow (Sender: TObject; Action: string);
begin
    Form1.Memo1.Text := SQLExecute('SELECT fieldname FROM tablename WHERE id=1');
end;
Dmitry.
  • Registered: 2018-08-29
  • Posts: 42

Re: Ключ для проекта

Ещё раз здравствуйте Дмитрий.

"Что значит "заданный текст автоматически"?"

Заданный текст - Текст написанный мною и хранящийся в базе.
Автоматически - При запуске базы он уже открыт в "Memo" без всяких кнопок.

С уважением - Юрий

  • Registered: 2014-02-14
  • Posts: 10,294

Re: Ключ для проекта

Тогда пример выше вам подойдет, только вы должна знать id записи, в которой хранится заданный текст.

Dmitry.
  • Registered: 2018-08-29
  • Posts: 42

Re: Ключ для проекта

Вот что то с ID у меня не получается, как и где его посмотреть не пойму.

  • Registered: 2014-02-14
  • Posts: 10,294

Re: Ключ для проекта

Юрий wrote:

Вот что то с ID у меня не получается, как и где его посмотреть не пойму.

Можете настроить компонент TableGrid, чтобы он показал все данные из таблицы БД вместе с полем id, таким образом вы можете посмотреть, какой id принадлежит необходимой вам записи.


Также можете описать вашу ситуация, с какой целью вы делаете это? Возможно я смогу предложить, что то попроще.

Dmitry.

25 Reply by Юрий (edited by Юрий 2018-09-13 02:31:26)

  • Registered: 2018-08-29
  • Posts: 42

Re: Ключ для проекта

Спасибо за содействие.

Проблема в том, что в выше указанном проекте "PDU Ver.1.1" на стр. "inter" находится описание
во всю стр. набранное "Label" прямо по верх фона. Но мне хотелось бы это описание поместить
в поле "Memo" - это на много удобнее.

С уважением - Юрий