Quantcast
Channel: DA-SOFT Technologies - Forum
Viewing all 1040 articles
Browse latest View live

Subject: Does FireDAC 8.05.3365 compatible with Mysql 5.6? - by: Support

$
0
0
Hello Should work. Any problems ?

Subject: slow select - by: Support

$
0
0
It is just how MySQL client software works. You should limit your result set.

Subject: FMX application crash on open data (delphi XE7) - by: EspressoSoftware

$
0
0
>Try to reproduce the same issue with statically linked SQLite engine how do this ?

Subject: Assertion Failured - uADCompClient.pas, line 7695 - by: ArturSchmidlin

$
0
0
Hi, Only in my PC, with an EXE and a DLL compiled in another computer, I have the following error message: "Assertion Failured - uADCompClient.pas, line 7695". On the first run of the DLL everything happens normally, but starting the second run, I get this message every time. This happens when I instantiate my datamodule. Thanks. Artur

Subject: encrypted connection - by: Rycho

$
0
0
how to force an encrypted connection with mySQl database on internet server?

Subject: XE3 => XE7: Param.Size wrongly calculated - by: JHermie

$
0
0
Hello, Situation is as follows: With upgrading from XE3 (anyDAC) to XE7 (Firedac), we suddenly are getting issues on update a charachter field > 255 characters on Informix. We now get the error '[FireDAC][Phys][ODBC]-345. Data too large for variable [#1]. Max len = [256], actual len = [1000] Hint: set the TFDParam.Size to a greater value' Problem is we are using cached update mode in combination with use of 'applyupdates', so we don't have any parameters to set (except for the PK)... FYI: the table definition where we want to update a record: CREATE TABLE com_monster_im ( monim_id INTEGER NOT NULL, com_monster CHAR(1000), PRIMARY KEY(monim_id)); The FDQuery components consists of following query: SELECT monim_id, com_monster FROM com_monster_im WHERE monim_id = :paramMonimId

Subject: Floating Values issue with AnyDAC 8.0.5, MySQL 5.1 and Mapping Rule dtUInt32 To dtInt32 - by: fduenas

$
0
0
Hi When browsing Mysql 5.1 Floating fields like Double(15,2), when Having the Mapping rule dtUInt32->dtInt32, all Those fields are detected as BCD(8,1), so any Value above 999,999.99 their decimal part will be rounded to one decimal. so Id a Have 1,000,000.19, it will be rounded to 1,000,000.20. and worst part, It will not correctly browse values above 9,999,999.99 I added that Mapping rule because my Application was started with AnyDAC 5.0, where MySQl field Integer Unsigned, where detected as ftInteger, now with AnyDAC 6.0.3 or newer they are now detectedd ftLongInteger. So it lead to a Tyepe Mismatch exception. Adding that rule solved my problems. But Is causing that Serious issue.

Subject: .ExecSql gives wrong "affected records" count on FB - by: LorenzoCaldon

$
0
0
Hi! I've found a bug in AnyDAC 6.0.x (but looking src it seems present also in FireDAC XE6, can't check on XE7) and Firebird 2.5.3; when executing a query like: i:= Connection1.ExecSql('INSERT INTO ... SELECT ...') i always is 1, even when there are 0 or more records affected by the query. Same problems for less common query like i:= Connection1.ExecSql('MERGE INTO ... USING ...') The problem seems to be in TIBStatement.GetRowCounts (unit FireDAC.Phys.IBWrapper.pas), simply commenting this block of code (and removing a wrong optimization) seems to solve the problem: --------------------- isc_info_sql_stmt_insert: begin // That is optimization. Because INSERT does not have WHERE // and operation is finished successfull, then one record is // inserted. FRowsInserted := 1; FRowsDeleted := 0; FRowsUpdated := 0; FRowsSelected := 0; Exit; end; --------------------- Let me know if the fix is ok, and please check if FireDAC XE7 still have this problem. Bye!

Subject: Ошибка "No active document"при сохранении запроса в MemoryStream в формате sfXML - by: Freddie

