Lajos Juhász
Members-
Content Count
855 -
Joined
-
Last visited
-
Days Won
11
Everything posted by Lajos Juhász
-
Systemic failing of Embarcadero development and support or am I just paranoid ?
Lajos Juhász replied to CyberPeter's topic in General Help
In the quality portal you get response while they validate your report and try to prove it's how the product works and not a bug. After that unfortunately there is no response at all (not even in which version and time frame when the fix will be shipped). Usually you will get no response about the issue at all. Do I think this is the right way? Of course not. As sometimes it's critical to us to know how to communicate with our clients as we have also to plan and communicate to clients when we can ship the fixed product. For some unknown reason who ever decides the future of the product cuts off the communications with the developers (there was a brief period when even on this forum you was able to get honest answers). Instead of a clear communication we can get only promotion materials how everything is nice and shiny (and that's true when you try hello world applications, but as soon as you try to do something more complication you will discover bugs). For me the latest bad sign is that they abandoned the idea that we should have a roadmap. Now you can only read the future of the products only from your coffee mug and that's not a fun thing to do when my managers asks me what is the next step. -
You should also check in ComPort1RxChar how many bytes the comport reads from the buffer.
-
In your code you never check for length of the buffer. When reading the com port it's not guaranteed that you receive all the data in one read. You've to check whenever you received everything and after that you can try to process it. Edit. In this case most probably the length of the result is less than 21 bytes and result1 will be an empty string. Try: if result1<>'' then A := StrToInt ('$' + Result1) else begin ShowMessage('Result1='''''); end;
-
The memory required for the stream doesn't have to be the same as for internal representation for the data. The only way to firure out is to query the memory manager before and after the operation.
-
16th during the webinar we should all ask the question whenever the future of Delphi includes some kind of online documentation or not. I believe that will be the perfect place to ask!
-
DocWiki.Embarcadero.com does Russian Roulette.
Lajos Juhász replied to A.M. Hoornweg's topic in General Help
Maybe it's a cloud thing where they don't have direct access. I mean they should have a backup copy of the database and could set up a new server very quickly. Also it's possibly that they have used all the money allocated for hardware and will have to wait for the new business year to allocate money to rebuild the infrastructure. -
DocWiki.Embarcadero.com does Russian Roulette.
Lajos Juhász replied to A.M. Hoornweg's topic in General Help
In this case Idera/Embarcadero has no problems. The website used for new customers is working fine. It's just the docwiki that is down that is used only by customers that already paid. Why would they worry? They can get away with no roadmap, no timeframe when the critical errors will be fixed in Delphi. We that already using Delphi should know to work without a proper documentation. -
DocWiki.Embarcadero.com does Russian Roulette.
Lajos Juhász replied to A.M. Hoornweg's topic in General Help
There is no need to panic. It's out for about 2 two weeks. There was a recent webinar from Ranorex that modern IT companies now have a monthly schedule for release. So before we all panic we have just to wait another 2 weeks and see whenever that time frame is used in Idera or not. -
I am sure it has System.AnsiStrings unit. The easiest way is to use StrToInt('$1289ABEF').
-
delete record in delphi with fdqury when this value of record
Lajos Juhász replied to ABDELLAH GADi's topic in Databases
-
In that case it's not true anymore check it with: select itemno, count(CustNo) from Vendor where Preferred='Yes' group by itemno having count(CustNo)>1
-
The PK for Vendor is ItemNo, Custno you cannot make it a unique value only by joining it with fields itemno and preferred. You could use min, max or avg functions.
-
SQL servers. Parametar cannot be used with like or matches.
-
Debugging Issues in D11 64Bit with Packages
Lajos Juhász replied to MathewV's topic in Delphi IDE and APIs
I know about problems when trying to debug application built with packages. There are multiple open tickets and now we just have to wait for a solution. -
It doesn't working for me. For https://docwiki.embarcadero.com/RADStudio/Alexandria/en/ returns: Sorry! This site is experiencing technical difficulties. Try waiting a few minutes and reloading. (Cannot access the database) Backtrace: #0 /var/www/html/shared/BaseWiki31/includes/libs/rdbms/loadbalancer/LoadBalancer.php(1134): Wikimedia\Rdbms\Database->reportConnectionError('Connection refu...') #1 /var/www/html/shared/BaseWiki31/includes/libs/rdbms/loadbalancer/LoadBalancer.php(749): Wikimedia\Rdbms\LoadBalancer->reportConnectionError() #2 /var/www/html/shared/BaseWiki31/includes/GlobalFunctions.php(2801): Wikimedia\Rdbms\LoadBalancer->getConnection(0, Array, false) #3 /var/www/html/shared/BaseWiki31/includes/cache/localisation/LCStoreDB.php(45): wfGetDB(-1) #4 /var/www/html/shared/BaseWiki31/includes/cache/localisation/LocalisationCache.php(412): LCStoreDB->get('en', 'deps') #5 /var/www/html/shared/BaseWiki31/includes/cache/localisation/LocalisationCache.php(458): LocalisationCache->isExpired('en') #6 /var/www/html/shared/BaseWiki31/includes/cache/localisation/LocalisationCache.php(334): LocalisationCache->initLanguage('en') #7 /var/www/html/shared/BaseWiki31/includes/cache/localisation/LocalisationCache.php(371): LocalisationCache->loadItem('en', 'magicWords') #8 /var/www/html/shared/BaseWiki31/includes/cache/localisation/LocalisationCache.php(292): LocalisationCache->loadSubitem('en', 'magicWords', 'tree') #9 /var/www/html/shared/BaseWiki31/languages/Language.php(3177): LocalisationCache->getSubitem('en', 'magicWords', 'tree') #10 /var/www/html/shared/BaseWiki31/includes/MagicWord.php(352): Language->getMagic(Object(MagicWord)) #11 /var/www/html/shared/BaseWiki31/includes/MagicWord.php(280): MagicWord->load('tree') #12 /var/www/html/shared/BaseWiki31/includes/parser/Parser.php(4848): MagicWord::get('tree') #13 /var/www/html/shared/BaseWiki31/extensions/TreeAndMenu/TreeAndMenu_body.php(24): Parser->setFunctionHook('tree', Array) #14 /var/www/html/shared/BaseWiki31/includes/Setup.php(948): TreeAndMenu->setup() #15 /var/www/html/shared/BaseWiki31/includes/WebStart.php(88): require_once('/var/www/html/s...') #16 /var/www/html/shared/BaseWiki31/index.php(39): require('/var/www/html/s...') #17 {main}
-
dzObjectInspectorFix for Delphi 2007
Lajos Juhász replied to dummzeuch's topic in Tips / Blogs / Tutorials / Videos
Must be one of your plugins never noticed that problem. -
Showing a warning form to some users
Lajos Juhász replied to Henry Olive's topic in RTL and Delphi Object Pascal
Depending on the database you can try to use TFDEventAlerter (the docwiki at embarcadero at the moment I cannot check for supported databases). -
Is the list correct in your example the first numbers are delimited with semicolon while the last is with comma. The easiest way to type this for me is: function ListContains(const PList: string; PNumber: integer): boolean; var sl: TStringList; begin sl:=TStringList.Create; try sl.Delimiter:=';'; sl.DelimitedText:=StringReplace(PList, ',', ';', []); result:=sl.IndexOf(IntToStr(PNumber))<>-1; finally sl.Free; end; end;
-
You can handle OnMessage for the Applicaton or simple use the OnScroll event of the component.
-
There is Form7.pb1.Position (a bad design to call directly from another unit as you cannot be sure that the procedure was called from that object) in the code however that's all we can see (besides the problems that the code full of Application.ProcessMessages also that should be avoided).
-
Just sent type OnDataAvailable
Lajos Juhász replied to Lindawb's topic in ICS - Internet Component Suite
You've to create a protocol eg. a prefix that will say the following x bytes is a string or a binary data so the reciever can convert the received bytes back. -
When will IDE Editor support more fonts?
Lajos Juhász replied to amit's topic in Delphi IDE and APIs
Even some Unicode arrow characters are not supported by the IDE :(. -
It's very simple take a look at TImage.SetBitmap. The TImage object will assign the bitmap to the internal bitmap and will not take the ownership over of the parameter. You've to write: var lbm: TBitmap; begin if OpenDialog1.Execute then begin Image1.Bitmap.LoadFromFile(OpenDialog1.FileName); lbm:=ConvertToGrayscale(image1.Bitmap); try Image2.Bitmap:=lbm; finally lbm.Free; end; end; end;
-
Maybe this thread can help (I have no experience with thermal printers).
-
Presednce of operations...
Lajos Juhász replied to Mark-'s topic in Algorithms, Data Structures and Class Design
I've also tested: finalValue:=2*index + ResultIsFive(index); the result 9. I guess this is one of the reasons why you should not write procedures with side effects. It can make a mission impossible to find the them.