Согласен, меня это тоже порой раздражает )
в текущей версии пока этого не избежать, в крайнем случае можно добавить новое поле, и при запуске проекта, отказаться от пересоздания базы данных, затем открыть базу данных в SQLiteStudio и там добавить необходимое поле без потери данных.
9,651 2014-05-29 13:51:23
Re: Заранее заданные значения в ComboBox (3 replies, posted in Russian)
9,652 2014-05-29 13:33:50
Re: Заранее заданные значения в ComboBox (3 replies, posted in Russian)
Приветствую,
В принципе я мог бы сделать такую возможность, но тогда это нарушало бы правило разработки баз данных, а именно присутствовала бы избыточность данных, т.к. в каждой записи сохранялся бы текст Юр.лицо или физ. лицо, а не связь.
9,653 2014-05-29 11:32:21
Re: Can I show values from table in text box? (1 replies, posted in General)
Hello,
Please, send me your project to support@drive-software.com
I'll try to help you.
9,654 2014-05-29 11:27:54
Re: Is it possible with script set the property of a textbox field (1 replies, posted in Script)
Hi,
Yes, you can.
Please, download unofficial version 1.41
https://www.dropbox.com/s/fr76z69sc69l1 … 201.41.zip
Then download example project, attached with message.
9,655 2014-05-29 09:49:10
Re: get value in selected table grid cell (6 replies, posted in Script)
This is not a standard component, TNextGrid from http://www.bergsoft.net/en-us/product/n … erview.htm
In current version you have access to only the following methods:
AddRow(Count: Integer = 1): Integer;
ClearRows;
properties
VisibleRows: integer;
FixedCols: integer;
Cells(ARow, ACol): string;
RowHeight(ARow): integer;
9,656 2014-05-28 20:49:49
Re: SQL - поиск (15 replies, posted in Russian)
kodecs
Default Value появится в компоненте, только если этот компонент размещен на форме, которая предназначена для добавления/редактирования записи, т.е. эта форма должна быть вызвана с помощью кнопки с действием Новая запись.
к сообщению я приложил пример, как автоматически сделать фамилию с инициалами с помощью скрипта.
9,657 2014-05-28 19:55:03
Re: Скрипты (10 replies, posted in Russian)
можно добавить вторую строчку, чтобы синхронизировать и галки.
Form1.DateTimePicker1.Date := Form1.DateTimePicker2.Date;
Form1.DateTimePicker1.Checked := Form1.DateTimePicker2.Checked;
9,658 2014-05-28 19:33:53
Re: Скрипты (10 replies, posted in Russian)
Владислав Косяков
Form1.Edit1.Text := '';
Form1.DateTimePicker1.Checked := False;
9,659 2014-05-28 19:00:41
Re: хотелки (237 replies, posted in Russian)
Владислав Косяков
чуть позже добавлю и Basic синтаксис
9,660 2014-05-28 16:18:06
Re: get value in selected table grid cell (6 replies, posted in Script)
TLabel
TButton
TEdit
TMemo
TComboBox
TCheckBox
TDateTimePicker
TMonthCalendar
TImage
TPanel
TGroupBox
TPageControl
also you can create other components by using a script that are present in Delphi, like TToolBar, TMenu etc.
9,661 2014-05-28 15:44:38
Re: get value in selected table grid cell (6 replies, posted in Script)
Hello,
procedure frmDictionary_gridGender_OnCellClick (Sender: string; ACol, ARow: Integer);
begin
frmDictionary.edGender.Text := frmDictionary.gridGender.Cells(ACol, ARow);
end;
9,662 2014-05-28 14:23:15
Re: SQL - поиск (15 replies, posted in Russian)
kodecs
я бы не рекомендовал увлекаться SQL кодом, иначе теряется все преимущество программы )
на счет "Type" = "Сотрудник", у компонент Textbox есть свойство DefaultValue, которое позволяет задать значение по умолчанию, во время создания записи, возможно будет лучше туда списать значение Сотрудник.
но вообще это неверный подход, для того чтобы определять тип персоны, в вашем случае необходимо завести еще одну таблицу, которая будет использоваться как словарь, где и будут содержаться все варианты значения Type, посмотрите видео урок по созданию телефонного справочника, где абоненту присваивается группа.
https://www.youtube.com/watch?v=lN6_yeK84K8
на счет Фамилия И.О., можно создать вычисляемое поля следующего вида:
person.lastname || ' ' || upper(substr(person.firstname, 1, 1)) || '.' || upper(substr(person.secondname, 1, 1)) || '.'
правда у SQLite есть особенность, функция upper, не умеет работать не с английскими буквами, т.е. получится Иванов и.и.
либо тоже самое можно сделать с помощью скрипта
Form1.Edit1.Text := Form1.edLastName.Text + ' ' + Form1.edFirstName.Text[1] + '.' + Form1.edSecondName.Text[1] + '.';
9,663 2014-05-28 12:01:17
Re: Новая версия 1.40 (30 replies, posted in Russian)
Niema
Можно, к сообщению прикреплен проект с примером.
Таким образом можно создавать любые компоненты с помощью скрипта.
9,665 2014-05-27 16:11:55
Re: SQL - поиск (15 replies, posted in Russian)
Приветствую,
Для поиска по вхождение, у компонента TextBox есть свойство Filter, выберите его значение %s%
Если все таки нужен SQL поиск используя несколько полей, то так
SELECT *
FROM person
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);
где edFirstName и edLastName это имена компонентов Textbox на текущей формы, с которых берется текст для поиска.
9,666 2014-05-27 12:48:38
Re: Заполнение формы (2 replies, posted in Russian)
Приветствую,
чтобы вызвать форму для создания новой записи, необходимо чтобы кнопка для этого имела действие НОВАЯ ЗАПИСЬ, тогда все поля будут очищены перед вызовом формы.
Скорей всего вы вызываете форму с действием ПОКАЗАТЬ ФОРМУ.
Если я что то неправильно понял, можете прислать проект на support@drive-software.com
посмотрю что не так.
9,667 2014-05-27 10:49:22
Re: Script to clear values on Search form (14 replies, posted in Script)
frmEmployees.gridEmployees.ClearRows;
9,668 2014-05-27 09:16:58
Re: Script to clear values on Search form (14 replies, posted in Script)
ndinotamba
Right now i don't have any documentation, but script have same objects, procedures and events like in Delphi, this way you can read books about Delphi.
9,669 2014-05-26 21:53:47
Re: Скрипты (10 replies, posted in Russian)
Как выглядит синтаксис команды "присвоить содержимое одного объекта TextBox другому объекту TextBox", DateTimePicker?
Form1.Edit1.Text := Form1.Edit2.Text;
Form1.DateTimePicker1.Date := Form1.DateTimePicker2.Date;
9,670 2014-05-26 21:51:28
Re: Что реализовать в первую очередь? (396 replies, posted in Russian)
Добавление комментариев в скрипты.
Пример:
// комментарий всей строки
{ много строчный комментарий
комментарий
комментарий}
9,671 2014-05-26 19:02:34
Re: Скрипты (10 replies, posted in Russian)
Владислав Косяков
Пришлите проект, проверю.
9,672 2014-05-26 19:01:29
Re: хотелки (237 replies, posted in Russian)
Владислав Косяков
Узнал по подробней, это требует некоторой доработки скрипта, в текущей версии все таки не получится.
9,673 2014-05-26 18:40:07
Re: Что реализовать в первую очередь? (396 replies, posted in Russian)
oleg.zmushko
Планирую разместить список форм там же, где сейчас находится древовидная структура компонентов, на отдельной вкладке, с возможностью скрыть выбранные формы из проекта.
9,674 2014-05-26 17:31:52
Re: Что реализовать в первую очередь? (396 replies, posted in Russian)
Спасибо за идеи и замечания )
9,675 2014-05-26 17:31:00
Re: Script to clear values on Search form (14 replies, posted in Script)
procedure Form1_bClear_OnClick (Sender: string; var Cancel: boolean);
begin
Form1.edLastname.Text := '';
Form1.edFirstname.Text := '';
Form1.dtDateOfBirth.Checked := False;
end;
Also you can download project for example.