51

(5 replies, posted in Russian)

по первому вопросу нашел выход, Спасибо. немного не легкий но нашел.

DriveSoft wrote:

Сложновато понять, сделайте пожалуйста проект с примером

52

(5 replies, posted in Russian)

т.е. если на CheckBox стоит галочка то в отчете появлялась надпись командировка если галочки нет то и надписи нет.

DriveSoft wrote:

Сложновато понять, сделайте пожалуйста проект с примером

53

(5 replies, posted in Russian)

И еше вопрос, как можно реализовать? -  Checkbox-ом  добавлять и убирать Memo в отчете, т.е. чтоб Memo1 в зависимости от CheckBox1 в отчете была принтабельна и нет.

54

(5 replies, posted in Russian)

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

в Box1 я выбираю водителя он заполняет связанные строки, включая Box2   (отсюда вопрос, на этом заполнение останавливается) в Box2 применяется номер связанного с водителем авто, дальше заполняются данные об авто.
Именно так потому что водитель может поехать на другом авто, соответственно остается возможность поменять авто  вручную на Box2

55

(5 replies, posted in Russian)

Да, конечно, на формате SQL тоже самое, и еще вопрос, как можно через ComboBox вытянуть из базы предыдущую запись, т.е. закрываешь путевку прописываешь конечный километраж, а при выдачи новой путевки конечный км. предыдущей путевки этого же авто вытягивался на начальный км. новой путевки? и как поменять текст в TableGrid ос чекбокса тоб значение было не (да/нет) а (закрыта/открыта) и при значении закрыто окрашивало всю строку в красный, очень буду признателен если поможете.

DriveSoft wrote:

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

56

(5 replies, posted in Russian)

,Доброго времени суток, не могу понять как использовать импорт базы выгружает без проблем, а импорт пишет (Импорт настроен не правильно) не могу понять что ему нужно.

57

(7 replies, posted in Russian)

Спасибо, то что надо, там есть необходимая часть скрипта.

eugene1995miroshnikov wrote:
Patriot10200 wrote:

Пробовал, не работает(

eugene1995miroshnikov wrote:

Как вариант назначить начальное значение для колонки в таблице, по типу задать 000001

Вот пример от DriveSoft http://myvisualdatabase.com/forum/viewtopic.php?id=1088

58

(7 replies, posted in Russian)

Пробовал, не работает(

eugene1995miroshnikov wrote:

Как вариант назначить начальное значение для колонки в таблице, по типу задать 000001

59

(7 replies, posted in Russian)

Добрый день Коллеги) нужна помощь не получается внедрить нули в счетчик т.е сейчас он пишет таким образом (2020/1-2020/2)
а нужно (2020/000001-2020/00002-2020/00010-2020/000011) и т.д. по хронологии. по мере увеличения

пользуюсь данным скриптом

if Action='NewRecord' then
    begin
        new_akt_priema_peredachi.edYear.Text := FormatDateTime('yyyy', now);
        new_akt_priema_peredachi.edID.Text := SQLExecute ('SELECT IFNULL(MAX(ident), 0)+1 FROM AKT_PRIEMA_PEREDACHI WHERE year='+FormatDateTime('yyyy', now) );
    end;
    new_akt_priema_peredachi.edIdYear.Text:= new_akt_priema_peredachi.edYear.Text + '/' + new_akt_priema_peredachi.edID.Text;

60

(16 replies, posted in Russian)

Да, спасибо)

derek wrote:

Здравствуй Patriot10200,
Это то, что вы хотите? (пароли совпадают с идентификатором пользователя)
нотабене - если вы используете версию 6.3 или более раннюю, используйте
  if action = 'NewRecord'  then form2.combobox1.dbitemid := user.id else form2.combobox2.dbitemid := user.id; ;
вместо
  if action = 'NewRecord'  then form2.combobox1.dbitemid := application.user.id else form2.combobox2.dbitemid := application.user.id; ;
в вашем сценарии.
Derek.

да спасибо большое)

derek wrote:

Здравствуй Guitar-craft,
Вот два примера для вас.
Надеюсь, это поможет.
С уважением
Derek.

62

(16 replies, posted in Russian)

Ребят еще вопрос по автозаполнению! допустим, как сделать что-бы при запуске формы создания путевого листа, поле механик автоматически тянуло ФИО того кто вошел в прогу по логину паролю ( система логина пароля встроенная)

Спасибо)

sibprogsistem wrote:
Patriot10200 wrote:

Доброго дня, подскажите скрипт на нажатие 2-х кнопок т.е.- есть 3 кнопки, нажимаешь одну, нажимаются две другие, 2 сохраняет запись а 3 отправляет только сохраненную запись на печать. Спасибо

Form1.Button1.Click;
Form1.Button2.Click;

Доброго дня, подскажите скрипт на нажатие 2-х кнопок т.е.- есть 3 кнопки, нажимаешь одну, нажимаются две другие, 2 сохраняет запись а 3 отправляет только сохраненную запись на печать. Спасибо

Добрый день, как сделать кнопку печать с двумя функциями?

Например:

1. - есть таблица (Table Grid),  и если в ней ничего не выбрано, то кнопка отправляет на печать всю таблицу учитывая фильтры, с подтягиванием инфы которая отсутствует в таблице, из БД.
2. - если в таблице выбран отдельный элемент, все выше описанное, но по выбранному элементу

Заранее благодарю.

Благодарю

sibprogsistem wrote:
Patriot10200 wrote:

Добрый день не могу найти тему, с изменением пункта (о программе),
а так же включением и отключением дизайнера отчетов,
вкурсе что делается через скрипт, Help mi please.))

 
http://myvisualdatabase.com/forum/viewtopic.php?id=5682
http://myvisualdatabase.com/forum/viewtopic.php?id=1316
http://myvisualdatabase.com/forum/viewtopic.php?id=1091

67

(1 replies, posted in FAQ)

Спасибо

sibprogsistem wrote:

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

Добрый день не могу найти тему, с изменением пункта (о программе),
а так же включением и отключением дизайнера отчетов,
вкурсе что делается через скрипт, Help mi please.))

69

(16 replies, posted in Russian)

derek wrote:

Здравствуй Patriot10200,
Ваш сценарий правильный, но у вас нет действия, определенного в свойствах объекта для комбинированного списка (см. Скриншот).
Derek.

Спасибо большое все получилось

70

(16 replies, posted in Russian)

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

71

(16 replies, posted in Russian)

DriveSoft wrote:

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



Делается это примерно так

procedure Form1_ComboBox1_OnChange (Sender: TObject);
begin
    Form1.Edit1.Text := SQLExecute('SELECT marka FROM cars WHERE id='+Form1.ComboBox1.sqlValue);
    Form1.Edit2.Text := SQLExecute('SELECT driver FROM cars WHERE id='+Form1.ComboBox1.sqlValue);
end;

SQL запрос может отличаться, в зависимости от структуры вашей БД.
Если не получиться реализовать, можете приложить ваш проект (zip файл без exe и dll), постараюсь помочь.


Приветствую, Спасибо, надеюсь разберусь, потихоньку разбираюсь)

72

(16 replies, posted in Russian)

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