$
0
0
Использую конструкцию сохранения запроса в поток: TADQuery.SaveToStream(Stream, sfXML) Внутри метода, в момент получения интерфейса (я так понимаю из какой-то библиотеки) выскакивает исключение: "No active document". И эта ошибка выскакивает только в одном приложении. Для тестов создавал пустое приложение, выполнял везде один и тот же запрос к БД, настройки компонентов везде одинаковые (по умолчанию) - в тестовом приложении все работает на ура. Unit "uADStanStorage" procedure TADXMLStorage.Open(const AFileName: string; AStream: TStream; AMode: TADStorageMode); begin inherited Open(AFileName, AStream, AMode); FLevel := 0; FParser := TXMLDocument.Create(nil); FParser.Active := True; if AMode = smWrite then begin FParser.Version := '1.0'; FParser.Encoding := 'utf-8'; WriteObjectBegin('ADBS'); WriteInteger('Version', StreamVersion, -1); end else begin FParser.LoadFromStream(FStream); if TestObject('ADBS') then begin ReadObjectBegin('ADBS'); FStreamVersion := ReadInteger('Version', C_AD_StorageVer); end; end; end; unit "Xml.XMLDoc" procedure TXMLDocument.SetActive(const Value: Boolean); begin if (csReading in ComponentState) then begin FStreamedActive := Value; end else if Value GetActive then begin if Value then begin DoBeforeOpen; CheckDOM; FDOMDocument := DOMImplementation.createDocument('', '', nil); try LoadData; except ReleaseDoc(False); raise; end; DoAfterOpen; end else begin DoBeforeClose; ReleaseDoc; DoAfterClose; end; end; end; Подскажите в чем может быть проблема? Использую компоненты FireDAC 8.0.5.3365 для Delphi XE4, работаю с Firebird 2.5.3 x64

Subject: [FireDAC][Phys][PG]-314 - by: Lena

$
0
0
Здравсвуйте. В переменую PATH добавлено C:\Program Files (x86)\PostgreSQL\8.3\bin В ран тайм программа успешно соединяется с базой и работает (делает SQL запросы). В десигн тайн получаю эту ошибку при попытке протестировать FDConnection: ERROR: [FireDAC][Phys][PG]-314. Cannot load vendor library [libpg.dll]. Соотвественно при попытке получить все поля в эдиторе полей FDQuery таже ошибка. Что надо сделать чтобы работало и десигн тайм? Спасибо.

Subject: FDQuery ClientDataSet - by: Lena

$
0
0
Почему когда данные из FDQuery поступают в ClientDataSet я не могу сделать навигацию в ClientDataSet: ClientDataSet1->Next(); Ошибка что не в режиме редактирования-вставки. Почему не получается сделать простую навигацию по данным в памяти ClientDataSet?

Subject: OnCalcFields в FDQuery - by: Lena

$
0
0
Пробую так: [code] FDMemTableClient->Active = false; FDQueryGetLastJson->FetchOptions->Unidirectional = false; FDQueryGetLastJson->Open(); FDQueryGetLastJson->FetchAll(); FDMemTableClient->Data = FDQueryGetLastJson->Data; TFieldDef *pNewDef = FDMemTableClient->FieldDefs->AddFieldDef(); pNewDef->Name = L"num"; pNewDef->DataType = fkInternalCalc; FDMemTableClient->Active = true; FDMemTableClient->First(); //**** void __fastcall TForm1Main::FDMemTableClientCalcFields(TDataSet *DataSet) { FDMemTableClient->Fields->FieldByName("num")->Value = DataSet->RecNo; } [/code] В колонке пусто...

Subject: How to manually change the transaction state of a connection object? - by: softcorpkft

$
0
0
Ok, I understand. Thank you very much for your valuable answer!

Subject: How to know which field cause ekUKViolated ? - by: hendrang

$
0
0
Hi all, I am using MS Access. I have a table has multiple fields that is set to unique (no duplicate). if error because of ekUKViolated, how to know which field is violated (duplicate) ? Thanks

