51

(6 replies, posted in Russian)

Добрый день!
странно перестал работать импорт (после выбора файла ничего не происходит) версия 4.4 файл для примера импорта в папке

52

(5 replies, posted in Russian)

Хм, ок пойду читать

53

(5 replies, posted in Russian)

Это надо делать периодически несколько раз в день, экспортировать из акцеса каждую  таблицу в сsv не вариант, таблиц порядка 100, т.е. напрямую без csv никак нельзя?

Спасибо!

55

(5 replies, posted in Russian)

Добрый день! А реально ли импорт из базы ms access. Есть база ms access оч большая с кучами связями, если в mvdb создать точно такую же структуру, можно ли загрузить данные сразу из всех таблиц?

Добрый день! А возможно ли сделать прозрачную авторизацию или может есть пример какой т.е. надо чтобы пользователь зашел под доменным именем в компьютер и при запуске программы авторизовался в программе под этим же логином/паролем без повторного ввода логин пароль

у компонента ComboBox есть свойство ParentComboBox

58

(4 replies, posted in Russian)

спасибо!!!

59

(4 replies, posted in Russian)

да спасибо! а как это реализовать в скрипте не меняя структуру?

60

(4 replies, posted in Russian)

Добрый день!
подскажите: есть таблица1 записи выводятся в TableGrid1 и есть таблица2 в которой вноситься id_таблица1, нужно в TableGrid1 отобразить записи таблица1 при нажатии на check box только те id, которых нет в таблица2

Может тут имеется ввиду если текст не помещается в  кнопку и надо перенести на новую строку, если правильно я понял. у кнопки есть свойство WorfWrap поставьте галку.

проверка по "чертеж изделия"
изменил название полей, не очень хорошо ставить пробел в названия полей

так эта она и есть, тот скрипт который выше запрещает импорт если такая записю уже существует

if SQLExecute('SELECT COUNT(id) FROM '+TableName+' WHERE '+sWhereDuplicate)=0 then......

Посморите тут http://myvisualdatabase.com/forum/viewtopic.php?id=1086

65

(8 replies, posted in Russian)

Вопрос снят - разобрался

66

(6 replies, posted in Russian)

так?
может конечно коряво

67

(6 replies, posted in Russian)

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

procedure Form1_TableGrid1_OnChange (Sender: TObject);
var
   i,c: integer;
begin
   Form1.TableGrid1.BeginUpdate;
   c := Form1.TableGrid1.RowCount - 1;
   for i := 0 to c do
   begin
      if StrToDateTime(Form1.TableGrid1.Cells[4,i]) < Date then Form1.TableGrid1.Cell[4,i].Color := $00FF80FF;
      if StrToDateTime(Form1.TableGrid1.Cells[4,i]) = Date+1  then Form1.TableGrid1.Cell[4,i].Color := clGreen;
   end;
   Form1.TableGrid1.EndUpdate;
end;

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

procedure Form1_GridEmployees_OnChange (Sender: TObject);
var
   i,c: integer;
begin
 c := Form1.TableGrid1.RowCount - 1;
 for i := c downto 0 do
 if Form1.TableGrid1.Cells[1,i] = '' then Form1.TableGrid1.DeleteRow(i);
end;

69

(8 replies, posted in Russian)

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

70

(8 replies, posted in Russian)

да это понятно что в Options надо выбрать multiselect, но тут похоже надо скрипт еще какойто потомучто ctrl зажимаю выбираю и печатает 1 заявление той записи которой тыкнул последнюю

добрый день! помогите, что не так. Нужен скрипт импорта данных, который бы искал по полю например инн если нет такого инн добавить запись, если такой инн существует в базе, то обновить у этой записи ФИО из файла. Такой скрипт что то не так отрабатывает - делает у всех записей одинаковое фио

....
if SQLExecute('SELECT COUNT(id) FROM db_items WHERE inn = ' + arrStr[8] ) = 0 then
                 begin
                SQLExecute ('INSERT INTO db_items ([FIO], [dr], [placedr], id_db_sex, id_db_Dol, id_db_Pod,  [pas], [snils],[inn], [tel], [email], [adres]) VALUES ('+
               sFio +','+
               sDr +','+
               sPlase +','+
               sid_sex +','+
               sid_dol +','+
               sid_pod +','+
               sPas +','+
               sSnils +','+
               sInn +','+
               sTel +','+
               sMail +','+
               sAdres +
               ');');
                 end else
               SQLExecute ('UPDATE db_items SET FIO='+sFio);
......

посмотрите тут http://myvisualdatabase.com/forum/viewtopic.php?id=1062

73

(8 replies, posted in Russian)

Добрый день!
помогите, натолкните, в как сделать есть TableGrid, есть шаблон сделанный в FastReport, есть кнопка отчет которая при выборе записи в TableGrid печатает заявление на сотрудника, как сделать чтобы использовать goMultiselect для TableGrid, выбрав записи удерживая Ctrl сформировать сразу нескольким сотрудникам такое заявление

74

(1 replies, posted in Russian)

Добрый день!
при установке у CheckBox   свойства Checked = True после компиляции  Checked = False т.е. на форму поместил CheckBox установил по умолчанию Checked = True, запустил проект и CheckBox стоит "без галочки"
версия 4.1, в 4.12 пробовал так же

75

(11 replies, posted in Russian)

те компоненты,  котрые учавствуют в поиске, их можно найти в Fast report во вкладке "Variables" переностие их в отчет и значения этих компонетов отображаются в отчете.