Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Delphi > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail


Донат для форума - использовать для поднятия настроения себе и модераторам

А ещё здесь можно купить рекламу за 25 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru

Ответ
 
Опции темы
Старый 13.09.2019, 18:50   #1
linda88
Форумчанин
 
Регистрация: 17.01.2019
Сообщений: 78
Репутация: 27
Восклицание FireDac компоненты

Код:
s:=Extractfilepath(paramstr(0))+'\Debug\BD\USES.mdb;';
FDConnection1.DriverName:='IB';
FDConnection1.Params.Strings:='Database='+s+'User_Name=Admin;'+ 'PASSWORD=MASTER_KEY;'+'PROTOCOL=TCPIP;'+'SERVER=LOCALHOST;';
 FDConnection1.Connected:=TRUE;
 FDConnection1.LoginPrompt:=FALSE;
 FDQuery1.SQL.Add('SELECT*FROM User');
 FDQuery1.Active:=true;
 DataSource1.DataSet:=FDQuery1;
указывает на строчку
Код:
form4.FDConnection1.Params:='Database='+s+'User_Name=Admin;'+ 'PASSWORD=MASTER_KEY;'+'PROTOCOL=TCPIP;'+'SERVER=LOCALHOST;';
с ошибкой:
[dcc64 Error] User.pas(48): E2029 '[' expected but '.' found
[dcc64 Error] User.pas(48): E2010 Incompatible types: 'Integer' and 'string'
[dcc64 Fatal Error] Server.dpr(9): F2063 Could not compile used unit 'User.pas'
Failed
Elapsed time: 00:00:02.1

Последний раз редактировалось linda88; 13.09.2019 в 19:00. Причина: уточнение вопроса
linda88 вне форума   Ответить с цитированием
Старый 13.09.2019, 18:56   #2
Serge_Bliznykov
МегаМодератор
СуперМодератор
 
Регистрация: 09.01.2008
Сообщений: 26,048
Репутация: 5656
По умолчанию

и что?
Serge_Bliznykov на форуме   Ответить с цитированием
Старый 13.09.2019, 19:01   #3
linda88
Форумчанин
 
Регистрация: 17.01.2019
Сообщений: 78
Репутация: 27
По умолчанию

Цитата:
Сообщение от Serge_Bliznykov Посмотреть сообщение
и что?
с
ошибкой
[dcc64 Error] User.pas(48): E2029 '[' expected but '.' found
[dcc64 Error] User.pas(48): E2010 Incompatible types: 'Integer' and 'string'
[dcc64 Fatal Error] Server.dpr(9): F2063 Could not compile used unit 'User.pas'
Failed
Elapsed time: 00:00:02.1

и не дает подключиться к базе данных что я делаю неправильно?

Последний раз редактировалось linda88; 13.09.2019 в 20:03.
linda88 вне форума   Ответить с цитированием
Старый 13.09.2019, 20:19   #4
Аватар
Модератор
Заслуженный модератор
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Адрес: Северодонецк.ua
Сообщений: 18,986
Репутация: 6725
По умолчанию

Наверняка Strings не типа String и очень похоже, что TStringList. А нижняя строчка где в приведенном фрагменте кода?
Код:
form4.FDConnection1.Params:='Database='+s+'User_Name=Admin;'+ 'PASSWORD=MASTER_KEY;'+'PROTOCOL=TCPIP;'+'SERVER=LOCALHOST;';
__________________
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума   Ответить с цитированием
Старый 13.09.2019, 20:38   #5
linda88
Форумчанин
 
Регистрация: 17.01.2019
Сообщений: 78
Репутация: 27
По умолчанию

3-я строчка в первом сообщении

Хоть так
Код:
FDConnection1.Params.Strings:='Database='+s+'User_Name=Admin;'+ 'PASSWORD=MASTER_KEY;'+'PROTOCOL=TCPIP;'+'SERVER=LOCALHOST;';
Хоть так
Код:
FDConnection1.Params:='Database='+s+'User_Name=Admin;'+ 'PASSWORD=MASTER_KEY;'+'PROTOCOL=TCPIP;'+'SERVER=LOCALHOST;';
Ругается одинаково

