9,676

(30 replies, posted in Russian)

atempbox
кстати да, есть такой неприятный глюк, к сожалению пока не поборол.

9,677

(237 replies, posted in Russian)

Владислав Косяков
Записал, спасибо.

Если бегунок исчезает, нажмите кнопку влево, чтобы вернуть все на место.


Создавать дубликаты в принципе можно с помощью скрипта, но сам пока не пробовал )

9,678

(237 replies, posted in Russian)

попробуйте неофициальную версию 1.41
https://www.dropbox.com/s/fr76z69sc69l1 … 201.41.zip

вроде я исправил эту ошибку, дайте знать.

9,679

(3 replies, posted in Russian)

в принципе с помощью скриптов можно.

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


довольно специфично получилось )
а для чего это?

9,680

(10 replies, posted in Russian)

BD.StatusF.ItemIndex :=0;

OnChange это событие, которое срабатывает, когда в ComboBox был изменен выбор.

если необходимо при этом событии, нажать на кнопку, то нужно писать BD.SearchB.Click;

9,681

(8 replies, posted in Russian)

К сообщению приложен проект.


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

9,682

(13 replies, posted in Russian)

Скидывайте )

mitrich45
я вам отправил проект с исправленным запросом.


или это уже запрос для другой цели?

9,684

(14 replies, posted in Russian)

Aiperi.Bekboeva
у компонента DateTimePicker есть свойство Filter, в котором можно выбрать условие, которое будет использоваться при поиске, т.е. выберите значение Filter: <=

a4290402@drdrb.net


1. You can use script for it, for TextBox:
Form1.Edit1.Alignment := taLeftJustify;
Form1.Edit1.Alignment := taRightJustify;
Form1.Edit1.Alignment := taCenter;

for grid cells it's not support in current version.


2. It is planned.


Thanks.

9,686

(8 replies, posted in Russian)

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


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

9,687

(13 replies, posted in Russian)

Владислав Косяков

в запросе нет секции WHERE, поэтому будут выведены все записи из таблицы Oborud
Возможно у вас неверно создан бланк отчета.

9,688

(237 replies, posted in Russian)

Voltage
А зачем возраст человека выбирать из выпадающего списка? для этого достаточна компонента TextBox, куда вводим его возраст, а чтобы искать по диапазону, используем два TextBox со свойством Filter у одного >= а у второго <=
Пример поиска по интервалу чисел можно посмотреть в этом проекте
http://myvisualdatabase.com/database_ex … ntory.html

9,689

(14 replies, posted in Russian)

Aiperi.Bekboeva
уведомление пока сделать не получится, можно сделать поиск по дате, например вывести все записи в которых дата окончания занятий меньше заданной.


Да, скрипты используют синтаксис ObjectPascal, который используется в Delphi, так же доступны многие классы, типы и функции, которые присутствуют в Delphi.

9,690

(14 replies, posted in Russian)

Aiperi.Bekboeva

Помогу )

к сообщению прикреплен проект.

9,691

(237 replies, posted in Russian)

alex842
планируется, но не скоро, пока это можно сделать не визуально, с помощью скриптов, используя объекты TMenu и TMenuItem для меню, и TPopupMenu для всплывающего меню.

9,692

(237 replies, posted in Russian)

Voltage
Приветствую )

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

9,693

(30 replies, posted in Russian)

alex842

procedure Form1_Button1_OnClick (Sender: string; var Cancel: boolean);
var
   OpenDialog: TOpenDialog;
begin
     OpenDialog := TOpenDialog.Create(Form1);
     if OpenDialog.Execute then ShowMessage(OpenDialog.FileName);
     OpenDialog.Free;
end;

Приветствую,

Отправьте пожалуйста на support@drive-software.com
посмотрю.

9,695

(30 replies, posted in Russian)

atempbox
Проверил у себя, работает, скиньте проект  на support@drive-software.com
посмотрю.

9,696

(237 replies, posted in Russian)

atempbox
Можно

Form1.PageControl1.ActivePage := Form1.PageControl1.Pages(1);


Pages(1) - задает номер вкладки, нумерация с нуля

на самом деле SQL запрос всегда возвращает одинаковые строки для результата поиска в случае lastname и firstname,
все дело в том, куда будут выводится поля, в MasterData или Header

atempbox
Вы немного неправильно формируете отчет, посмотрите пример в этом проекте
http://myvisualdatabase.com/database_ex … oices.html

9,699

(237 replies, posted in Russian)

Владислав Косяков
Скрыть вкладки можно с помощью скрипта: Form1.TabSheet1.TabVisible := False;

Остальное со временем будет реализовано.

9,700

(30 replies, posted in Russian)

wertyby
скиньте проект на support@drive-software.com
постараюсь помочь.