Antonyan

Пользователи
  • Публикации

    53
  • Зарегистрирован

  • Посещение

О Antonyan

  • Звание
    Продвинутый пользователь
  • День рождения

Посетители профиля

173 просмотра профиля
  1. Если речь идет о таблицах Visual Dbase7 - указанные выше методы не помогут, рекомендую бесплатный компонент TDBF.
  2. Как вариант, можно просто скрыть его Procedure XXX; Var LItem : TListViewItem; begin LItem := YourListView.Items.Add; LItem.Objects.AccessoryObject.Visible:=false; end;
  3. Проблему устранил. Помогло Edit.ApplyStyleLookup.
  4. У EditButton выставил ClipChildren и ClipParent в true, странно, глюк пока не проявляется. Буду тестить дальше...
  5. В проекте около 10 тыс строк, думаю, утомительно будет в нем копаться. Буду благодарен за направление, в какую сторону размышлять
  6. Добрый день ! Кидаю на форму Edit, создаю в нем EditButton. Запускаю. Периодически (или эпизодически, плавающий глюк) EditButton почему то меняет позицию и мигрирует за пределы Edit. В чем может быть дело ?
  7. По п.1 - попробую, но маловероятно что поможет, а вот п.2 - интересный вариант, спасибо
  8. Вопрос то этот решился через костыль. У них есть штатный режим "тишины", когда ошибки копятся, но на экран не выводятся. Я все же думаю, где то есть мое упущение, да и любопытство разбирает ))
  9. Именно ))
  10. Memo - так звучит в сообщении об ошибке. В самом отчете данные из БД выводятся в TFrxMemoView, связанный с набором данных через frxDBDataset1. Вот и любопытно, почему один и тот же код в Application.VCL работает отлично, а в DLL отрабатывает, но выводит указанную ошибку.
  11. Добрый вечер! Попробую пояснить. Переписываю свой старый проект под Win7, 8, 10 по просьбе заказчика. После раздумий - решил писать под Win на FMX. FastReport в XE7 представлен только для VCL, под FMX он отсутствует (могу ошибаться, но где то попадалось, что под FMX он существует в виде отдельного платного пакета, хотя в сети есть и ломаные. Ни то, ни другое меня не устраивает). Поэтому, для формирования отчета создал Dll, из которой успешно вызываю FR. В принципе, свой вопрос я решил, но не так как мне бы хотелось. Интересно разобраться, где и что я упустил.
  12. Проект под Win писал на FMX, для печати отчетов использую FR5, вызываемый из Dll
  13. Добрый день, коллеги ! Неожиданно столкнулся с проблемой при использовании FastReport5 в XE7. Суть : Создаю отчет test.fr3, в котором в одно единственное поле из БД выводится информация об адресе. Создаю VCL проект, кидаю на форму : FDConnection1, Temp: TFDQuery, FDGUIxWaitCursor1 Далее, коннект к базе FB. Под кнопкой пишу код: procedure TForm3.Button2Click(Sender: TObject); var frxReport1 : TfrxReport; frxDBDataset1 : TfrxDBDataset; begin frxReport1:=TfrxReport.Create(nil); frxDBDataset1:=TfrxDBDataset.Create(nil); frxDBDataset1.UserName:='Rekv'; frxDBDataset1.DataSet:=Temp; { // В VCL - работает без этих строк, в DLL - разумеется, нет. frxReport1.DataSets.Clear; frxReport1.DataSets.Add(frxDBDataset1); frxReport1.DataSet:=frxDBDataset1; frxReport1.DataSetName:=frxDBDataset1.UserName; } frxReport1.LoadFromFile('e:\test.fr3'); frxReport1.ShowReport(True); end; Этот код работает прекрасно, отчет формируется, информация из БД присутствует в отчете. Вопросов к нему нет. Проблемы начинаются, когда я пытаюсь использовать формирование и вызов отчета из DLL Вызов : PrintData(MyQuery); function PrintData(Temp: TFDQuery): Integer; stdcall; var frxReport1 : TfrxReport; frxDBDataset1 : TfrxDBDataset; begin Result := 0; frxReport1:=TfrxReport.Create(nil); frxDBDataset1:=TfrxDBDataset.Create(nil); frxDBDataset1.UserName:='Rekv'; frxDBDataset1.DataSet:=Temp; frxReport1.DataSets.Clear; frxReport1.DataSets.Add(frxDBDataset1); frxReport1.DataSet:=frxDBDataset1; frxReport1.DataSetName:=frxDBDataset1.UserName; frxReport1.LoadFromFile('e:\test.fr3'); frxReport1.ShowReport(True); end; В итоге, отчет формируется и запускается, информация из БД присутствует в отчете, но возникает сообщение об ошибке : Были обнаружены следующие ошибки : Memo1 : Поле не найдено : Rekv."Adress" Как победить эту ошибку ?
  14. Можно код для примера ?
  15. Вызов конкретного топика (может кому пригодится) : ShellExecute(0, Pchar('open'),Pchar('hh.exe'),PChar(' -mapid 5 '+Extractfilepath(paramstr(0))+ 'ваш.chm'),nil,9); где, -mapid 5, команда, указывающая на вызов топика №5. Не забудьте добавить модуль ShellApi в uses С уважением.