Subject: Need to read frequently a database table witch containt parameters - by: r038tmp5

$
0
0
Hello, I want to use a table witch containt font parameter for exemple. So I need to read it frequently, and I need good performance. so I try an implementation like that: [code] procedure TParametre.Initialization; begin ... with FADquery do begin Connection := myConnection; FetchOptions.Items := []; FetchOptions.RowsetSize := 1; SQL.Add('SELECT param1, param2...FROM parameter_table WHERE param_id = :param_id'); ParamByName('param_id').DataType := ftInteger; ParamNyName('param_id').Clear; Open; end; ... end; procedure TParametre.GetParameter(ParamId: integer); begin with FADQuery do begin ParamByName('param_id').AsInteger := ParamId; Refresh; end; end;[/code] It's work but it's slow. I have try to do a ReSync, but it doesn't refresh datas. Have you some solution for me? Thank you.

Subject: AV on shoutdown using Firebird Embedded - by: LorenzoCaldon

$
0
0
I've found the opportunity to test the described problem on XE7, and found that it is still present, but a bit different: On application shut-down you can only note a 4-5 seconds delay on procedure TFDPhysDriver.Unload > InternalUnload, but no AV; now it only hangs with AV when you explicitly release the driver, ie: procedure TForm1.Button1Click(Sender: TObject); begin FDConnection1.Close; FDPhysFBDriverLink1.Release; ShowMessage('End'); end; attached there is the sample project. If you use fbclient.dll in place of fbembed.dll, or if you connect with fbembed.dll on a local db, everything works fine (no delay, no AV). Please let me know if you can reproduce the problem, http://www.da-soft.com/images/fbfiles/files/xe7_emb_remotedb_access_violation.7z

Subject: Access violation in TADQuery.close and TADQuery.open - by: jEinsamkeit

