8,976

(4 replies, posted in Script)

Hello,


One event may belong to two or more buttons, Sender lets you know who sent the event.

procedure Form1_Button_OnClick (Sender: string; var Cancel: boolean);
begin
     ShowMessage(Sender);
end;

savage
проверил у себя, фильтр не сбросился после UpdateDatabase
отправьте пожалуйста ваш проект на support@drive-software.com

8,978

(4 replies, posted in Russian)

Попробуйте так, только как выяснилось лучше использовать событие OnKeyUp

procedure Form1_GridAbonent_OnKeyUp (Sender: string; var Key: Word; Shift, Alt, Ctrl: boolean);
begin
     Form1.Edit1.Text := IntToStr(Form1.TableGrid1.dbItemID);
end;

8,979

(4 replies, posted in Russian)

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


не совсем понимаю, что имеете ввиду под автовыбором, но попробуйте использоваться событие OnKeyDown

8,980

(1 replies, posted in General)

My Visual Database and projects works on 32 and 64 bit Windows.

Спасибо за отзыв )


на счет администрации форума, ее нет, я тут один smile


С Уважением, Дмитрий.

8,982

(6 replies, posted in Russian)

alik wrote:

Сюда же ещё 1 вопрос.
Возможно ли каким то образом реализовать следующий момент.
В программу пользователи входят по логину и паролю. Есть Форма настройка пользователей, где есть список всех пользователей.
В списке отображается вошел пользователь в программу или нет, у каждого пользователя есть статус активности: "Активен" и "Неактивен".
Хочу сделать следующее, по кнопке, напрмер, пусть будет "Отключить" выкинуть из программы принудительно именно выбранного пользователя, не выкидывая остальных.

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

8,983

(6 replies, posted in Russian)

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


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

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

(case when {CheckBox11} = 1 then active_task = 1 when {CheckBox11} = 0 then active_task = 0 when {CheckBox11} is NULL then 1=1 end)

Dogon

Спасибо, посмотрел, выглядит интересно )

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

Планируется такая функция )

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

atempbox

можно

Form1.ComboBox1.Enabled := False;

ivanovstudio

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

Действительно, сбивается.


Скачайте пожалуйста бета версию 1.45
https://www.dropbox.com/s/88lx13h9cw5ro … 5.zip?dl=0


Добавил новые методы для ComboBox
dbAddRecord(id: integer; s: string);
dbEditRecord(id: integer; s: string);
dbDeleteRecord(id: integer);


Form1.ComboBox1.dbDeleteRecord (-1); // позволяет удалить из начала списка пустое значение, которое по умолчанию присутствует в ComboBox 

Хотя ошибаюсь, можно

Form1.ComboBox1.Items.Delete(0);

к сожалению никак, а зачем?

Попробуйте по гриду нажать правой кнопкой мыши и выбрать в меню Copy All (Скопировать все) и вставить в Calc


либо можно сделать это через отчеты, которые могут открываться в Open Office.

8,995

(6 replies, posted in General)

I have not thought about it )

8,996

(1 replies, posted in Russian)

Можно, скачайте данный проект с примером.
В примере используется свойство Increm. Search компонента GridAbonent

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

Ready.

Sorry but i understand your goal and don't see your project here.

9,000

(1 replies, posted in Script)

Form1.TableGrid1.ClearRows;

p.s.
Please, don't use button with action ShowForm for create new record, you should use action NewRecord for that.