Если сделать так
Код:
FDConnection1.Params.Strings['Database='+s+'User_Name=Admin;'+ 'PASSWORD=MASTER_KEY;'+'PROTOCOL=TCPIP;'+'SERVER=LOCALHOST;'];
то
Checking project dependencies...
Compiling Server.dproj (Debug, Win64)
dcc64 command line for "Server.dpr"
c:\program files (x86)\embarcadero\studio\20.0\bin\d cc64.exe -$O- -$W+ --no-config -M -Q -TX.exe -AGenerics.Collections=System.Generi cs.Collections;
Generics.Defaults=System.Generics.D efaults;WinTypes=Winapi.Windows;Win Procs=Winapi.Windows;DbiTypes=BDE;D biProcs=BDE;DbiErrs=BDE -DDEBUG
-E.\Win64\Debug -I"c:\program files (x86)\embarcadero\studio\20.0\lib\W in64\debug";"c:\program files (x86)\embarcadero\studio\20.0\lib\W in64\release";
"C:\Users\Артас\Documents\Embarcade ro\Studio\20.0\Imports";"c:\program files (x86)\embarcadero\studio\20.0\Impor ts";
C:\Users\Public\Documents\Embarcade ro\Studio\20.0\Dcp\Win64;"c:\progra m files (x86)\embarcadero\studio\20.0\inclu de"
-LEC:\Users\Public\Documents\Embarca dero\Studio\20.0\Bpl\Win64 -LNC:\Users\Public\Documents\Embarca dero\Studio\20.0\Dcp\Win64 -NU.\Win64\Debug
-NSWinapi;System.Win;Data.Win;Datasn ap.Win;Web.Win;Soap.Win;Xml.Win;Sys tem;Xml;Data;Datasnap;Web;Soap; -O"c:\program files
(x86)\embarcadero\studio\20.0\lib\W in64\release";"C:\Users\Артас\Docum ents\Embarcadero\Studio\20.0\Import s";"c:\program files
(x86)\embarcadero\studio\20.0\Impor ts";C:\Users\Public\Documents\Embar cadero\Studio\20.0\Dcp\Win64;"c:\pr ogram files
(x86)\embarcadero\studio\20.0\inclu de" -R"c:\program files (x86)\embarcadero\studio\20.0\lib\W in64\release";
"C:\Users\Артас\Documents\Embarcade ro\Studio\20.0\Imports";"c:\program files (x86)\embarcadero\studio\20.0\Impor ts";
C:\Users\Public\Documents\Embarcade ro\Studio\20.0\Dcp\Win64;"c:\progra m files (x86)\embarcadero\studio\20.0\inclu de" -U"c:\program files
(x86)\embarcadero\studio\20.0\lib\W in64\debug";"c:\program files (x86)\embarcadero\studio\20.0\lib\W in64\release";
"C:\Users\Артас\Documents\Embarcade ro\Studio\20.0\Imports";"c:\program files (x86)\embarcadero\studio\20.0\Impor ts";
C:\Users\Public\Documents\Embarcade ro\Studio\20.0\Dcp\Win64;"c:\progra m files (x86)\embarcadero\studio\20.0\inclu de" -V -VN -VR
-NBC:\Users\Public\Documents\Embarca dero\Studio\20.0\Dcp\Win64 -NHC:\Users\Public\Documents\Embarca dero\Studio\20.0\hpp\Win64 -NO.\Win64\Debug
Server.dpr
[dcc64 Error] User.pas(48): E2010 Incompatible types: 'Integer' and 'string'
[dcc64 Fatal Error] Server.dpr(9): F2063 Could not compile used unit 'User.pas'
Failed
Elapsed time: 00:00:02.5

а если так
Код:
FDConnection1.Params.Strings('Database='+s+'User_Name=Admin;'+ 'PASSWORD=MASTER_KEY;'+'PROTOCOL=TCPIP;'+'SERVER=LOCALHOST;');
то
Checking project dependencies...
Compiling Server.dproj (Debug, Win64)
dcc64 command line for "Server.dpr"
c:\program files (x86)\embarcadero\studio\20.0\bin\d cc64.exe -$O- -$W+ --no-config -M -Q -TX.exe -AGenerics.Collections=System.Generi cs.Collections;
Generics.Defaults=System.Generics.D efaults;WinTypes=Winapi.Windows;Win Procs=Winapi.Windows;DbiTypes=BDE;D biProcs=BDE;DbiErrs=BDE -DDEBUG
-E.\Win64\Debug -I"c:\program files (x86)\embarcadero\studio\20.0\lib\W in64\debug";"c:\program files (x86)\embarcadero\studio\20.0\lib\W in64\release";
"C:\Users\Артас\Documents\Embarcade ro\Studio\20.0\Imports";"c:\program files (x86)\embarcadero\studio\20.0\Impor ts";
C:\Users\Public\Documents\Embarcade ro\Studio\20.0\Dcp\Win64;"c:\progra m files (x86)\embarcadero\studio\20.0\inclu de"
-LEC:\Users\Public\Documents\Embarca dero\Studio\20.0\Bpl\Win64 -LNC:\Users\Public\Documents\Embarca dero\Studio\20.0\Dcp\Win64 -NU.\Win64\Debug
-NSWinapi;System.Win;Data.Win;Datasn ap.Win;Web.Win;Soap.Win;Xml.Win;Sys tem;Xml;Data;Datasnap;Web;Soap; -O"c:\program files
(x86)\embarcadero\studio\20.0\lib\W in64\release";"C:\Users\Артас\Docum ents\Embarcadero\Studio\20.0\Import s";"c:\program files
(x86)\embarcadero\studio\20.0\Impor ts";C:\Users\Public\Documents\Embar cadero\Studio\20.0\Dcp\Win64;"c:\pr ogram files
(x86)\embarcadero\studio\20.0\inclu de" -R"c:\program files (x86)\embarcadero\studio\20.0\lib\W in64\release";
"C:\Users\Артас\Documents\Embarcade ro\Studio\20.0\Imports";"c:\program files (x86)\embarcadero\studio\20.0\Impor ts";
C:\Users\Public\Documents\Embarcade ro\Studio\20.0\Dcp\Win64;"c:\progra m files (x86)\embarcadero\studio\20.0\inclu de" -U"c:\program files
(x86)\embarcadero\studio\20.0\lib\W in64\debug";"c:\program files (x86)\embarcadero\studio\20.0\lib\W in64\release";
"C:\Users\Артас\Documents\Embarcade ro\Studio\20.0\Imports";"c:\program files (x86)\embarcadero\studio\20.0\Impor ts";
C:\Users\Public\Documents\Embarcade ro\Studio\20.0\Dcp\Win64;"c:\progra m files (x86)\embarcadero\studio\20.0\inclu de" -V -VN -VR
-NBC:\Users\Public\Documents\Embarca dero\Studio\20.0\Dcp\Win64 -NHC:\Users\Public\Documents\Embarca dero\Studio\20.0\hpp\Win64 -NO.\Win64\Debug
Server.dpr
[dcc64 Error] User.pas(48): E2029 '[' expected but '(' found
[dcc64 Error] User.pas(48): E2010 Incompatible types: 'Integer' and 'string'
[dcc64 Fatal Error] Server.dpr(9): F2063 Could not compile used unit 'User.pas'
Failed
Elapsed time: 00:00:02.4