$
0
0
Hi good day. I got an error "Access violation" by using the following methods: 1) TADQuery.Close; 2) TADQuery.Open; My call stack is: Call Stack "TADQuery.Close ()": 00405a41 + 002d SireServer13_0120.exe SystemHandleOnException 77df012e + ntdll.dll 000th KiUserExceptionDispatcher 00b2c865 +7 13887 +0065 SireServer13_0120.exe uADDatSManager TADDatSView.CheckActiveChanged 00b2c930 SireServer13_0120.exe uADDatSManager 13920 +0008 +2 TADDatSView.SetActive 00b2b92f + 000f SireServer13_0120.exe uADDatSManager 13411 +1 TADDatSView.Destroy +0008 SireServer13_0120.exe System 004053d8 TObject.Free +0018 00853534 2095 SireServer13_0120.exe uADStanUtil +4 TADRefCounter.RemRef 00b2bac7 SireServer13_0120.exe uADDatSManager 13459 +0027 +2 TADDatSView.RemRef 00b35018 + 002c SireServer13_0120.exe uADCompDataSet +7 2286 TADDataSet.ResetViews 00b370d8 +25 +0120 3248 SireServer13_0120.exe uADCompDataSet TADDataSet.InternalClose 00b9a860 + 000c SireServer13_0120.exe 9708 uADCompClient +2 TADAdaptedDataSet.InternalClose 00b9ca74 + 002c SireServer13_0120.exe 11019 uADCompClient +3 TADRdbmsDataSet.InternalClose 00635cce + DB 003a SireServer13_0120.exe TDataSet.CloseCursor DB + 00a7 SireServer13_0120.exe 00635b97 TDataSet.SetActive 00b33dab +17 +0093 1776 SireServer13_0120.exe uADCompDataSet TADDataSet.SetActive +0015 4387 00bc2911 SireServer13_0120.exe RDComponent +4 TSireQuery.SetActive 0063599c +0004 SireServer13_0120.exe DB TDataSet.Close Call Stack "TADQuery.Open ()": 00405a41 + 002d SireServer13_0120.exe SystemHandleOnException 77df012e + ntdll.dll 000th KiUserExceptionDispatcher +0051 SireServer13_0120.exe System 004054d5 TObject.GetInterface +0010 00408710 SireServer13_0120.exe SystemIntfClear 00b61675 + 01bd SireServer13_0120.exe uADPhysManager +37 4409 TADPhysTransaction.InternalNotify +0010 00408710 SireServer13_0120.exe SystemIntfClear 00b64dd7 + 02f7 SireServer13_0120.exe uADPhysManager +50 6377 TADPhysCommand.Prepare +0051 SireServer13_0120.exe System 004054d5 TObject.GetInterface +0030 7422 00b67594 SireServer13_0120.exe uADPhysManager +9 TADPhysCommand.Define +0092 2248 010e570e SireServer13_0120.exe uADDAptManager +5 TADDAptTableAdapter.Define 00b98620 +2 8416 +0014 SireServer13_0120.exe uADCompClient TADCustomTableAdapter.Define +0021 9914 00b9aee1 SireServer13_0120.exe uADCompClient +3 TADAdaptedDataSet.DoDefineDatSManager 00b337fe + 003E SireServer13_0120.exe 1656 uADCompDataSet +3 TADDataSet.CheckTable 00b369d3 + 01c7 SireServer13_0120.exe uADCompDataSet +37 3068 TADDataSet.OpenCursor 00b9c9f2 uADCompClient 11002 + 004a SireServer13_0120.exe +5 TADRdbmsDataSet.OpenCursor 00635b45 +0055 SireServer13_0120.exe DB TDataSet.SetActive 00b33dab +17 +0093 1776 SireServer13_0120.exe uADCompDataSet TADDataSet.SetActive +0004 00635990 SireServer13_0120.exe DB TDataSet.Open 00b9e114 +0 +0000 11678 SireServer13_0120.exe uADCompClient TADQuery.Open AnyDAC version 6.0.5. The configuration of TADQuery is: ADQuery1.FetchOptions.Mode: = fmAll; ADQuery1.CachedUpdates: = True; ADQuery1.UpdateOptions.LockMode: = lmNone; ADQuery1.FetchOptions.AutoClose: = False; ADQuery1.FetchOptions.Cache: = [fiBlobs]; ADQuery1.FetchOptions.Items: = [fiBlobs]; The configuration of TADConnection is: ADConnection1.FetchOptions.DetailOptimize: = False; ADConnection1.FetchOptions.LiveWindowParanoic: = True; ADConnection1.FetchOptions.LiveWindowFastFirst: = True; ADConnection1.FetchOptions.Items: = [fiBlobs, fiMeta]; ADConnection1.FetchOptions.Cache: = [fiblobs, fiMeta]; ADConnection1.FormatOptions.StrsEmpty2Null: = False; ADConnection1.ResourceOptions.AutoConnect: = False; ADConnection1.ResourceOptions.AutoReconnect: = True; ADConnection1.ResourceOptions.DirectExecute: = True; ADConnection1.ResourceOptions.SilentMode: = True; ADConnection1.UpdateOptions.LockMode: = lmPessimistic; ADConnection1.UpdateOptions.LockPoint: = lpImmediate; My DBMS is SQL Server 2008 R2.

Subject: RTC / ThinDAC revived? - by: asi_asker

Subject: Error: "Undefined function REPLACE(..)" in a SELECT on a MS-Access database - by: AndreasSpang

$
0
0
I need to use the function in a SELECT on a MS-Access database, but I am getting the error "Undefined function". It works fine with MySQL and MS-SQL, but fails with MS-Access. What can I do? Here is my SQL-Statement [code]SELECT contact_nr FROM contacts WHERE (, '/', ''), '(', ''), ')', ''), ' ', ''), '-', '')} like '%06312032044%')[/code] What I am trying to achieve is to strip all unneccessary characters from the phonenumbers in the database to compare them to an incoming call. I am using AnyDAC 6.0.9 (Build 3011). Many thanks in advance Andreas

Subject: MS-Access: How can I find out the version number of a database file - by: AndreasSpang

$
0
0
I need to find out for which version of MS-Access a certain database file was created.
Viewing all 1040 articles
Browse latest View live