Найдено 202 результата

ViktorV
Пт 05 сен 2014 14:57
Форум: MySQL Data Access Components
Тема: Строка запроса в параметрах
Ответы: 16
Просмотры: 15006

Re: Строка запроса в параметрах

Установите, пожалуйста, свойство Debug компонента TmpQuery в True и добавьте
#pragma link "MyDacVcl". Проверьте правильность сформированного запроса, и если он корректный, но выполняется с ошибками, пришлите его нам.
Пожалуйста, пришлите небольшое приложение, воспроизводящее проблему, на viktorv*devart*com, а также скрипты для создания объектов БД.
ViktorV
Чт 04 сен 2014 07:18
Форум: MySQL Data Access Components
Тема: Строка запроса в параметрах
Ответы: 16
Просмотры: 15006

Re: Строка запроса в параметрах

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

Код: Выделить всё

TmpQuery->SQL->Add("INSERT INTO table1(AA,BB) VALUES (&aa, :bb)");
TmpQuery->MacroByName("aa")->Value = "(SELECT ID_GROUP FROM group WHERE GROUP_NAME = 'ГРУППА')";
TmpQuery->Params->CreateParam(ftBlob, "bb", ptInput);
TmpQuery->ParamByName("bb")->LoadFromFile(m_vector.Value1, ftBlob);
ViktorV
Ср 03 сен 2014 06:44
Форум: MySQL Data Access Components
Тема: Строка запроса в параметрах
Ответы: 16
Просмотры: 15006

Re: Строка запроса в параметрах

Приведенный Вами код не будет работать, так как SQL запрос должен быть определен до присвоения значения макросу, иначе макрос не будет найден.
ViktorV
Вт 02 сен 2014 09:32
Форум: MySQL Data Access Components
Тема: Строка запроса в параметрах
Ответы: 16
Просмотры: 15006

Re: Строка запроса в параметрах

Для передачи запроса вы можете использовать Macros.
Более подробно о Macros вы можете узнать по ссылке: http://www.devart.com/mydac/docs/work_macros.htm

Попробуйте изменить Ваш код на следующий:

Код: Выделить всё

TmpQuery->SQL->Add("INSERT INTO table1(AA,BB) VALUES (&aa,:bb)");
TmpQuery->MacroByName("aa")->AsString = m_vector[i].Value2;
TmpQuery->Params->CreateParam(ftBlob, "bb", ptInput);
TmpQuery->ParamByName("bb")->LoadFromFile(m_vector[i].Value1, ftBlob);
ViktorV
Ср 20 авг 2014 08:11
Форум: Universal Data Access Components
Тема: FieldsEditor в TVirtualTable
Ответы: 4
Просмотры: 4316

Re: FieldsEditor в TVirtualTable

Если возникнут новые вопросы, пожалуйста, обращайтесь.
ViktorV
Вт 19 авг 2014 13:04
Форум: Universal Data Access Components
Тема: FieldsEditor в TVirtualTable
Ответы: 4
Просмотры: 4316

Re: FieldsEditor в TVirtualTable

Здравствуйте,

Для создания Lookup поля во время выполнения приложения, Вы можете использовать следующий код:

Код: Выделить всё

// Загрузка пользователей
procedure TDM.LoadUserAccounts;
var
  StructName: TField;	
  i: integer;
begin
  UserVirtualTable.LoadFromFile('src\xml\adm\Users.xml');
  UserVirtualTable.Close;
  if UserVirtualTable.Fields.Count = 0 then
    for i := 0 to UserVirtualTable.FieldDefs.Count - 1 do
      UserVirtualTable.FieldDefs.Items[i].CreateField(UserVirtualTable);
  StructName := TStringField.Create(UserVirtualTable);
  StructName.FieldName := 'STRUCT_NAME';
  StructName.FieldKind := fkLookup;
  StructName.LookupDataSet := StructUnitsRefVirtualTable;
  StructName.KeyFields := 'STRUCT_ID';
  StructName.LookupKeyFields := 'ID';
  StructName.LookupResultField := 'NAME';
  StructName.Visible := True;
  StructName.DataSet := UserVirtualTable;
  UserVirtualTable.FieldDefs.Add(StructName.FieldName, ftString, 90, False);
  UserVirtualTable.Open;
end;
ViktorV
Чт 31 июл 2014 10:08
Форум: Universal Data Access Components
Тема: Http туннель UniDac к MySql
Ответы: 1
Просмотры: 2259

Re: Http туннель UniDac к MySql

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