Последний раз редактировалось linda88; 13.09.2019 в 20:59.
linda88 вне форума   Ответить с цитированием
Старый 13.09.2019, 21:55   #6
Serge_Bliznykov
МегаМодератор
СуперМодератор
 
Регистрация: 09.01.2008
Сообщений: 26,048
Репутация: 5656
По умолчанию

а так?
Код:

....

FDConnection1.Params.Clear; // <--- может быть, эта строчки и не нужна

FDConnection1.Params.Add('Database='+Extractfilepath(paramstr(0))+'\Debug\BD\USES.mdb');
FDConnection1.Params.Add('User_Name=Admin');
FDConnection1.Params.Add('PASSWORD=MASTER_KEY');
FDConnection1.Params.Add('PROTOCOL=TCPIP');
FDConnection1.Params.Add('SERVER=LOCALHOST');
Serge_Bliznykov на форуме   Ответить с цитированием
Старый 14.09.2019, 03:13   #7
northener
ПШП
Профессионал
 
Регистрация: 15.07.2013
Сообщений: 1,576
Репутация: 574
По умолчанию

Цитата:
Сообщение от linda88 Посмотреть сообщение
что я делаю неправильно?
Не читаете учебники и справки по компонентам Дельфи. И надеетесь что Дельфи и её компилятор достаточно умные для того чтобы понять ваши желания.
Не знаю на 100% тип свойства FDConnection1.Params, но на 99% и 9 в периоде уверен что это список. И не просто список, а класс-список типа TStrings.
Этот список можно заполнить как указано в примере Serge_Bliznykov #6, добавлением в сей список параметров по очереди. Либо (если это действительно класс-список типа TStrings) присвоением строки из вашего поста свойству DelimitedText этого класса.
northener вне форума   Ответить с цитированием
Старый 14.09.2019, 20:36   #8
linda88
Форумчанин
 
Регистрация: 17.01.2019
Сообщений: 78
Репутация: 27
По умолчанию

теперь вот чтопишет
Миниатюры
Нажмите на изображение для увеличения
Название: Безымянный.jpg
Просмотров: 67
Размер:	119.6 Кб
ID:	97669  
linda88 вне форума   Ответить с цитированием
Старый 15.09.2019, 03:52   #9
northener
ПШП
Профессионал
 
Регистрация: 15.07.2013
Сообщений: 1,576
Репутация: 574
По умолчанию

Цитата:
Сообщение от linda88 Посмотреть сообщение
теперь вот чтопишет
Ув. Линда88. Вы думаете что приложенная вами картинка столь информативна, что вам сразу "дадут щастье"?
northener вне форума   Ответить с цитированием
Старый 15.09.2019, 08:21   #10
Black Fregat
Программист
Профессионал
 
Аватар для Black Fregat
 
Регистрация: 23.06.2009
Сообщений: 1,496
Репутация: 1038
По умолчанию

Цитата:
Сообщение от linda88 Посмотреть сообщение
теперь вот чтопишет
Вообще-то там английским языком всё написано - что за ошибка и что именно нужно сделать, чтобы её исправить: добавить компонент к проекту
Black Fregat вне форума   Ответить с цитированием
Ответ

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
DBGRID + FIredac + inner jon+oracle =ora-00904: Invalid identifier mr_xxx Общие вопросы Delphi 13 28.01.2019 15:38
Как в FireDAC записать в поле типа MEDIUMTEXT? strongmaster БД в Delphi 0 06.01.2019 10:48
Где взять FireDAC? Ship_1 Компоненты Delphi 8 09.01.2018 11:13
выходные параметры хранимой процедуры (FireBird 2.5, FireDac) Dozent БД в Delphi 2 20.10.2014 07:25
DataSet.Recordset.GetRows из ADO в FireDAC Dozent БД в Delphi 1 13.08.2013 15:02


13:35.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.