Re: [fpc-devel] Preparing 3.2.4, call for merge request and regressions

2021-10-25 Thread LacaK via fpc-devel
The base output  is starting to work somewhat. http://www.stack.nl/~marcov/mergelogs32/restset.html Marco, can I see what commits were already merged ? (and what not - iow what is candidate for merging) L. ___ fpc-devel maillist - fpc-devel@lists.fre

Re: [fpc-devel] Currency * Double

2021-10-24 Thread LacaK via fpc-devel
Hi , what data type is result of multiplication of: (Currency * Double) on Win64 (and on Win32)?   c:=1115;   d:=1;   writeln(Round(c*d)); // gives -72967440737 32 bit version gives always 1115 as a result (and floating point math should always have extended precis

[fpc-devel] Currency * Double

2021-10-21 Thread LacaK via fpc-devel
Hi , what data type is result of multiplication of: (Currency * Double) on Win64 (and on Win32)?   c:=1115;   d:=1;   writeln(Round(c*d)); // gives -72967440737 I suppose that Currency*Double is Currency (on Win64) and result overflows MaxCurrency ...? (but then how FPC determines resu

Re: [fpc-devel] Preparing 3.2.4, call for merge request and regressions

2021-09-27 Thread LacaK via fpc-devel
Thank you! Will there be also https://wiki.freepascal.org/FPC_New_Features_3.2.4 ? (I would like add there note) L. Am 27.09.2021 um 08:47 schrieb LacaK via fpc-devel : Hello, Sorry for so long list, No problem, a list is probably much easier to use than the web interface. I cherry

Re: [fpc-devel] Preparing 3.2.4, call for merge request and regressions

2021-09-27 Thread LacaK via fpc-devel
Dňa 27.9.2021 o 14:13 Michael Van Canneyt napísal(a): On Mon, 27 Sep 2021, LacaK via fpc-devel wrote: And I get then redirect to: https://gitlab.com/lacak.sk/free-pascal-fpc-source/-/merge_requests/new?merge_request%5Bsource_branch%5D=cherry-pick-a8cd770b&merge_request%5Bsource_projec

Re: [fpc-devel] Preparing 3.2.4, call for merge request and regressions

2021-09-27 Thread LacaK via fpc-devel
Dňa 27.9.2021 o 14:03 Michael Van Canneyt napísal(a): On Mon, 27 Sep 2021, LacaK via fpc-devel wrote: Hello, commit ab86ce7e62db2add637961e3ff98a7703c86cb2c Author: lacak Date:   Mon Jul 12 12:17:03 2021 + Sorry for so long list, but I absolutely do not understand how to do

Re: [fpc-devel] Preparing 3.2.4, call for merge request and regressions

2021-09-27 Thread LacaK via fpc-devel
Hello, commit ab86ce7e62db2add637961e3ff98a7703c86cb2c Author: lacak Date:   Mon Jul 12 12:17:03 2021 + Sorry for so long list, but I absolutely do not understand how to do "cherry-pick" ... trying do it - I see there (in step 4: Pick into branch) only main branch and not fi

Re: [fpc-devel] Preparing 3.2.4, call for merge request and regressions

2021-09-27 Thread LacaK via fpc-devel
Dňa 27.9.2021 o 9:13 Michael Van Canneyt napísal(a): On Mon, 27 Sep 2021, LacaK via fpc-devel wrote: Hello, commit ab86ce7e62db2add637961e3ff98a7703c86cb2c Author: lacak Date:   Mon Jul 12 12:17:03 2021 + Sorry for so long list, but I absolutely do not understand how to do "c

Re: [fpc-devel] Preparing 3.2.4, call for merge request and regressions

2021-09-26 Thread LacaK via fpc-devel
Hello, commit d68ce429ab6d94c8ffb251304df6cd7b97e99703 Author: lacak Date:   Tue Oct 27 10:01:30 2020 + commit 15dfa2e0c9ea5071af78d6ddbaf699ae95805630 Author: lacak Date:   Tue Oct 27 11:34:22 2020 + commit a8cd770b3cdfcad4a383ac1cca651c315269cc35 Author: lacak Date:   Tue Oct 27

[fpc-devel] Bug 0037793: Root directory in unit search path (-Fu) is not found

2021-03-24 Thread LacaK via fpc-devel
Hi *, can somebody please look at https://bugs.freepascal.org/view.php?id=37793 May be that fix is fast/simple enough. TIA -Laco. ___ fpc-devel maillist - fpc-devel@lists.freepascal.org https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-deve

Re: [fpc-devel] Currency bug and FPC 3.2.0

2019-11-12 Thread LacaK
Then seems that bug reported here https://bugs.freepascal.org/view.php?id=33439 and in related reports is back again? I have reported it as a new bug: https://bugs.freepascal.org/view.php?id=36176 I'll check the currency stuff the next days, I have still some uncommitted patches regardi

Re: [fpc-devel] Currency bug and FPC 3.2.0

2019-10-13 Thread LacaK
var     c: currency; begin     c:=922337203685.47;     writeln(c:18:4,' = ', ' Trunc(c*1)=', Trunc(c*1));     c:=-92233720368547;     writeln(c:18:4,' = ', ' Trunc(c*1)=', Trunc(c*1)); end. 3.0.4 win32   922337203685.4700 =  Trunc(c*1)=9223372036854700 -92233720368547. =

Re: [fpc-devel] Currency bug and FPC 3.2.0

2019-10-11 Thread LacaK
On Fri, Oct 11, 2019 at 7:29 AM LacaK wrote: var c: currency; begin c:=922337203685.47; writeln(c:18:4,' = ', ' Trunc(c*1)=', Trunc(c*1)); c:=-92233720368547; writeln(c:18:4,' = ', ' Trunc(c*1)=', Trunc(c*1)); end.

Re: [fpc-devel] Currency bug and FPC 3.2.0

2019-10-10 Thread LacaK
(sorry here is whole program) Win64 target! (on Win32 it works as expected for me) var   c: currency; begin   c:=922337203685.47;   writeln(c:18:4,' = ', ' Trunc(c*1)=', Trunc(c*1));   c:=-92233720368547;   writeln(c:18:4,' = ', ' Trunc(c*1)=', Trunc(c*1)); end. _

Re: [fpc-devel] Currency bug and FPC 3.2.0

2019-10-10 Thread LacaK
Then FPCUpDeluxe uses different approach to build FPC compiler? Because when I test with Lazarus/FPC build from 3.2 branch bug is still there. Maybe the fix also depends on other changes that have not been merged. May be that FPCUpDeluxe uses only one build cycle ... so FPC 3.2 is build u

Re: [fpc-devel] Currency bug and FPC 3.2.0

2019-10-10 Thread LacaK
Then FPCUpDeluxe uses different approach to build FPC compiler? Because when I test with Lazarus/FPC build from 3.2 branch bug is still there. Maybe the fix also depends on other changes that have not been merged. May be that FPCUpDeluxe uses only one build cycle ... so FPC 3.2 is build usin

Re: [fpc-devel] Currency bug and FPC 3.2.0

2019-10-09 Thread LacaK
Dňa 10.10.2019 o 8:24 Jonas Maebe napísal(a): On 2019-10-10 08:03, LacaK wrote: These patches are already merget to 3.2 branch, but there is condition {$ifndef VER3_0} Am I right in assumption, that when FPC 3.2.0  compiler will be released he will be build using FPC 3.0.4 ? Yes. If yes

[fpc-devel] Currency bug and FPC 3.2.0

2019-10-09 Thread LacaK
Hi *, there was currency bug reported in https://bugs.freepascal.org/view.php?id=33439 and fixed in rev. 38555 and folloved rev. 38558 (by Florian) These patches are already merget to 3.2 branch, but there is condition {$ifndef VER3_0} Am I right in assumption, that when FPC 3.2.0  compile

[fpc-devel] Readonly Memory Stream?

2019-02-13 Thread LacaK
Hi, sometimes I have to work with static fixed buffer in memory (for example returned from external API), which I would like to behave like stream. Then I define: type TStaticMemoryStream = class(TCustomMemoryStream) end; and in code I use for example:     MS := TStaticMemoryStream.Create;    

Re: [fpc-devel] [Patch/RFC] Warnings for (in/over)complete case statements

2019-01-02 Thread LacaK
>> - If a case statement on an ordinal does not contain labels for all values of >> the ordinal, and no else statement is given, raise a new warning (W6059). >> This >> is actually defined as an error in ISO7185 and a dynamic-violation in >> IEC10206. > So now I will have to add a useless else s

Re: [fpc-devel] Free Pascal 3.0.6

2018-08-06 Thread LacaK
> > >> Are there plans to release version 3.0.6 later this year? > > No. There will probably no 3.0.x anymore. (and even if, it would > have mostly > > minor RTL fixes, no sensitive compiler fixes). > It would be nice have at least one maintenance release per year. > Also s

Re: [fpc-devel] Free Pascal 3.0.6

2018-08-06 Thread LacaK
>> Are there plans to release version 3.0.6 later this year? > No. There will probably no 3.0.x anymore. (and even if, it would have mostly > minor RTL fixes, no sensitive compiler fixes). It would be nice have at least one maintenance release per year. Also some Database related bugs can be merge

Re: [fpc-devel] MSSQL doesn't commit 2nd transaction

2018-06-18 Thread LacaK
We already do this for MySQL No AFAICS and Postgres (which also do not support multiple transactions). Yes (PostgreSQL is at this time only connector, that support this kind of "transaction as connection") L. ___ fpc-devel maillist - fpc-devel

Re: [fpc-devel] MSSQL doesn't commit 2nd transaction

2018-06-17 Thread LacaK
Is this a bug in fpc-db or is this some kind of MSSQL feature? Does it mean I cannot use multiple transactions with one MSSQL connection? AFAIK MS SQL Server does not natively supports concept of multiple simultaneous independent transactions per one connection. (AFAIK also others RDBMS do

Re: [fpc-devel] Oracle CLOB and UTF8

2017-09-06 Thread LacaK
Hi, as far as I remember I have problems (when I have implemented support for CLOBs) you describe as well. I do not have access to Oracle DB anymore so I can not fix it, worse I am not aware of easy way how to get from OCI API information about byte length (and connection character set) ...

Re: [fpc-devel] fpc-devel Digest, Vol 156, Issue 16

2017-04-26 Thread LacaK
The only alternative would be to advise *nix users to use the 3.0.0 release instead. 3.0.0 has (IMO serious) bug involving calculations with currency datatype on some platforms (Win64, Arm): http://bugs.freepascal.org/view.php?id=28748 Bart my two cents: 1) Why not call it 3.0.4? I woul

Re: [fpc-devel] Staticaly link C/C++ library (.lib) into FreePascal on Windows

2017-03-16 Thread LacaK
Besides that it does not work for me, when I add another two functions. Attached my example. I get error: .\Intel_IPP\\ippcoremt.lib(C:/commander/production/ipp201702gold/windows_ia32/.build/windows/obj/ia32/core/s/st/owncpufeatures.obj):(.text[_ownGetMaskFeatures]+0x35): undefined refere

Re: [fpc-devel] Staticaly link C/C++ library (.lib) into FreePascal on Windows

2017-03-16 Thread LacaK
Then I get: test_IPP.lpr(17,1) Error: undefined reference to `ippGetLibVersion' (I have tried also: _ippGetLibVersion, _ippGetLibVersion@0 ...) I've downloaded the IPP libs and did some tests to make sure that static linking is possible. Thank you very much for your effort! You use cdecl,

Re: [fpc-devel] Staticaly link C/C++ library (.lib) into FreePascal on Windows

2017-03-16 Thread LacaK
Dňa 16.3.2017 o 10:03 Karoly Balogh (Charlie/SGR) napísal(a): Hi, On Thu, 16 Mar 2017, LacaK wrote: Then I get another error: test_IPP.lpr(24,1) Error: Illegal COFF Magic while reading .\Intel_IPP\ippcoremt.lib Am I doing something wrong, or there is some kind of incompatibility between

Re: [fpc-devel] Staticaly link C/C++ library (.lib) into FreePascal on Windows

2017-03-16 Thread LacaK
ippcore.lib is just an import library for ippcore.dll. You should not use it for static linking. According to the Intel's site you should use the following libs for static linking: ippimt.lib ippsmt.lib ippcorelmt.lib Thank you! Now I do: {$linklib ippcoremt.lib} function ippGetLibVers

Re: [fpc-devel] Staticaly link C/C++ library (.lib) into FreePascal on Windows

2017-03-15 Thread LacaK
>> >> >> Yes, you can statically link a COFF library created by other compiler. >> >> Use objdump as explained earlier to find out the name of ippiThreshold function in the static library. It may be prefixed with "_". > > But does it works also on Windows ? (as far as I does not have "objdump

Re: [fpc-devel] Staticaly link C/C++ library (.lib) into FreePascal on Windows

2017-03-15 Thread LacaK
Dňa 15.3.2017 o 12:54 Yury Sidorov napísal(a): On 3/14/2017 4:47 PM, Ladislav Karrach wrote: Did you try this: function ippiThreshold(pSrcDst: PIpp8u; srcDstStep: int; roiSize: IppiSize; thresholdLT: Ipp8u; valueLT: Ipp8u; thresholdGT: Ipp8u; valueGT: Ipp8u): IppStatus; e

Re: [fpc-devel] Staticaly link C/C++ library (.lib) into FreePascal on Windows

2017-03-15 Thread LacaK
Error: Undefined symbol: IPP__IPPITHRESHOLD_LTVAL_8U_C1IR$PIPP8U$LONGINT$IPPISIZE$BYTE$BYTE$$IPPSTATUS test 2: put the library implementation below function declaration, eg: function _ippiThreshold_LTValGTVal_8u_C1IR(pSrcDst: PIpp8u; srcDstStep: int;

Re: [fpc-devel] Staticaly link C/C++ library (.lib) into FreePascal on Windows

2017-03-14 Thread LacaK
Dňa 14.3.2017 o 15:57 silvioprog napísal(a): On Tue, Mar 14, 2017 at 9:30 AM, LacaK <mailto:la...@zoznam.sk>> wrote: Hi, I have C/C++ librarby (".lib" for Windows and ".a" for Linux) from Intel IPP package (they distribute ".lib" and also &q

[fpc-devel] Staticaly link C/C++ library (.lib) into FreePascal on Windows

2017-03-14 Thread LacaK
Hi, I have C/C++ librarby (".lib" for Windows and ".a" for Linux) from Intel IPP package (they distribute ".lib" and also ".dll" for Windows and ".a" for Linux) Can I link in FPC (on Windows) at compile time to this ".lib" versions ? Or only possible way is link at runtime using ".dll" (and

Re: [fpc-devel] Last words about #31200 bug (for LacaK)

2017-01-09 Thread LacaK
hi in this aspect. It will be helpful to create tests for this case and report results for Delphi and FPC. -Laco. Since I can't post comment to closed bug and developer LacaK asked about "Btw how behaves Delphi in this case ? ", I think I can answer. Of course Delphi (Berlin 10.1)

Re: [fpc-devel] Bug in passing WideString parameters to dispinterface function ?

2016-10-26 Thread LacaK
FYI: Reported as bug #30792 I can simplify it by this demo program (only compileable not runable): type Tintf = dispinterface ['{05D31AA6-1306-4DA0-9AE2-A8771FF6FA94}'] function wStr(const str1: WideString; const str2: WideString): Integer; dispid 3; end; function wStr(const str1

Re: [fpc-devel] Bug in passing WideString parameters to dispinterface function ?

2016-10-25 Thread LacaK
I can simplify it by this demo program (only compileable not runable): type Tintf = dispinterface ['{05D31AA6-1306-4DA0-9AE2-A8771FF6FA94}'] function wStr(const str1: WideString; const str2: WideString): Integer; dispid 3; end; function wStr(const str1: widestring; const str2: wide

[fpc-devel] Bug in passing WideString parameters to dispinterface function ?

2016-10-24 Thread LacaK
Hi, look please at this. I have imported OCX type library which result in pascal unit with "dispinterface" defined like this: _DSamlight_client_ctrl_ocx = dispinterface ['{05D31AA6-1306-4DA0-9AE2-A8771FF6FA94}'] ... function ScChangeTextByName(const EntityName:WideString; const Text_

Re: [fpc-devel] FPC V3.0.0 LocalTimeToUniversal() error

2016-06-28 Thread LacaK
Dňa 28.6.2016 o 9:18 Michael Van Canneyt napísal(a): On Tue, 28 Jun 2016, Russ Davies wrote: Hi, My local time zone is GMT +2, and have noticed that with V3.0.0, that the LocalTimeToUniversal() function is adding the offset instead of subtracting it: uses sysutils, dateutils; var Local

Re: [fpc-devel] Improved inlining for generic specializations

2016-05-26 Thread LacaK
Thank you! Is it for FPC 3.2 only or can it be backported to 3.0 series (3.0.4 probably?) ? L. Hello together! For those that are interested: I've improved the inlining for specializations of generics so that now the bodies of specialized routines (no matter whether they are normal methods

Re: [fpc-devel] Bug #29037 StrToCurr raises exception for MinCurrency value on Win64

2016-03-30 Thread LacaK
Thank you. L. On Thu, 24 Mar 2016, LacaK wrote: Hi *, can somebody please look at bug report #29037 and attached patch there ? I am on it. Michael. ___ fpc-devel maillist - fpc-devel@lists.freepascal.org http://lists.freepascal.org/cgi-bin

[fpc-devel] Bug #29037 StrToCurr raises exception for MinCurrency value on Win64

2016-03-23 Thread LacaK
Hi *, can somebody please look at bug report #29037 and attached patch there ? Thanks -Laco. ___ fpc-devel maillist - fpc-devel@lists.freepascal.org http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-devel

Re: [fpc-devel] Bug 29760 on FPC 3.0 Win64

2016-03-19 Thread LacaK
If you find it useful add it please to "tests/test" and/or replace "tw28748.pp" (as it is subset of this) Or give mee feedback what should be changed, added or so. tests/test/cg/taddcurr.pp contains already most of those tests in a systematic way. this test was added after FPC 3.0 release ?

Re: [fpc-devel] Bug 29760 on FPC 3.0 Win64

2016-03-11 Thread LacaK
Dňa 11.3.2016 o 14:19 Jonas Maebe napísal(a): LacaK wrote: Updated file. If you find it useful add it please to "tests/test" and/or replace "tw28748.pp" (as it is subset of this) Or give mee feedback what should be changed, added or so. tests/test/cg/taddcurr.pp contains a

Re: [fpc-devel] Bug 29760 on FPC 3.0 Win64

2016-03-11 Thread LacaK
> So wouldn't be better have less bigger test units for example "tcurrency" which will do complex testing for for example all math.operations with currency data type ? > (as opposed to have lot of fragments in lot of anonymous files) > Feel free to write such a test. See attached file. Is

Re: [fpc-devel] Bug 29760 on FPC 3.0 Win64

2016-03-10 Thread LacaK
Dňa 11.3.2016 o 8:07 Ondrej Pokorny napísal(a): On 11.03.2016 7:58, LacaK wrote: Then that indeed applies for Win64 as well. Maybe time to start thinking about 3.0.2, then. This is not a minor bug. IMO it is serious bug and users should be informed, that upgrading to FPC 3.0 (on some

Re: [fpc-devel] Bug 29760 on FPC 3.0 Win64

2016-03-10 Thread LacaK
> So wouldn't be better have less bigger test units for example "tcurrency" which will do complex testing for for example all math.operations with currency data type ? > (as opposed to have lot of fragments in lot of anonymous files) > Feel free to write such a test. See attached file. Is th

Re: [fpc-devel] Bug 29760 on FPC 3.0 Win64

2016-03-10 Thread LacaK
Then that indeed applies for Win64 as well. Maybe time to start thinking about 3.0.2, then. This is not a minor bug. IMO it is serious bug and users should be informed, that upgrading to FPC 3.0 (on some platforms) can leads to serious problems when currency and double are involved. (but

Re: [fpc-devel] Bug 29760 on FPC 3.0 Win64

2016-03-10 Thread LacaK
> > > Are there tests for compiler ? > Is it possible, that such bug is not noticed during preparation of release ? > (or is it such special case, that this was not covered by existing test?) There are many and they are run every night for quite some platforms. It could however be that this

Re: [fpc-devel] Bug 29760 on FPC 3.0 Win64

2016-03-10 Thread LacaK
This happens only on Win64 with FPC 3.0 Can somebody please check and confirm ? compiled with official Lazarus 1.6 (SVN revision as displayed in the about box: 51630) console output of your program is: 1.234500E+02* 1.E+002= 1.234500E+08

[fpc-devel] Bug 29760 on FPC 3.0 Win64

2016-03-10 Thread LacaK
Hi, investigating bug #29760 I reduced bug to: var c: currency; d: double; begin c := 123.45; d := 100; writeln(c, '*', d, '=', c*d); // result of multiply is wrong = 12345 end. This happens only on Win64 with FPC 3.0 Can somebody please check and confirm ? Thanks -Laco. __

Re: [fpc-devel] MinCurrency

2015-11-18 Thread LacaK
Because for example on Win64/x86_64 target, there is not defined FPC_HAS_TYPE_EXTENDED, so I get "truncated values" FPC_HAS_TYPE_EXTENDED is undefined on most platforms. It's only a very small minority that has it, but of course those are the most used ones. And secondly why is MinCurrenc

Re: [fpc-devel] MinCurrency

2015-11-18 Thread LacaK
There is also related bug report: http://bugs.freepascal.org/view.php?id=28737 And look at part of code in rtl/objpas/sysutils/sysstrh.inc: 41 {$if defined(FPC_HAS_TYPE_EXTENDED) or defined(FPC_HAS_TYPE_FLOAT128)} 42 MinCurrency: Currency = -922337203685477.5807; 43 MaxCur

Re: [fpc-devel] MinCurrency

2015-11-18 Thread LacaK
Hi, When I run this on Win32 (FPC 2.6.4): == var c: currency; e: integer; begin c:=0; Val('-922337203685477.5808',c,e); Writeln('c=',c,' , e=',e); Writeln(StrToCurr('-922337203685477,5808')); end. ===

[fpc-devel] MinCurrency

2015-11-18 Thread LacaK
Hi, When I run this on Win32 (FPC 2.6.4): == var c: currency; e: integer; begin c:=0; Val('-922337203685477.5808',c,e); Writeln('c=',c,' , e=',e); Writeln(StrToCurr('-922337203685477,5808')); end. =

Re: [fpc-devel] FPC 3.0.0-rc1 release

2015-08-25 Thread LacaK
News and changes related to this release are described in whatsnew.txt. Free Pascal 3.0.0 is currently available for the following platforms: - Linux-i386 - Linux-x86_64 (amd64) - Linux-powerpc - Linux-sparc - Linux-ARM - Win32-i386 (Win95/98/Me/XP/2000/2003/Vista/7 and WinNT) Here is mention

Re: [fpc-devel] StrPLCopy with MaxLen=0

2015-05-14 Thread LacaK
Dňa 14.5.2015 o 14:15 Michael Van Canneyt napísal(a): On Thu, 14 May 2015, LacaK wrote: Hi, When I run this simple program in Delphi: program bug_StrPLCopy; {$APPTYPE CONSOLE} uses SysUtils; var Buf: array[0..10] of Char; begin Buf[0

[fpc-devel] StrPLCopy with MaxLen=0

2015-05-14 Thread LacaK
Hi, When I run this simple program in Delphi: program bug_StrPLCopy; {$APPTYPE CONSOLE} uses SysUtils; var Buf: array[0..10] of Char; begin Buf[0] := 'A'; writeln(ord(Buf[0])); StrPLCopy(Buf, '', 0); writeln(ord(Buf[0])); readln; end

[fpc-devel] Bug 0018702: Third call to a nested function variable returning a string gives unpredictable results

2015-03-11 Thread LacaK
Hi *, only for my interest: is there chance, that this bug will be solved ? ;-) Or is there any deep problem which makes solution hard and probalbly will be never solved. Thanks -Laco. ___ fpc-devel maillist - fpc-devel@lists.freepascal.org http://li

Re: [fpc-devel] MS SQL tests: fix for string settings & invalid dates

2014-11-18 Thread LacaK
Hi, try set PacketRecords=-1 in your TSQLQuery -Laco. Hello, I am struggeling with Lazarus and a connection to MSSQL server 2005. I get the data, but when i change a fieldvalue, then apply updates, I get the error 20019 like you listed: http://lists.freepascal.org/fpc-devel/2014-March/03

Re: [fpc-devel] Method for write string into TStream

2014-07-22 Thread LacaK
Recap: Way 1: Introduce new method(s), leave Write/ReadAnsiString as is. 1.1 procedure WriteRawString(const s: string); function ReadRawString(Len: integer) 1.2 (ready for future when string will be UnicodeString) procedure WriteString(const s: string); function ReadString(Len: integer) 1.3

Re: [fpc-devel] Method for write string into TStream

2014-07-21 Thread LacaK
Marco van de Voort wrote / napísal(a): In our previous episode, Michael Van Canneyt said: Nothing stops you though from writing a class helper that adds a WriteString method to TStream. Yes, I can create also own descendant etc. ... but I am asking for general solution, which will b

Re: [fpc-devel] Method for write string into TStream

2014-07-21 Thread LacaK
Sven Barth wrote / napísal(a): Am 21.07.2014 10:29 schrieb "LacaK" <mailto:la...@zoznam.sk>>: > > Hi, > When I work with f.e. TFileStream I need often write string into stream. > Now I use: > Stream1.WriteBuffer(s[1], length(s)); > > I think, that

[fpc-devel] Method for write string into TStream

2014-07-21 Thread LacaK
Hi, When I work with f.e. TFileStream I need often write string into stream. Now I use: Stream1.WriteBuffer(s[1], length(s)); I think, that for convenience it will be useful having something like: procedure TStream.WriteString(const s: string); begin WriteBuffer(s[1], length(s)*sizeof(char);

Re: [fpc-devel] [fpc-pascal] overloading function StrPLCopy

2014-05-07 Thread LacaK
n, I reply also to fpc-devel list (excuse me, if it is off-topic), because I would like understand wat is going on. I attach also simple test program. I use FPC 2.6.4 but I think, that same happens also with fresh 2.7.1 Thanks -Laco. On 02.05.2014 07:45, LacaK wrote: Hi, I am trying understa

Re: [fpc-devel] [fpc-pascal] overloading function

2014-05-06 Thread LacaK
Hi again, I reply also to fpc-devel list (excuse me, if it is off-topic), because I would like understand wat is going on. I attach also simple test program. I use FPC 2.6.4 but I think, that same happens also with fresh 2.7.1 Thanks -Laco. On 02.05.2014 07:45, LacaK wrote: Hi, I am trying

Re: [fpc-devel] odbcconn.pas

2014-03-14 Thread LacaK
trols have nothing with it ;-) L. Thanks. Nathan T. Wild On Mar 13, 2014 9:57 AM, "LacaK" <mailto:la...@zoznam.sk>> wrote: Nathan Wild wrote / napísal(a): I have been transitioning my work over from Delphi to Lazarus. For the most part it h

Re: [fpc-devel] odbcconn.pas

2014-03-13 Thread LacaK
thing appears to work fine, but as soon as the dataset refreshes my changes disappear. I can write to the same tables using INSERT, DELETE and UPDATE queries without issue. Do you use TSQLQuery.ApplyUpdates followed by TSQLTransaction.Commit or CommitRetaining ? -

Re: [fpc-devel] Are global variables guaranteed to be zero?

2012-11-29 Thread LacaK
Alexander Klenin wrote / napísal(a): On Wed, Nov 28, 2012 at 2:29 PM, Jonas Maebe wrote: Will global variables and static global arrays be always initialized to zero? Yes. Then I suggest to amend the first paragraph of http://www.freepascal.org/docs-html/ref/refse22.html whic

[fpc-devel] Question about backporting rev.20734

2012-09-26 Thread LacaK
Hi, There is bug http://bugs.freepascal.org/view.php?id=21091 which was fixed in 2.7.1 in rev.20734 And there are waiting unmerged revisions http://www.stack.nl/~marcov/mergelogs26/compiler.html Will these be merged ? If not all, can this one be backported ? Thanks -Laco. ___

Re: [fpc-devel] New functions for time zone

2012-07-11 Thread LacaK
Michael Van Canneyt wrote / napísal(a): On Wed, 11 Jul 2012, LacaK wrote: Hi *, I noticed, that there was just added new functions for supporting TZ in rev. 21865 and 21866 Now function GetLocalTimeOffset: Integer returns offset *in minutes* and later in functions LocalTimeToUniversal and

[fpc-devel] New functions for time zone

2012-07-11 Thread LacaK
Hi *, I noticed, that there was just added new functions for supporting TZ in rev. 21865 and 21866 Now function GetLocalTimeOffset: Integer returns offset *in minutes* and later in functions LocalTimeToUniversal and UniversalTimeToLocal are used commands to transform it to TDateTime using Encod

Re: [fpc-devel] Breaking change in FPC 2.6.1

2012-05-03 Thread LacaK
Policy wise, I merge revisions for utils, packages and the higher level units of RTL like sysutils and classes if they are a couple of weeks old (3-4 weeks), but I usually leave big changes a bit longer. ok it is answer to my question ;-) So we can expect backporting after approx. month S

Re: [fpc-devel] Breaking change in FPC 2.6.1

2012-05-03 Thread LacaK
Sven Barth wrote / napísal(a): Am 03.05.2012 08:39, schrieb LacaK: Hi, I have question indirectly related to this subject ;-) If there are fixed some bugs in trunk (2.7.1 now) can we expect that they will be backported in some of next stable release 2.6 (2.6.2, 2.6.3)? If yes , are there any

Re: [fpc-devel] Breaking change in FPC 2.6.1

2012-05-02 Thread LacaK
Hi, I have question indirectly related to this subject ;-) If there are fixed some bugs in trunk (2.7.1 now) can we expect that they will be backported in some of next stable release 2.6 (2.6.2, 2.6.3)? If yes , are there any rules which bugs are / can be / will be backported ? (Now I am not spe

Re: [fpc-devel] RFC: sqlDB extend TStatementType

2012-04-19 Thread LacaK
This case is handled in PrepareStatement phase. In case of IBConnection is StatementType re-mapped to stExecProcedure and in case of PQConnection is re-maped to stSelect. That should obviously be changed to return the same type :-) Yes any rules will be welcomed. But because this chan

Re: [fpc-devel] RFC: sqlDB extend TStatementType

2012-04-19 Thread LacaK
In fact, this is not quite correct. Insert into table (a,b,c) returning values (x,y,z) can also be done with an Open, yet it will probably get stInsert as type. This case is handled in PrepareStatement phase. In case of IBConnection is StatementType re-mapped to stExecProcedure and in case o

[fpc-devel] RFC: sqlDB extend TStatementType

2012-04-18 Thread LacaK
Hi , now we have in sqlDB.pp: TStatementType = (stNone, stSelect, stInsert, stUpdate, stDelete, stDDL, stGetSegment, stPutSegment, stExecProcedure, stStartTrans, stCommit, stRollback, stSelectForUpd); Statement type is initialy determined by parsing SQL.Text in function TCustomSQLQuery.SQ

Re: [fpc-devel] TMSSQLConnection - sqlDB component for accessing MS SQL Server

2012-03-23 Thread LacaK
Michael, I updated patch for fcl-db test suite. See: http://bugs.freepascal.org/view.php?id=17303 Would you be so glad and will you apply them please ? Done, rev. 20572. As I wrote yesterday, I uploaded last patch for fcl-db test suite to http://bugs.freepascal.org/view.php?id=17303 From

Re: [fpc-devel] TMSSQLConnection - sqlDB component for accessing MS SQL Server

2012-03-22 Thread LacaK
Michael, I updated patch for fcl-db test suite. See: http://bugs.freepascal.org/view.php?id=17303 Would you be so glad and will you apply them please ? Done, rev. 20572. Great! Sorry for the delay. It's Okay ;-) Now I have only 2 things: 1. question about packages/fcl-db/fpmake.pp ...

Re: [fpc-devel] TMSSQLConnection - sqlDB component for accessing MS SQL Server

2012-03-22 Thread LacaK
And will you apply also diffs to fcl-db tests ? So we can run complete test suite ... I will do so later today. Michael, I updated patch for fcl-db test suite. See: http://bugs.freepascal.org/view.php?id=17303 Would you be so glad and will you apply them please ? TIA -Laco. __

Re: [fpc-devel] TMSSQLConnection - sqlDB component for accessing MS SQL Server

2012-03-21 Thread LacaK
Yes, of course... you're right. ;-)) If I find some problems I can post in bugtracker or still early to do this? IMO, You can post them also here. Once Michael commits changes to fcl-db test suite I will run complete test suite and if any problems appears I will resolve them ASAP. (

Re: [fpc-devel] TMSSQLConnection - sqlDB component for accessing MS SQL Server

2012-03-21 Thread LacaK
Then I have minor comments: - in packages/dblib/fpmake.pp at line 23: Author put please instead of "Lacak2" "Ladislav Karrach" (as in dblib.pp header) - in packages/fcl-db/src/sqldb/mssql/makefile.fpc at line 2: change IBConnection to MSSQLConnection ;-) Done. Rev. 20540 and 20541. Now I fo

Re: [fpc-devel] TMSSQLConnection - sqlDB component for accessing MS SQL Server

2012-03-20 Thread LacaK
No. Anyway, I change the colum names (id,name to col1, col2) The error is: "Cannot insert the value NULL into column 'col', table tempdb.dbo.#t..." This error has nothing to do with FPC or SQLDB. Your SQL statement is trying to insert NULL in a required field. No Michael, se

Re: [fpc-devel] TMSSQLConnection - sqlDB component for accessing MS SQL Server

2012-03-19 Thread LacaK
Hi Michael, splitting files into two packages was unavoidable? Yes. As you can see for the other databases, we always keep the header imports separate from the components. Standard time-tested practice. Hm, although I am not happy with this, I can do nothing with it ;-) Then I have minor

Re: [fpc-devel] TMSSQLConnection - sqlDB component for accessing MS SQL Server

2012-03-19 Thread LacaK
michael.vancann...@wisa.be wrote / napísal(a): On Thu, 15 Mar 2012, Marcos Douglas wrote: On Mon, Feb 27, 2012 at 9:33 AM, Marcos Douglas wrote: On Mon, Feb 27, 2012 at 5:08 AM, wrote: On Mon, 27 Feb 2012, LacaK wrote: Hi, let me share same basic info/ideas about TMSSQLConnection

Re: [fpc-devel] Copy function and dynamic array

2012-02-29 Thread LacaK
Sergei Gorelkin wrote / napísal(a): 29.02.2012 18:21, LacaK пишет: It cannot be fixed for Delphi mode only because a single copy of RTL is used for all compiler modes. The current situation where out of range 'length' parameter is adjusted but 'index' out of range raises

Re: [fpc-devel] Copy function and dynamic array

2012-02-29 Thread LacaK
Sergei Gorelkin wrote / napísal(a): 29.02.2012 17:05, Sven Barth пишет: It's not a bug in Delphi if they write it in the documentation. Whether we should copy this behavior is the question (maybe only in Delphi mode). It cannot be fixed for Delphi mode only because a single copy of RTL is

[fpc-devel] Copy function and dynamic array

2012-02-29 Thread LacaK
Hi *, I found small incompatibility between Delphi and FPC. This code: var a,b: array of byte; begin setlength(a,2); b:=copy(a,2,1); //<--HERE "Range check error" in FPC, Delphi returns empty array end; Delphi documentation says: "If Index is larger than the length of S, *Copy* returns

Re: [fpc-devel] TMSSQLConnection - sqlDB component for accessing MS SQL Server

2012-02-27 Thread LacaK
stand it as FPC is open for new stuff ;-) 6. if there is any problem please let us know. If you decide to include it into fcl-db then you can place files for example into src/sqldb/mssql folder ;-) TIA -Laco. Hi, As you can see here http://bugs.freepascal.org/view.php?id=17303 the developer kno

Re: [fpc-devel] Segmentation fault for Firebird exception inside thread

2011-10-25 Thread LacaK
May be that is is (or not ;-)) related to http://bugs.freepascal.org/view.php?id=17360 -Laco. Hello, this is my first post and I hope this is the correct list for my question. I'm getting a segmentation fault ('violación de segmento' in spanish) when running the code from below on a Linux 64-b

[fpc-devel] Re: cvarutil: convert variant array of bytes into ansistring ?

2011-10-24 Thread LacaK
Hi Sergei, Thank you for your reply. As it is out of my comfort zone, I leave it to up to you (if or when you implement this) TIA -Laco. It has to be done in a different and more complex way, by using VariantChangeTypeEx to convert the variant(array) to varOleString type, then converting latter

[fpc-devel] cvarutil: convert variant array of bytes into ansistring ?

2011-10-21 Thread LacaK
Hi, I am now working on fcl-db TBinaryField, which has Value: Variant property. As I understand documentation, this variant should be returned as variant array of bytes. Later when are assigning values of fields into params also this variant array is copied (into TParam). But when I want/nee

Re: [fpc-devel] Trunk does not compile on Linux x86-64

2011-10-21 Thread LacaK
Are there available Lazarus snapshots, which are build using current trunk ? If I download Lazarus with FPC 2.7.1 ( for example: ftp://www.hu.freepascal.org/pub/lazarus/snapshots/Lazarus-0.9.31-33000-fpc-2.7.1-20111021-win32.exe ) it seems, that there are not current source files from trunk, but

Re: [fpc-devel] Major problem with Move and Array of Int64

2011-09-26 Thread LacaK
Martin Schreiber wrote / napísal(a): On Friday 23 September 2011 14.00:07 Sergei Gorelkin wrote: Recently strings behavior was changed, they are now codepage-aware. The compiler can now implicitly convert strings from one encoding to another. To handle non-string data, you should use RawByte

Re: [fpc-devel] Major problem with Move and Array of Int64

2011-09-22 Thread LacaK
And which SQL DBConnector do you use ? TMySQL51Connection ? my app maps this particular field as SQL_LONGVARBINARY or TODBCConnection ? L. ___ fpc-devel maillist - fpc-devel@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc

Re: [fpc-devel] Major problem with Move and Array of Int64

2011-09-22 Thread LacaK
Did anyone recently do work on BLOB features to MySQL 5.1 connector? there was commited only this http://svn.freepascal.org/cgi-bin/viewvc.cgi/trunk/packages/fcl-db/src/sqldb/mysql/mysqlconn.inc?r1=17417&r2=18951 which introduced mapping from MySQL TEXT datatype (character LOB) to TMemoFiel

[fpc-devel] FmtBCD bug + test ?

2011-09-20 Thread LacaK
Hi, there is patch for BCDDivide http://bugs.freepascal.org/view.php?id=19636 I am thinking about write test for this bug (and may be in the future also for other FmtBCD related bugs ... if some will be revealed) Do you think, that it is good idea (is it necessary?)? If yes, where put such test

Re: [fpc-devel] TField.Validate in FPC 2.6

2011-09-18 Thread LacaK
Joost van der Sluis wrote / napísal(a): On Sat, 2011-09-17 at 10:56 +0200, Michael Van Canneyt wrote: On Sat, 17 Sep 2011, Martin Schreiber wrote: Hi, TField.SetData() in fixes_2_6 calls TField.Validate(). 2.4.4 does not, trunk neither. Strange that 2.6 does this if trunk does

  1   2   >