From lazarus at kluug.net Tue Aug 2 09:58:20 2016 From: lazarus at kluug.net (Ondrej Pokorny) Date: Tue, 2 Aug 2016 09:58:20 +0200 Subject: [Lazarus] Shift returns empty set in MouseWheel events In-Reply-To: <57993201.2000404@gmail.com> References: <20160727143611.67E34ADA@atlas.cz> <510f41f8-9c3f-221e-b1f9-7d9e80799ec7@kluug.net> <57993201.2000404@gmail.com> Message-ID: <1dd80077-9068-597f-5796-8b89c4c84f8b@kluug.net> On 28.07.2016 0:13, Wolf wrote: > I enclose a little program where you can see the effects of > pressing/rolling mouse keys. Vojtěch Čihák is correct in saying that > OnMouseDown/Up can be used to distinguish whether the mousewheel is > rolled when pressed or not. But then, why is Shift part of the > procedure's parameters if it has no place in the OnMouseWheel events? > So there is a workaround. > > By the way, the proper test is *if* ssMiddle *in* Shift *then* . . . > since Shift is a set of values, not an enumerated value, meaning it > can contain more than one value. Press a mouse key and or > to see what I mean. > What is your view? Is this a bug that ought to be fixed, or is it not? > My vote is: > "If Shift in OnMouseWheelxxx events is supposed to return an empty > set, remove the parameter from the handling procedures. If you say > "keep it" then ensure the parameter does carry a value. It is a bug. Delphi carries correct values in the Shift paramter in OnMouseWheelXXX events. Ondrej -------------- next part -------------- An HTML attachment was scrubbed... URL: From wv99999 at gmail.com Tue Aug 2 23:16:05 2016 From: wv99999 at gmail.com (Wolf) Date: Wed, 3 Aug 2016 09:16:05 +1200 Subject: [Lazarus] Shift returns empty set in MouseWheel events In-Reply-To: <1dd80077-9068-597f-5796-8b89c4c84f8b@kluug.net> References: <20160727143611.67E34ADA@atlas.cz> <510f41f8-9c3f-221e-b1f9-7d9e80799ec7@kluug.net> <57993201.2000404@gmail.com> <1dd80077-9068-597f-5796-8b89c4c84f8b@kluug.net> Message-ID: <57A10D95.20300@gmail.com> Can you tell me in which unit I might look for the bug to originate? And, once I have fixed it, what procedures should I follow to have the patch accepted? wolf On 02/08/16 19:58, Ondrej Pokorny wrote: > On 28.07.2016 0:13, Wolf wrote: >> I enclose a little program where you can see the effects of >> pressing/rolling mouse keys. Vojtěch Čihák is correct in saying that >> OnMouseDown/Up can be used to distinguish whether the mousewheel is >> rolled when pressed or not. But then, why is Shift part of the >> procedure's parameters if it has no place in the OnMouseWheel events? >> So there is a workaround. >> >> By the way, the proper test is *if* ssMiddle *in* Shift *then* . . . >> since Shift is a set of values, not an enumerated value, meaning it >> can contain more than one value. Press a mouse key and or >> to see what I mean. >> What is your view? Is this a bug that ought to be fixed, or is it >> not? My vote is: >> "If Shift in OnMouseWheelxxx events is supposed to return an empty >> set, remove the parameter from the handling procedures. If you say >> "keep it" then ensure the parameter does carry a value. > > It is a bug. Delphi carries correct values in the Shift paramter in > OnMouseWheelXXX events. > > Ondrej > > -------------- next part -------------- An HTML attachment was scrubbed... URL: From lazarus at kluug.net Wed Aug 3 04:45:13 2016 From: lazarus at kluug.net (Ondrej Pokorny) Date: Wed, 3 Aug 2016 04:45:13 +0200 Subject: [Lazarus] Shift returns empty set in MouseWheel events In-Reply-To: <57A10D95.20300@gmail.com> References: <20160727143611.67E34ADA@atlas.cz> <510f41f8-9c3f-221e-b1f9-7d9e80799ec7@kluug.net> <57993201.2000404@gmail.com> <1dd80077-9068-597f-5796-8b89c4c84f8b@kluug.net> <57A10D95.20300@gmail.com> Message-ID: <17ac96f2-81ac-8b8a-79a2-2ac24ef538f5@kluug.net> On 02.08.2016 23:16, Wolf wrote: > Can you tell me in which unit I might look for the bug to originate? Study how it's done for OnMouseMove and do the same. > And, once I have fixed it, what procedures should I follow to have the > patch accepted? http://wiki.freepascal.org/Creating_A_Patch http://wiki.freepascal.org/How_do_I_create_a_bug_report Ondrej From aradeonas at operamail.com Wed Aug 3 14:49:49 2016 From: aradeonas at operamail.com (Aradeonas) Date: Wed, 03 Aug 2016 05:49:49 -0700 Subject: [Lazarus] JCF format message Message-ID: <1470228589.2647113.684792201.4FD36C60@webmail.messagingengine.com> Hi, Is there any option to off JCF message every time you hit format shortcut? It always asks about do you want to format? I always use it for my codes while writing and this messages seems a bit useless ;) Regards, Ara -- http://www.fastmail.com - Email service worth paying for. Try it for free -------------- next part -------------- An HTML attachment was scrubbed... URL: From dec12 at avidsoft.com.hk Thu Aug 4 07:44:30 2016 From: dec12 at avidsoft.com.hk (Dennis) Date: Thu, 4 Aug 2016 13:44:30 +0800 Subject: [Lazarus] How to customize the field labels of TTIPropertyGrid Message-ID: <57A2D63E.8060205@avidsoft.com.hk> I have been using TTIPropertyGrid and it is great for providing a user interface for users to edit various objects. However, the grid display the object field names in english. I need to provide a chinese interface for users so I need to somehow override the field names displayed but I am at a loss when look at the source code. the inheritance tree is deep and I failed to identify where I can insert a custom translation function like: translate(TheOldFieldName, TheTargetLanguage : String) : String can anyone give me any hint? Dennis -------------- next part -------------- An HTML attachment was scrubbed... URL: From l.rame at griensu.com Thu Aug 4 12:59:14 2016 From: l.rame at griensu.com (=?UTF-8?Q?Leonardo_M._Ram=c3=a9?=) Date: Thu, 4 Aug 2016 07:59:14 -0300 Subject: [Lazarus] Cannot save file to NFS mounted path Message-ID: Hi, I'm using TFileStream to save files. It works without issues when writing to my filesystem, but hangs (does not return) when the path is a mounted NFS one. I must add the user has write permissions on the mounted path, in fact before posting this I've tried creating a text file without using TFileStream and it worked without an issue, so I assume the problem is with TFileStream: // This works: AssignFile(f, '/mnt/data_vultr/documents/test.txt'); {$I-} Rewrite(f); {$I+} if IOResult =0 then begin System.WriteLn(f, 'aaaa'); System.WriteLn(f, 'bbb'); end; System.Close(f); // this doesn't work lFileStream := TFileStream.Create(lFile, fmCreate); AMemStream.Position := 0; lFileStream.CopyFrom(AMemStream,AMemStream.Size); The program is a CGI running on Ubuntu Server 14.04 x64. Lazarus 1.7 compiled from trunk on 2016-05-13 (SVN 52282M) FPC 3.1.1 Regards, -- Leonardo M. Ramé Medical IT - Griensu S.A. Av. Colón 636 - Piso 8 Of. A X5000EPT -- Córdoba Tel.: +54(351)4246924 +54(351)4247788 +54(351)4247979 int. 19 Cel.: +54 9 (011) 40871877 From aaa5500 at ya.ru Thu Aug 4 13:22:33 2016 From: aaa5500 at ya.ru (Alex) Date: Thu, 04 Aug 2016 14:22:33 +0300 Subject: [Lazarus] Cannot save file to NFS mounted path In-Reply-To: References: Message-ID: <156791470309753@web12g.yandex.ru> An HTML attachment was scrubbed... URL: From gaborboros at yahoo.com Thu Aug 4 13:27:14 2016 From: gaborboros at yahoo.com (Gabor Boros) Date: Thu, 4 Aug 2016 13:27:14 +0200 Subject: [Lazarus] TPrintDialog - Why the difference? Message-ID: <2472c85f-fe9d-8100-9e0a-b8939dd81b83@yahoo.com> Hi All, TPrintDialog looks differently and the language differs also when called from a Lazarus project than showed from an other application. Why? Is it a bug? Gábor -------------- next part -------------- A non-text attachment was scrubbed... Name: PrintDialog_Lazarus.jpg Type: image/jpeg Size: 17725 bytes Desc: not available URL: -------------- next part -------------- A non-text attachment was scrubbed... Name: PrintDialog_KWrite.jpg Type: image/jpeg Size: 34178 bytes Desc: not available URL: From jmlandmesser at gmx.de Thu Aug 4 15:15:03 2016 From: jmlandmesser at gmx.de (Landmesser John) Date: Thu, 4 Aug 2016 15:15:03 +0200 Subject: [Lazarus] TStringList alternatives? Message-ID: <57A33FD7.7020605@gmx.de> i use TStringList to store about 100.000 values. That's ok, but i would like to know if there are better ways to do that? I have Values from a Oracle Database with Row-Id's like 2016070502523396 HTCSFVRY My StringList is sorted, to do a quick IndexOf() I would need add and IndexOf() What about VirtualTree? TList ... ? advices are welcome :-)) From xrfang at gmail.com Thu Aug 4 15:24:48 2016 From: xrfang at gmail.com (Xiangrong Fang) Date: Thu, 4 Aug 2016 21:24:48 +0800 Subject: [Lazarus] TStringList alternatives? In-Reply-To: <57A33FD7.7020605@gmx.de> References: <57A33FD7.7020605@gmx.de> Message-ID: Have a look at my generic TVector implementation, written from scratch, based on dynamic array: https://github.com/xrfang/fpcollection/blob/master/src/units/vector.pas Regards. On Thu, Aug 4, 2016 at 9:15 PM, Landmesser John wrote: > i use TStringList to store about 100.000 values. > > That's ok, but i would like to know if there are better ways to do that? > > I have Values from a Oracle Database with Row-Id's like > 2016070502523396 HTCSFVRY > > My StringList is sorted, to do a quick IndexOf() > > I would need add and IndexOf() > > What about VirtualTree? TList ... ? > > advices are welcome :-)) > > > -- > _______________________________________________ > Lazarus mailing list > Lazarus at lists.lazarus-ide.org > http://lists.lazarus-ide.org/listinfo/lazarus > -------------- next part -------------- An HTML attachment was scrubbed... URL: From nc-gaertnma at netcologne.de Thu Aug 4 16:57:16 2016 From: nc-gaertnma at netcologne.de (Mattias Gaertner) Date: Thu, 4 Aug 2016 16:57:16 +0200 Subject: [Lazarus] Cannot save file to NFS mounted path In-Reply-To: <156791470309753@web12g.yandex.ru> References: <156791470309753@web12g.yandex.ru> Message-ID: <20160804165716.5a2c649a@limapholos.matflo.wg> On Thu, 04 Aug 2016 14:22:33 +0300 Alex wrote: > Hi > This is almost issue of mine: http://mantis.freepascal.org/view.php?id=30135 > Closed as wont fix. No, NFS returns normal file size information. I work with Lazarus on NFS without problem. Mattias From nc-gaertnma at netcologne.de Thu Aug 4 17:03:18 2016 From: nc-gaertnma at netcologne.de (Mattias Gaertner) Date: Thu, 4 Aug 2016 17:03:18 +0200 Subject: [Lazarus] Cannot save file to NFS mounted path In-Reply-To: References: Message-ID: <20160804170318.42c456a6@limapholos.matflo.wg> On Thu, 4 Aug 2016 07:59:14 -0300 Leonardo M. Ramé wrote: >[...] > mounted NFS one. > > I must add the user has write permissions on the mounted path, in fact > before posting this I've tried creating a text file without using > TFileStream and it worked without an issue, so I assume the problem is > with TFileStream: > > // This works: > > AssignFile(f, '/mnt/data_vultr/documents/test.txt'); > {$I-} > Rewrite(f); > {$I+} > if IOResult =0 then > begin > System.WriteLn(f, 'aaaa'); > System.WriteLn(f, 'bbb'); > end; > System.Close(f); > > > // this doesn't work > > lFileStream := TFileStream.Create(lFile, fmCreate); Try lFileStream := TFileStream.Create(lFile, fmCreate or fmShareDenyNone); NFS often does not support locking. > AMemStream.Position := 0; > lFileStream.CopyFrom(AMemStream,AMemStream.Size); Mattias From l.rame at griensu.com Thu Aug 4 19:04:20 2016 From: l.rame at griensu.com (=?UTF-8?Q?Leonardo_M._Ram=c3=a9?=) Date: Thu, 4 Aug 2016 14:04:20 -0300 Subject: [Lazarus] Cannot save file to NFS mounted path In-Reply-To: <20160804170318.42c456a6@limapholos.matflo.wg> References: <20160804170318.42c456a6@limapholos.matflo.wg> Message-ID: El 04/08/16 a las 12:03, Mattias Gaertner escribió: > On Thu, 4 Aug 2016 07:59:14 -0300 > Leonardo M. Ramé wrote: > >> [...] >> mounted NFS one. >> >> I must add the user has write permissions on the mounted path, in fact >> before posting this I've tried creating a text file without using >> TFileStream and it worked without an issue, so I assume the problem is >> with TFileStream: >> >> // This works: >> >> AssignFile(f, '/mnt/data_vultr/documents/test.txt'); >> {$I-} >> Rewrite(f); >> {$I+} >> if IOResult =0 then >> begin >> System.WriteLn(f, 'aaaa'); >> System.WriteLn(f, 'bbb'); >> end; >> System.Close(f); >> >> >> // this doesn't work >> >> lFileStream := TFileStream.Create(lFile, fmCreate); > Try > lFileStream := TFileStream.Create(lFile, fmCreate or fmShareDenyNone); > > NFS often does not support locking. > >> AMemStream.Position := 0; >> lFileStream.CopyFrom(AMemStream,AMemStream.Size); I'll try that, meanwhile it worked using this: var lBinaryFile: file; ... lFile := '/path/to/mounted/nfs/file.bin'; AssignFile(lBinaryFile, lFile); {$I-} Rewrite(lBinaryFile); {$I+} if IOResult = 0 then begin BlockWrite(lBinaryFile, AMemStream.Memory, AMemStream.Size); System.Close(lBinaryFile); end; Regards, -- Leonardo M. Ramé http://leonardorame.blogspot.com From alfred at consulab.nl Sat Aug 6 10:39:18 2016 From: alfred at consulab.nl (Alfred) Date: Sat, 06 Aug 2016 08:39:18 +0000 Subject: [Lazarus] Compliments Message-ID: Hello to all, I do not know if this is the right place, but I would like to express my gratitude and respect for the Lazarus and FPC developers and all other contributing volunteers. Main reason for this message is the fact that my GUI / mORMot data collection systems run flawless 24/7 for many months/years now on various RPi , BBB and Odroid-C2 !! And that latest FPC trunk has so many very useful added features. It is so nice to be able to develop and debug on Windows, followed by an easy cross-compile towards ARM V6/V7 and aarch64. I do not know of any other development environment that is able to do so with such an ease. So, thanks again to you all ! With respect, Alfred. -------------- next part -------------- An HTML attachment was scrubbed... URL: From JuuS at mykolab.ch Sat Aug 6 11:03:52 2016 From: JuuS at mykolab.ch (JuuS) Date: Sat, 6 Aug 2016 11:03:52 +0200 Subject: [Lazarus] Compliments In-Reply-To: References: Message-ID: <6033dd78-fcb8-0fed-5327-ff5533cbc688@mykolab.ch> On 08/06/2016 10:39 AM, Alfred wrote: > So, thanks again to you all ! > With respect, Alfred. > > +2 From bo.berglund at gmail.com Sat Aug 6 15:28:19 2016 From: bo.berglund at gmail.com (Bo Berglund) Date: Sat, 06 Aug 2016 15:28:19 +0200 Subject: [Lazarus] Compliments References: Message-ID: <24pbqbhv7qv5unoc5b9ouum1946bmu3qc1@4ax.com> On Sat, 06 Aug 2016 08:39:18 +0000, Alfred wrote: >It is so nice to be able to develop and debug on Windows, followed by an >easy cross-compile towards ARM V6/V7 and aarch64. I would be interested in knowing how this is done. I use FPC/Lazarus on an RPi3 as development platform via TightVNC to be able to do it on my Win7 PC. It has flaws in the editor keyboard area so I have installed FPC/Lazarus also on the Win7 machine to write the code, but for testing I have copied over the sources to RPi and built it there. Tedious... In other cases where I use only generic non-Pi stuff like Indy and such I have moved the entire project to Windows and can both build and execute the programs there, then copy sources over to the RPi and build there, doable but maybe overkill if the build could be done on Windows. So can I use RPi specific stuff in my programs (like GPIO access) and still develop on Windows, compile the binary and just transfer that to the RPi to run it there? It would be marvellous if it could be done. -- Bo Berglund Developer in Sweden From alfred at consulab.nl Sat Aug 6 17:19:01 2016 From: alfred at consulab.nl (alfred) Date: Sat, 06 Aug 2016 17:19:01 +0200 Subject: [Lazarus] Compliments Message-ID: Here you go: http://synopse.info/forum/viewtopic.php?pid=21005#p21005 Hope it works for you as it does for me ! -------------- next part -------------- An HTML attachment was scrubbed... URL: From alfred at consulab.nl Sat Aug 6 17:19:01 2016 From: alfred at consulab.nl (alfred) Date: Sat, 06 Aug 2016 17:19:01 +0200 Subject: [Lazarus] Compliments Message-ID: Here you go: http://synopse.info/forum/viewtopic.php?pid=21005#p21005 Hope it works for you as it does for me ! -------------- next part -------------- An HTML attachment was scrubbed... URL: From bo.berglund at gmail.com Sat Aug 6 21:04:26 2016 From: bo.berglund at gmail.com (Bo Berglund) Date: Sat, 06 Aug 2016 21:04:26 +0200 Subject: [Lazarus] Compliments References: Message-ID: On Sat, 06 Aug 2016 17:19:01 +0200, alfred wrote: >Here you go: > >http://synopse.info/forum/viewtopic.php?pid=21005#p21005 > >Hope it works for you as it does for me ! Thanks a bunch! Will test it when I get back home after the week-end. -- Bo Berglund Developer in Sweden From dezlov at gmail.com Sun Aug 7 01:34:50 2016 From: dezlov at gmail.com (Denis Kozlov) Date: Sun, 7 Aug 2016 00:34:50 +0100 Subject: [Lazarus] TStringList alternatives? In-Reply-To: <57A33FD7.7020605@gmx.de> References: <57A33FD7.7020605@gmx.de> Message-ID: <1259f5b4-0abf-2480-3b1d-f57eea9e7fdd@gmail.com> On 04/08/2016 14:15, Landmesser John wrote: > i use TStringList to store about 100.000 values. > > That's ok, but i would like to know if there are better ways to do that? You can try TFPStringHashTable and TDictionary/THashMap generics. Maybe they will perform faster than TStringList. Denis From leledumbo_cool at yahoo.co.id Sun Aug 7 09:55:40 2016 From: leledumbo_cool at yahoo.co.id (leledumbo) Date: Sun, 7 Aug 2016 00:55:40 -0700 (MST) Subject: [Lazarus] TStringList alternatives? In-Reply-To: <57A33FD7.7020605@gmx.de> References: <57A33FD7.7020605@gmx.de> Message-ID: <1470556540208-4049268.post@n3.nabble.com> > I would need add and IndexOf() Fast insertion, fast retrieval, definitely a hash table / map. Follow Denis suggestion. I personally prefers fcl-stl's ghashmap (THashmap), but any other similar classes will do. -- View this message in context: http://free-pascal-lazarus.989080.n3.nabble.com/Lazarus-TStringList-alternatives-tp4049257p4049268.html Sent from the Free Pascal - Lazarus mailing list archive at Nabble.com. From vojtech.cihak at atlas.cz Sun Aug 7 13:18:17 2016 From: vojtech.cihak at atlas.cz (=?utf-8?q?Vojt=C4=9Bch_=C4=8Cih=C3=A1k?=) Date: Sun, 07 Aug 2016 13:18:17 +0200 Subject: [Lazarus] =?utf-8?q?TPrintDialog_-_Why_the_difference=3F?= In-Reply-To: 00000000610c0001f58400e8502f References: 00000000610c0001f58400e8502f Message-ID: <20160807131817.3555FC32@atlas.cz> Hi,   KWrite is KDE application while Lazarus is Qt4 application. Also, KWrite is probably rewritten to Plasma5 so it uses Qt5 which may have modernized dialogs (it depends on your distro).   V. ______________________________________________________________ > Od: Gabor Boros > Komu: Lazarus at lists.lazarus-ide.org > Datum: 04.08.2016 13:27 > Předmět: [Lazarus] TPrintDialog - Why the difference? > Hi All, TPrintDialog looks differently and the language differs also when called from a Lazarus project than showed from an other application. Why? Is it a bug? Gábor ---------- -- _______________________________________________ Lazarus mailing list Lazarus at lists.lazarus-ide.org http://lists.lazarus-ide.org/listinfo/lazarus -------------- next part -------------- An HTML attachment was scrubbed... URL: From bartjunk64 at gmail.com Sun Aug 7 21:01:22 2016 From: bartjunk64 at gmail.com (Bart) Date: Sun, 7 Aug 2016 21:01:22 +0200 Subject: [Lazarus] Testing needed for bugfix Message-ID: Hi, I have tried to fix a longstanding bug w.r.t. the behaviour of the dialog and the application when setting CanClose to false in the OncanClose event of TOpenDialog. See: http://bugs.freepascal.org/view.php?id=21147 for a description of the bug. I need this fix tested before it can be safely merged into fixex_1_6. I have attached a sample project. For testing you neet Lazarus trunk >= r52787 ! To test: Unzip the attachment Build the sample project. Leave "OpenDialog1:TOpenDialog" seected in the radiogroup. Click the "Execute" button. Expected behaviour: If you cancel the dialog NO OnCanClose will be executed (this should be platform independant). If you select a file that has an extension '.txt' (Note: case-sensitive, I'm lazy) (default filter is '*.txt') and press OK, the OnCanClose event (TForm1.OpenDialog1CanClose) is fired and the dialog closes as expected. If you select a file with a different extension than '.txt' the OncaClose event is fires, but the dialog should not close. Once you have closed the dialog (either by cancelling or selecting a .txt file), the applications should respond normally and you should be able to close the application. I would exect that this now is OK under Windows. I need testing under XP and Vista or heigher please. Linux or MacOSX users still may hevae problems though. Kind regards, Bart -------------- next part -------------- A non-text attachment was scrubbed... Name: dlg.zip Type: application/zip Size: 67623 bytes Desc: not available URL: From hdpc at talktalk.net Sun Aug 7 22:47:36 2016 From: hdpc at talktalk.net (Howard Page-Clark) Date: Sun, 7 Aug 2016 21:47:36 +0100 Subject: [Lazarus] Testing needed for bugfix In-Reply-To: References: Message-ID: On 07/08/16 20:01, Bart wrote: > Hi, > > I have tried to fix a longstanding bug w.r.t. the behaviour of the > dialog and the application when setting CanClose to false in the > OncanClose event of TOpenDialog. ... > I would exect that this now is OK under Windows. > I need testing under XP and Vista or heigher please. > > Linux or MacOSX users still may hevae problems though. Under Linux Mint 64-bit the dialog opens and closes as you say it should for a .txt selection. For a non-.txt selection it is impossible to close the dialog either by Cancel button or via the bordericon X close button. The dialog can only be dismissed by selecting a .txt file again. Also I could get the project to compile only by commenting out uxtheme in the uses clause (I don't know if that skews the outcome in any way). Howard From bartjunk64 at gmail.com Sun Aug 7 23:12:50 2016 From: bartjunk64 at gmail.com (Bart) Date: Sun, 7 Aug 2016 23:12:50 +0200 Subject: [Lazarus] Testing needed for bugfix In-Reply-To: References: Message-ID: On 8/7/16, Howard Page-Clark wrote: > Under Linux Mint 64-bit the dialog opens and closes as you say it should > for a .txt selection. OK, fine. B.t.w: QT or GTK2? > For a non-.txt selection it is impossible to close the dialog either by > Cancel button or via the bordericon X close button. The dialog can only > be dismissed by selecting a .txt file again. Thanks for testing. What about the OnCanClose event? Does it get fired if you cancel the dialog? It should not (see TFileDialog.DoCanClose). If OnCanClose fires, can you uncomment the debugln() in TFileDialog.DoCanClose, so we can see what the value is of UserChoice at that point? If you build the app without my fix, can you close it in that scenario? (Since I changed nothing in GTK2 or QT WS code, I expect the same behaviour) > Also I could get the project to compile only by commenting out uxtheme > in the uses clause (I don't know if that skews the outcome in any way). Sorry, you can leave that out, it was only used in the forms OnCreate at some point (but now commented out) when I was testing other problems. Bart From bo.berglund at gmail.com Mon Aug 8 00:11:39 2016 From: bo.berglund at gmail.com (Bo Berglund) Date: Mon, 08 Aug 2016 00:11:39 +0200 Subject: [Lazarus] Compliments References: Message-ID: On Sat, 06 Aug 2016 17:19:01 +0200, alfred wrote: >Here you go: > >http://synopse.info/forum/viewtopic.php?pid=21005#p21005 > >Hope it works for you as it does for me ! Trying to find a way to install into D:\Devel\NewPascal or similar instead of the mandatory C:\NewPascal... Not keen on putting stuff on C:\ which rightfully instead should be on the data drive. Or at least in C:\Programs where all of my other development tools live. -- Bo Berglund Developer in Sweden From wkitty42 at windstream.net Mon Aug 8 00:18:49 2016 From: wkitty42 at windstream.net (wkitty42 at windstream.net) Date: Sun, 7 Aug 2016 18:18:49 -0400 Subject: [Lazarus] Compliments In-Reply-To: References: Message-ID: <1f0e7091-cc3a-904e-e57c-6cd8777ca125@windstream.net> On 08/07/2016 06:11 PM, Bo Berglund wrote: > On Sat, 06 Aug 2016 17:19:01 +0200, alfred wrote: > >> Here you go: >> >> http://synopse.info/forum/viewtopic.php?pid=21005#p21005 >> >> Hope it works for you as it does for me ! > > Trying to find a way to install into D:\Devel\NewPascal or similar > instead of the mandatory C:\NewPascal... > > Not keen on putting stuff on C:\ which rightfully instead should be on > the data drive. Or at least in C:\Programs where all of my other > development tools live. i thought he was just talking about using FPCUP to get and set up everything for cross-platform compiling... the message alfred pointed to contains a link to https://github.com/LongDirtyAnimAlf/fpctrunkrtti/releases which i didn't fully read until just now... due to that forum visually shortening URLs and knowing that LongDirtyAnimAlf is handling FPCUP now, i only saw the part up to "fpc" and assumed it was pointing to fpcup... maybe some clarification is necessary as to what, exactly, alfred was pointing to?? -- NOTE: No off-list assistance is given without prior approval. *Please keep mailing list traffic on the list* unless private contact is specifically requested and granted. From hdpc at talktalk.net Mon Aug 8 00:52:13 2016 From: hdpc at talktalk.net (Howard Page-Clark) Date: Sun, 7 Aug 2016 23:52:13 +0100 Subject: [Lazarus] Testing needed for bugfix In-Reply-To: References: Message-ID: <22ac2d1b-375f-34c3-1d24-b4c8320c8016@talktalk.net> On 07/08/16 22:12, Bart wrote: > B.t.w: QT or GTK2? Same results for both GTK2 and QT > What about the OnCanClose event? > Does it get fired if you cancel the dialog? It fires for both GTK2 and QT when cancelled. > It should not (see TFileDialog.DoCanClose). > If OnCanClose fires, can you uncomment the debugln() in > TFileDialog.DoCanClose, so we can see what the value is of UserChoice > at that point? Ah, Perhaps I have an incorrect revision (although it is dated and built today), since TFileDialog has no DoCanClose override, and no UserChoice variable. I'll rebuild from a download tomorrow, and test again. Howard From bo.berglund at gmail.com Mon Aug 8 08:01:57 2016 From: bo.berglund at gmail.com (Bo Berglund) Date: Mon, 08 Aug 2016 08:01:57 +0200 Subject: [Lazarus] Can .compiled files be safely removed? Message-ID: I am trying to test a fpc+lazarus file package for cross compilation on Windows (see thread "Compliments") and the downloaded set contains a lot of *.compiled files. These contain unwanted absolute paths to the original location of internal files and I want to remove these .compiled files. Is that possible without breaking the functionality of the system? I looked at this wiki page for info: http://wiki.freepascal.org/File_extensions Here the .compiled files are mentioned in connection to subversion or git as: "These files are regenerated by the IDE or by a build so do not need to be stored" Does this mean that they are not used by FPC/Lazarus once the build (of what?) has been completed and can safely be removed also in the project dir tree? The files in question are located below these directories: .\lazarus\components .\lazarus\doceditor .\lazarus\docs .\lazarus\lcl\units .\lazarus\packager .\lazarus\tools .\lazarus\units So they are all Lazarus files. -- Bo Berglund Developer in Sweden From alfred at consulab.nl Mon Aug 8 08:41:00 2016 From: alfred at consulab.nl (Alfred) Date: Mon, 08 Aug 2016 06:41:00 +0000 Subject: [Lazarus] Compliments In-Reply-To: Message-ID: Copy the complete C:\NewPascal\cross directory to D:\Devel\NewPascal\cross Adjust --installdir switch inside the fpclazup scripts to D:\Devel\NewPascal, and run the scripts you need. In this way, you will get a very fresh FPC/Lazarus combi in the directory you want. From hdpc at talktalk.net Mon Aug 8 13:03:52 2016 From: hdpc at talktalk.net (Howard Page-Clark) Date: Mon, 8 Aug 2016 12:03:52 +0100 Subject: [Lazarus] Testing needed for bugfix In-Reply-To: <22ac2d1b-375f-34c3-1d24-b4c8320c8016@talktalk.net> References: <22ac2d1b-375f-34c3-1d24-b4c8320c8016@talktalk.net> Message-ID: <11f02a96-991e-6e86-68e1-38aa8cc8b46d@talktalk.net> On 07/08/16 23:52, Howard Page-Clark wrote: > On 07/08/16 22:12, Bart wrote: > >> B.t.w: QT or GTK2? > > Same results for both GTK2 and QT > >> What about the OnCanClose event? Re-testing with most recent Lazarus build today. QT and GTK2 differ slightly. If a .txt file is selected they behave identically. In both widgetsets the opendialog closes using either the Open or Cancel button, and with Open UserChoice is 1, and with Cancel UserChoice is 2. In QT if a non .txt file is selected both the Open (UserChoice=1) and Cancel (UserChoice=2) buttons close the dialog. However, when the main test app is closed it then exits giving a SIGSEGV at AAE60 on my system (Mint 64-bit). With GTK2, if a non .txt file is selected the dialog does not close either with the Open or Cancel button or the close bordericon, but OnCanClose fires and UserChoice has the values 1 (Open) or 2 (Cancel). A lock file appears named .lock.sysNameOfSelectedFile#. The only way to get the dialog to close is to select a .txt file. The main test app then closes without any error. Howard From bartjunk64 at gmail.com Mon Aug 8 13:18:05 2016 From: bartjunk64 at gmail.com (Bart) Date: Mon, 8 Aug 2016 13:18:05 +0200 Subject: [Lazarus] Testing needed for bugfix In-Reply-To: <11f02a96-991e-6e86-68e1-38aa8cc8b46d@talktalk.net> References: <22ac2d1b-375f-34c3-1d24-b4c8320c8016@talktalk.net> <11f02a96-991e-6e86-68e1-38aa8cc8b46d@talktalk.net> Message-ID: On 8/8/16, Howard Page-Clark wrote: > Re-testing with most recent Lazarus build today. > QT and GTK2 differ slightly. > If a .txt file is selected they behave identically. > In both widgetsets the opendialog closes using either the Open or Cancel > button, and with Open UserChoice is 1, and with Cancel UserChoice is 2. Note: the debugln in DoCanClose should write mrOK or mrCancel. > In QT if a non .txt file is selected both the Open (UserChoice=1) and > Cancel (UserChoice=2) buttons close the dialog. However, when the main > test app is closed it then exits giving a SIGSEGV at AAE60 on my system > (Mint 64-bit). That sucks, this is like Win32 did. > > With GTK2, if a non .txt file is selected the dialog does not close > either with the Open or Cancel button or the close bordericon, but > OnCanClose fires and UserChoice has the values 1 (Open) or 2 (Cancel). > A lock file appears named .lock.sysNameOfSelectedFile#. > The only way to get the dialog to close is to select a .txt file. The > main test app then closes without any error. This suggest that not closing the dialog does not depend on the value that DoCanClose retruns (it should set CanClose to TRUE if UserChoice <> mrOK, see TFileDialog.DoCanClose). I just found out that similar issues exist for TColorDialog in win32. Also TCommonDialog should not implement OnClose event, it is incompatible with Delphi, where this event is introduced in TOpenDialog. Again, thanks for testing. Bart PS Your mail keeps up ending in my Spam folder (I'm using GMail for this list). From dcorning at ecentral.com Mon Aug 8 17:18:02 2016 From: dcorning at ecentral.com (Dale Corning) Date: Mon, 8 Aug 2016 09:18:02 -0600 Subject: [Lazarus] Google API's from Lazarus Message-ID: <4535A514E8584F9FAD23EB27FAEAB71F@Cornings> I am trying to Compile the example Calendardemo.lpi application that came with my version of Lazarus. Lazarus version 1.6 FPC 3.0.0 SVN 51630. I have added the Laz_synapse 0.0 package but the build can not find any of the following components. googlebase, googleservice, googleclient, googlecalendar Where can I obtain these components and how do I go about implementing them? Thanks in advance Dale Corning -------------- next part -------------- An HTML attachment was scrubbed... URL: From mailinglists at geldenhuys.co.uk Mon Aug 8 18:18:38 2016 From: mailinglists at geldenhuys.co.uk (Graeme Geldenhuys) Date: Mon, 8 Aug 2016 17:18:38 +0100 Subject: [Lazarus] Can .compiled files be safely removed? In-Reply-To: References: Message-ID: On 2016-08-08 07:01, Bo Berglund wrote: > Here the .compiled files are mentioned in connection to subversion or > git as: > "These files are regenerated by the IDE or by a build so do not need > to be stored" Indeed, you can safely delete those files. I have a Git Ignore setting that makes sure those never end up in my code repositories. Regards, Graeme -- fpGUI Toolkit - a cross-platform GUI toolkit using Free Pascal http://fpgui.sourceforge.net/ My public PGP key: http://tinyurl.com/graeme-pgp From bo.berglund at gmail.com Mon Aug 8 23:50:22 2016 From: bo.berglund at gmail.com (Bo Berglund) Date: Mon, 08 Aug 2016 23:50:22 +0200 Subject: [Lazarus] Can .compiled files be safely removed? References: Message-ID: On Mon, 8 Aug 2016 17:18:38 +0100, Graeme Geldenhuys wrote: >On 2016-08-08 07:01, Bo Berglund wrote: >> Here the .compiled files are mentioned in connection to subversion or >> git as: >> "These files are regenerated by the IDE or by a build so do not need >> to be stored" > >Indeed, you can safely delete those files. I have a Git Ignore setting >that makes sure those never end up in my code repositories. > Good, then are they needed in any other way than for the system to create and use during builds? If so is there a switch to tell Lazarus to not keep them after the fact? -- Bo Berglund Developer in Sweden From mailinglists at geldenhuys.co.uk Tue Aug 9 01:02:05 2016 From: mailinglists at geldenhuys.co.uk (Graeme Geldenhuys) Date: Tue, 9 Aug 2016 00:02:05 +0100 Subject: [Lazarus] Can .compiled files be safely removed? In-Reply-To: References: Message-ID: <98a69311-f15e-8d82-b279-9e167df3a983@geldenhuys.co.uk> On 2016-08-08 22:50, Bo Berglund wrote: > Good, > then are they needed in any other way than for the system to create > and use during builds? I don't actually know what that file is for. There is a build timestamp in there, so maybe Lazarus IDE uses that to detect if it should recompile a project or package... I honestly don't know. > If so is there a switch to tell Lazarus to not keep them after the > fact? I don't know of such a setting. I normally define a Unit Output path and a separate Target Path (where executable ends up), so the *.compiled file ends up with the *.ppu and *.o files in a separate directory to the generated executable. That way it doesn't bother me too much. Regards, Graeme -- fpGUI Toolkit - a cross-platform GUI toolkit using Free Pascal http://fpgui.sourceforge.net/ My public PGP key: http://tinyurl.com/graeme-pgp From nc-gaertnma at netcologne.de Tue Aug 9 01:07:01 2016 From: nc-gaertnma at netcologne.de (Mattias Gaertner) Date: Tue, 9 Aug 2016 01:07:01 +0200 (CEST) Subject: [Lazarus] Can .compiled files be safely removed? In-Reply-To: References: Message-ID: <783480070.15313.1470697621888@comcenter.netcologne.de> >[...] > > then are they needed in any other way than for the system to create > > and use during builds? The IDE uses them to determine if a rebuild (all) is needed. If it is missing on next compile, the IDE assumes a rebuild is needed. This means you don't need to store them in a source only repository (e.g. svn, git). If you distribute binary files (e.g. .ppu files) you should provide them. There is a platform independent version of the .compiled files. See the Makefile.compiled files. Mattias From nc-gaertnma at netcologne.de Tue Aug 9 01:10:13 2016 From: nc-gaertnma at netcologne.de (Mattias Gaertner) Date: Tue, 9 Aug 2016 01:10:13 +0200 (CEST) Subject: [Lazarus] Can .compiled files be safely removed? In-Reply-To: <98a69311-f15e-8d82-b279-9e167df3a983@geldenhuys.co.uk> References: <98a69311-f15e-8d82-b279-9e167df3a983@geldenhuys.co.uk> Message-ID: <1716122731.15315.1470697813574@comcenter.netcologne.de> >[...] > I don't know of such a setting. I normally define a Unit Output path and > a separate Target Path (where executable ends up), so the *.compiled > file ends up with the *.ppu and *.o files in a separate directory to the > generated executable. That way it doesn't bother me too much. That is the right place, because the .compiled files basically extend the .ppu files. Mattias From dec12 at avidsoft.com.hk Tue Aug 9 13:27:02 2016 From: dec12 at avidsoft.com.hk (Dennis) Date: Tue, 9 Aug 2016 19:27:02 +0800 Subject: [Lazarus] Compliments In-Reply-To: References: Message-ID: <57A9BE06.4010806@avidsoft.com.hk> alfred wrote: > Here you go: > > http://synopse.info/forum/viewtopic.php?pid=21005#p21005 > > Hope it works for you as it does for me ! > > Alfred, I followed this link which points me to https://github.com/LongDirtyAnimAlf/fpc … i/releases which in turn, told me to download https://github.com/LongDirtyAnimAlf/fpctrunkrtti/releases/download/1/FPCLazBaseWin32.rar and https://github.com/LongDirtyAnimAlf/fpctrunkrtti/releases/download/1/CrossFPCAndroidARM.rar I did and install Lazarus and fpc under c:\NewPascal. Compiling some example projects to win32 worked but when I change the Project Options-> Config and target Target OS(-T) to linux Target CPU family (-P) to arm Target processor (-Cp) to (default) for the few projects I tried, all had "Error: Error while linking". No more details of the error is given. please help. I want to cross compile from win32 to raspbian on raspberry Pi 3. p.s. I am running the IDE on windows 10 (64 bit) Dennis -------------- next part -------------- An HTML attachment was scrubbed... URL: From alfred at consulab.nl Tue Aug 9 13:33:07 2016 From: alfred at consulab.nl (Alfred) Date: Tue, 09 Aug 2016 11:33:07 +0000 Subject: [Lazarus] Compliments In-Reply-To: <57A9BE06.4010806@avidsoft.com.hk> Message-ID: @Dennis: You have downloaded the setup for Android ARM. But you are compiling for Linux ARM. https://github.com/LongDirtyAnimAlf/fpctrunkrtti/releases/download/1/CrossFPCLinuxARM.rar -------------- next part -------------- An HTML attachment was scrubbed... URL: From jmlandmesser at gmx.de Tue Aug 9 15:15:49 2016 From: jmlandmesser at gmx.de (John Landmesser) Date: Tue, 9 Aug 2016 15:15:49 +0200 Subject: [Lazarus] Cannot open Windows Form on Linux Message-ID: i would like to know what is wrong with that project: Developed on win32, still editing fine there, i can't open it since some time on Linux: These messages appear: executed: john1 at siductionbox:~/lazarus$ ./lazarus /media/sda1/PROJEKTE/Lazarus/Faks_Meldung/FAKS_Meldung.lpi Messages: > Hint: (lazarus) [TMainIDE.ParseCmdLineOptions] > PrimaryConfigPath="/home/john1/.lazarus" > Hint: (lazarus) [TMainIDE.ParseCmdLineOptions] > SecondaryConfigPath="/etc/lazarus" > Hint: (lazarus) [TBuildManager.SetBuildTarget] Old=x86_64-linux-gtk2 > New=x86_64-linux-gtk2 FPC=True LCL=False > TObjectInspectorDlg.FillPersistentComboBox: Updating ComboBox with > components > TObjectInspectorDlg.FillPersistentComboBox: Updating ComboBox with > components > TComponentTreeView.SetSelection: Updating component node values. > > *(lazarus:11615): Pango-CRITICAL **: > pango_layout_get_font_description: assertion 'PANGO_IS_LAYOUT > (layout)' failed* System: Lazarus 1.7 r52780 FPC 3.0.0 x86_64-linux-gtk 2 if i open the form from a different project i get: > > Invalid floating point operation. > > Press OK to ignore and risk data corruption. > Press Abort to kill the program. Linux-version: Debian Sid CPU~Dual core Pentium E5200 (-MCP-) speed/max~1600/2500 MHz Kernel~4.7.0-towo.1-siduction-amd64 x86_64 Up~51 min Mem~1339.7/3948.2MB HDD~160.0GB(47.1% used) Procs~193 Client~Shell inxi~2.3.0 -------------- next part -------------- An HTML attachment was scrubbed... URL: From skalogryz.lists at gmail.com Tue Aug 9 15:16:03 2016 From: skalogryz.lists at gmail.com (Dmitry Boyarintsev) Date: Tue, 9 Aug 2016 09:16:03 -0400 Subject: [Lazarus] Editor Popup menu Search Identfier Message-ID: Hello, Is it possible to customize IDE's editor popup menu? It seems like the contents of the popup became dynamic. Some times there's "Search Identifier" option at the top of the menu and some times there's not. I can't really understand the rule of when this option is added, but I'd like it not to be there at all. (or be at the bottom). thanks, Dmitry -------------- next part -------------- An HTML attachment was scrubbed... URL: From dec12 at avidsoft.com.hk Tue Aug 9 17:32:29 2016 From: dec12 at avidsoft.com.hk (Dennis) Date: Tue, 9 Aug 2016 23:32:29 +0800 Subject: [Lazarus] Compliments In-Reply-To: References: Message-ID: <57A9F78D.80609@avidsoft.com.hk> Alfred wrote: > @Dennis: > You have downloaded the setup for Android ARM. > But you are compiling for Linux ARM. > https://github.com/LongDirtyAnimAlf/fpctrunkrtti/releases/download/1/CrossFPCLinuxARM.rar My mistake. I pasted the wrong link. I actually downloaded the correct LinuxARM.rar and got that error :-( Dennis -------------- next part -------------- An HTML attachment was scrubbed... URL: From alfred at consulab.nl Tue Aug 9 21:01:00 2016 From: alfred at consulab.nl (Alfred) Date: Tue, 09 Aug 2016 19:01:00 +0000 Subject: [Lazarus] Compliments In-Reply-To: <57A9BE06.4010806@avidsoft.com.hk> Message-ID: @Dennis I am sorry, but I cannot reproduce your problem. I did a fresh install, and all (including cross) runs out-of-the-box ! However, do you know that you do have to add the following into your lpr-file ? program MyCrossProg; {$mode objfpc}{$H+} {$ifdef Linux} {$ifdef FPC_CROSSCOMPILING} {$ifdef CPUARM} {$linklib GLESv2} {$endif} {$linklib libc_nonshared.a} {$endif} {$endif} uses ........ From dec12 at avidsoft.com.hk Wed Aug 10 07:56:23 2016 From: dec12 at avidsoft.com.hk (Dennis) Date: Wed, 10 Aug 2016 13:56:23 +0800 Subject: [Lazarus] Compliments In-Reply-To: References: Message-ID: <57AAC207.7080806@avidsoft.com.hk> Alfred wrote: > @Dennis > > I am sorry, but I cannot reproduce your problem. > I did a fresh install, and all (including cross) runs out-of-the-box ! > > However, do you know that you do have to add the following into your > lpr-file ? > > > program MyCrossProg; > {$mode objfpc}{$H+} > > {$ifdef Linux} > {$ifdef FPC_CROSSCOMPILING} > {$ifdef CPUARM} > {$linklib GLESv2} > {$endif} > {$linklib libc_nonshared.a} > {$endif} > {$endif} > > uses > ........ > Thank you so much. After I added the above, cross linking now works and the executable can run on Pi. By the way, I could not find the above in the git or in any readme file in the rar files. It would be easier for laymen like me to have that instruction in a crosscompile.readme file. If I want to cross compile to another platform like Linux64, what should the "defines" be like? What does {$linklib GLESv2} mean? Does it exists on ubuntu for odroid? It is because the same executable can run on raspbian+Pi but when run on ubuntu+Odroid, it reported "bash: ./hello Permission denied". I already login as root and chmod +x hello but still get the permission denied error. In the past, when I compile an ARM execuatable on odroid, i can run it on both ubuntu+odroid or raspbian+Pi. Is it because of the GLESv2? Many thanks. Dennis From alfred at consulab.nl Wed Aug 10 08:10:53 2016 From: alfred at consulab.nl (Alfred) Date: Wed, 10 Aug 2016 06:10:53 +0000 Subject: [Lazarus] Compliments In-Reply-To: <57AAAF13.1090305@avidsoft.com.hk> Message-ID: @Dennis. That is good news ! But, to be honest, I do not know the exact answer to your other questions. ****************************** {$ifdef Linux} {$ifdef FPC_CROSSCOMPILING} {$ifdef CPUARM} {$linklib GLESv2} {$endif} {$linklib libc_nonshared.a} {$endif} {$endif} ****************************** These link-additions are based on trail-and error. Using an Arch Linux distro on RPi, BBB and Odroid-C2 (64bit). It could be that they are Arch Linux distro specific. I suppose, the best you can do, is simply use your own libs. So, copy your own /lib directory from your RPi to the suitable cross-directory of FPC. (remember: softlinks to not work, so make hard copies !) And go through the trial-and-error yourself for your distro. Regarding Linux64. See: http://bugs.freepascal.org/view.php?id=30112 So, a single linklib seems to solve the problem. There are no general instructions available, due to the above. I do not know if these "defines" are needed for everybody out there. Also, the NewPascal cross binaries are bloated at the moment (due to huge library additions that are not always necessary). They more or less serve as a proof-of-concept. And are work-in-progress. About your "raspbian+Pi / ubuntu+Odroid" problem, I have no clue. 32 vs 64 bit ? hardfloat vs softfloat ? ARMV6 vs ARMV7 ? Fpclazup is included. You can always build your own cross-compiler ! ARM possibilities (original): fpclazup.exe --installdir="c:\NewPascal\" --fpcURL="newpascal" --lazURL="trunk" --ostarget="linux" --cputarget="arm" --fpcOPT="-dFPC_ARMHF" --crossOPT="-CpARMV7A -CfVFPV3 -OoFASTMATH -CaEABIHF" --only="FPCCleanOnly,FPCBuildOnly" The above options show you your choices ! And there are many !! From karl-michael.schindler at web.de Wed Aug 10 15:56:46 2016 From: karl-michael.schindler at web.de (Schindler Karl-Michael) Date: Wed, 10 Aug 2016 15:56:46 +0200 Subject: [Lazarus] controling a loop Message-ID: Hi. I want to control the execution of a loop with a checkbox. If the checkbox is checked the loop should run, if it is unchecked no action. I tried this with onClick: CheckBox.Click(Sender:TObject); begin repeat Some Action … Form.Update; until (CheckBox.State <> checked) end; The loop starts, but i cannot click the Checkbox again for switching off. How to do it? Is it possible without threads? Michael. From maximiliano.duarte at gmail.com Wed Aug 10 16:01:54 2016 From: maximiliano.duarte at gmail.com (Maxi) Date: Wed, 10 Aug 2016 11:01:54 -0300 Subject: [Lazarus] controling a loop In-Reply-To: References: Message-ID: CheckBox.Click(Sender:TObject); begin repeat Some Action … Appication.ProcessMessage; until (CheckBox.State <> checked) end; 2016-08-10 10:56 GMT-03:00 Schindler Karl-Michael < karl-michael.schindler at web.de>: > Hi. > > I want to control the execution of a loop with a checkbox. If the checkbox > is checked the loop should run, if it is unchecked no action. I tried this > with onClick: > > CheckBox.Click(Sender:TObject); > begin > repeat > Some Action … > Form.Update; > until (CheckBox.State <> checked) > end; > > The loop starts, but i cannot click the Checkbox again for switching off. > How to do it? Is it possible without threads? > > Michael. > -- > _______________________________________________ > Lazarus mailing list > Lazarus at lists.lazarus-ide.org > http://lists.lazarus-ide.org/listinfo/lazarus > -- El que pregunta aprende, y el que contesta aprende a responder. No a la obsolecencia programada: http://www.rtve.es/noticias/20110104/productos-consumo-duran-cada-vez-menos/392498.shtml Linux User #495070 http://domonetic.com/blog -------------- next part -------------- An HTML attachment was scrubbed... URL: From skalogryz.lists at gmail.com Wed Aug 10 16:55:13 2016 From: skalogryz.lists at gmail.com (Dmitry Boyarintsev) Date: Wed, 10 Aug 2016 10:55:13 -0400 Subject: [Lazarus] controling a loop In-Reply-To: References: Message-ID: On Wed, Aug 10, 2016 at 9:56 AM, Schindler Karl-Michael < karl-michael.schindler at web.de> wrote: > The loop starts, but i cannot click the Checkbox again for switching off. > How to do it? Is it possible without threads? > > If SomeAction blocks a thread, then you should be using thread. thanks, Dmitry -------------- next part -------------- An HTML attachment was scrubbed... URL: From nc-gaertnma at netcologne.de Wed Aug 10 22:09:03 2016 From: nc-gaertnma at netcologne.de (Mattias Gaertner) Date: Wed, 10 Aug 2016 22:09:03 +0200 Subject: [Lazarus] Cannot open Windows Form on Linux In-Reply-To: References: Message-ID: <20160810220903.7d03c993@limapholos.matflo.wg> On Tue, 9 Aug 2016 15:15:49 +0200 John Landmesser wrote: >[...] > These messages appear: > > executed: > john1 at siductionbox:~/lazarus$ ./lazarus >[...] > > *(lazarus:11615): Pango-CRITICAL **: > > pango_layout_get_font_description: assertion 'PANGO_IS_LAYOUT > > (layout)' failed* > > > > System: > Lazarus 1.7 r52780 FPC 3.0.0 x86_64-linux-gtk 2 > > > > if i open the form from a different project i get: > > > > Invalid floating point operation. Maybe an internal consistency check failed. Can you create a stack trace by starting the IDE in gdb? Mattias From karl-michael.schindler at web.de Thu Aug 11 13:21:24 2016 From: karl-michael.schindler at web.de (Schindler Karl-Michael) Date: Thu, 11 Aug 2016 13:21:24 +0200 Subject: [Lazarus] controling a loop In-Reply-To: References: Message-ID: <84AB01BC-6F35-499F-9FA5-5816679E871B@web.de> Am 11.08.2016 um 12:00 schrieb Maxi : > > > Date: Wed, 10 Aug 2016 11:01:54 -0300 > From: Maxi > To: Lazarus mailing list > Subject: Re: [Lazarus] controling a loop > Message-ID: > Content-Type: text/plain; charset="utf-8" > > CheckBox.Click(Sender:TObject); > begin > repeat > Some Action … > > Appication.ProcessMessage; > > until (CheckBox.State <> checked) > end; Besides the typo ;-) Application.ProcessMessages did the trick. Thanks. From JuuS at mykolab.ch Thu Aug 11 14:58:31 2016 From: JuuS at mykolab.ch (JuuS) Date: Thu, 11 Aug 2016 14:58:31 +0200 Subject: [Lazarus] controling a loop In-Reply-To: <84AB01BC-6F35-499F-9FA5-5816679E871B@web.de> References: <84AB01BC-6F35-499F-9FA5-5816679E871B@web.de> Message-ID: <8bae895e-5af3-9840-ec16-64aef37d32ba@mykolab.ch> Hi, > > Besides the typo ;-) Application.ProcessMessages did the trick. Thanks. > Don't know if this is an issue anymore, it was in Delphi some time ago so you may want to check: It used to be Application.processmessages pegged cpu to 100%. The alternative "application.handlemessage" may be a bit slower but much nicer on the cpu. Again, don't know if this is an issue in Lazarus. From list2010 at BrenemanLabs.com Thu Aug 11 15:09:14 2016 From: list2010 at BrenemanLabs.com (Paul Breneman) Date: Thu, 11 Aug 2016 08:09:14 -0500 Subject: [Lazarus] controling a loop In-Reply-To: <8bae895e-5af3-9840-ec16-64aef37d32ba@mykolab.ch> References: <84AB01BC-6F35-499F-9FA5-5816679E871B@web.de> <8bae895e-5af3-9840-ec16-64aef37d32ba@mykolab.ch> Message-ID: <2ff190f5-ec46-17f3-7a8f-e62ad1c7b147@BrenemanLabs.com> On 08/11/2016 07:58 AM, JuuS wrote: > Hi, > >> >> Besides the typo ;-) Application.ProcessMessages did the trick. Thanks. >> > > Don't know if this is an issue anymore, it was in Delphi some time ago > so you may want to check: > > It used to be Application.processmessages pegged cpu to 100%. The > alternative "application.handlemessage" may be a bit slower but much > nicer on the cpu. Again, don't know if this is an issue in Lazarus. > A loop with Application.ProcessMessages with 100% CPU usage will also use up your battery on a laptop or mobile device. An easy way to improve that is to put sleep(10) into the loop. Here a short explanation of the alternative I use most of the time: http://codenewsfast.com/cnf/article/0/permalink.art-ng1824q786 You can find the above link and other things here: http://turbocontrol.com/APro.htm Regards, Paul www.ControlPascal.com From nc-gaertnma at netcologne.de Thu Aug 11 15:10:25 2016 From: nc-gaertnma at netcologne.de (Mattias Gaertner) Date: Thu, 11 Aug 2016 15:10:25 +0200 Subject: [Lazarus] controling a loop In-Reply-To: <8bae895e-5af3-9840-ec16-64aef37d32ba@mykolab.ch> References: <84AB01BC-6F35-499F-9FA5-5816679E871B@web.de> <8bae895e-5af3-9840-ec16-64aef37d32ba@mykolab.ch> Message-ID: <20160811151025.2ae8cfe3@limapholos.matflo.wg> On Thu, 11 Aug 2016 14:58:31 +0200 JuuS wrote: > Hi, > > > > > Besides the typo ;-) Application.ProcessMessages did the trick. Thanks. > > > > Don't know if this is an issue anymore, it was in Delphi some time ago > so you may want to check: > > It used to be Application.processmessages pegged cpu to 100%. The > alternative "application.handlemessage" may be a bit slower but much > nicer on the cpu. Again, don't know if this is an issue in Lazarus. HandleMessages calls ProcessMessages and then sleeps til a new message. This is Delphi compatible and by design. 100% cpu without need is bad coding. Mattias From hfiandor at ceniai.inf.cu Thu Aug 11 20:43:20 2016 From: hfiandor at ceniai.inf.cu (hfiandor) Date: Thu, 11 Aug 2016 20:43:20 +0200 Subject: [Lazarus] no puedo mantener abiertos dos proyectos Message-ID: Estimados listeros: Estoy usando el Lazarus 1.6. Tengo abierta una aplicación que estoy construyendo. Necesito buscar en otra que hice anteriormente algo para copiar. Cuando trato de abrir en la aplicación anterior el .lpi sale un mensaje preguntando si quiero abrir el proyecto. Digo que si, y sustituye el nuevo con el viejo. No me deja tener los dos disponibles. Si me pueden ayudar, lo voy a agradecer. Saludos Ing. Héctor F. Fiandor Rosario -------------- next part -------------- An HTML attachment was scrubbed... URL: From maximiliano.duarte at gmail.com Fri Aug 12 03:37:07 2016 From: maximiliano.duarte at gmail.com (Maximiliano Duarte) Date: Thu, 11 Aug 2016 22:37:07 -0300 Subject: [Lazarus] no puedo mantener abiertos dos proyectos In-Reply-To: References: Message-ID: <57ad2847.0a24ed0a.9d79a.10c5@mx.google.com> No abras el proyecto. Solo abre el .pas del otro proyecto. Lazarus y casi todos no permiten tener 2 proyectos a la vez -----Mensaje original----- De: "hfiandor" Enviado el: ‎11/‎08/‎2016 21:41 Para: "lazarus at lists.lazarus-ide.org" Asunto: [Lazarus] no puedo mantener abiertos dos proyectos Estimados listeros: Estoy usando el Lazarus 1.6. Tengo abierta una aplicación que estoy construyendo. Necesito buscar en otra que hice anteriormente algo para copiar. Cuando trato de abrir en la aplicación anterior el .lpi sale un mensaje preguntando si quiero abrir el proyecto. Digo que si, y sustituye el nuevo con el viejo. No me deja tener los dos disponibles. Si me pueden ayudar, lo voy a agradecer. Saludos Ing. Héctor F. Fiandor Rosario -------------- next part -------------- An HTML attachment was scrubbed... URL: From norbert at crettol.ch Fri Aug 12 09:47:59 2016 From: norbert at crettol.ch (Norbert Crettol) Date: Fri, 12 Aug 2016 09:47:59 +0200 Subject: [Lazarus] no puedo mantener abiertos dos proyectos In-Reply-To: <57ad2847.0a24ed0a.9d79a.10c5@mx.google.com> References: <57ad2847.0a24ed0a.9d79a.10c5@mx.google.com> Message-ID: <4f107a12-c1cc-5993-4cb1-95cf285192cc@crettol.ch> On 12/08/16 03:37, Maximiliano Duarte wrote: > No abras el proyecto. Solo abre el .pas del otro proyecto. Lazarus y casi todos no permiten tener 2 proyectos a la vez O el .lpr si desea copiar desde allí . Norbert > ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ > De: hfiandor > Enviado el: ‎11/‎08/‎2016 21:41 > Para: lazarus at lists.lazarus-ide.org > Asunto: [Lazarus] no puedo mantener abiertos dos proyectos > > Estimados listeros: > > > > Estoy usando el Lazarus 1.6. Tengo abierta una aplicación que estoy construyendo. Necesito buscar en otra que hice anteriormente algo para copiar. Cuando trato de abrir en la aplicación anterior el .lpi sale un mensaje preguntando si quiero abrir el proyecto. Digo que si, y sustituye el nuevo con el viejo. No me deja tener los dos disponibles. > > > > Si me pueden ayudar, lo voy a agradecer. > > > > Saludos > > Ing. Héctor F. Fiandor Rosario > > > From mailinglists at geldenhuys.co.uk Fri Aug 12 11:31:28 2016 From: mailinglists at geldenhuys.co.uk (Graeme Geldenhuys) Date: Fri, 12 Aug 2016 10:31:28 +0100 Subject: [Lazarus] Cut, Copy, Paste shortcuts don't work in SynEdit Message-ID: I'm using the TypeMatrix 2030 USB keyboard (Dvorak layout). The TypeMatrix keyboard has special clipboard shortcuts via Fn functionality for Cut, Copy and Paste. I'm using FreeBSD running JWM (a plain window manager). The issue is observed under Linux (Centos 6) too. All X11 applications work fine with the Fn clipboard functions - that's all except Lazarus IDE and I can't figure out why. When I press the special Fn clipboard keys, it actually generates the IBM style Cut, Copy and Paste via Shift+Del, Ctrl+Ins and Shift+Ins respectively. The "xev" output shows that - below it generate the key sequence for Cut. Because I use the Dvorak layout, I've always used the IBM style Cut, Copy and Paste because it is easier to type. I've also set up Lazarus IDE with secondary shortcuts for those. When I physically press Shift+Del it works, but the Fn+Cut key doesn't. Yet they generate the exact same key sequences in xev. Anybody got any idea why Lazarus IDE (more specifically SynEdit) doesn't work correctly? NOTE: Any dialogs in Lazarus IDE that accepts text, the Fn clipboard functionality works (eg: a TEdit). So LCL is not the problem. It seems on SynEdit is the issue. If I press Fn+Cut on my TypeMatrix 2030, this is what xev outputs: ================[ xev output ]==================== KeyPress event, serial 36, synthetic NO, window 0x2600001, root 0x295, subw 0x0, time 175828944, (1760,391), root:(1939,589), state 0x0, keycode 50 (keysym 0xffe1, Shift_L), same_screen YES, XLookupString gives 0 bytes: XmbLookupString gives 0 bytes: XFilterEvent returns: False KeyPress event, serial 36, synthetic NO, window 0x2600001, root 0x295, subw 0x0, time 175828944, (1760,391), root:(1939,589), state 0x1, keycode 107 (keysym 0xffff, Delete), same_screen YES, XLookupString gives 1 bytes: (7f) "" XmbLookupString gives 1 bytes: (7f) "" XFilterEvent returns: False KeyRelease event, serial 36, synthetic NO, window 0x2600001, root 0x295, subw 0x0, time 175829000, (1760,391), root:(1939,589), state 0x1, keycode 50 (keysym 0xffe1, Shift_L), same_screen YES, XLookupString gives 0 bytes: XFilterEvent returns: False KeyRelease event, serial 36, synthetic NO, window 0x2600001, root 0x295, subw 0x0, time 175829000, (1760,391), root:(1939,589), state 0x0, keycode 107 (keysym 0xffff, Delete), same_screen YES, XLookupString gives 1 bytes: (7f) "" XFilterEvent returns: False =========================================== I haven't tested under Windows yet. Regards, Graeme -- fpGUI Toolkit - a cross-platform GUI toolkit using Free Pascal http://fpgui.sourceforge.net/ My public PGP key: http://tinyurl.com/graeme-pgp -------------- next part -------------- A non-text attachment was scrubbed... Name: Screenshot.png Type: image/png Size: 23135 bytes Desc: not available URL: From lazarus at mfriebe.de Fri Aug 12 11:56:01 2016 From: lazarus at mfriebe.de (Martin Frb) Date: Fri, 12 Aug 2016 10:56:01 +0100 Subject: [Lazarus] Cut, Copy, Paste shortcuts don't work in SynEdit In-Reply-To: References: Message-ID: <77faa5dc-2c78-7eec-f317-b561765a6dc0@mfriebe.de> the patch here might help, but might cause new issues (so I was told / I remember some discussion on the topic, but I cant find it) (It is very old, not sure if the issue is still the same) The issue is that the "time" in the events for different keys is the same. Apparently that means it is one event only (again Ive been told, I never looked at the gtk spec) The LCL filters by that time. the patch adds the key itself to the filter. But if you take a key that is currently handled correctly, and where the "key" value is changed by a handler, then the patch will lead to that stroke being duplicated (or maybe duplicated...) (again so I was told) On 12/08/2016 10:31, Graeme Geldenhuys wrote: > I'm using the TypeMatrix 2030 USB keyboard (Dvorak layout). The > TypeMatrix keyboard has special clipboard shortcuts via Fn functionality > for Cut, Copy and Paste. > > I'm using FreeBSD running JWM (a plain window manager). The issue is > observed under Linux (Centos 6) too. All X11 applications work fine with > the Fn clipboard functions - that's all except Lazarus IDE and I can't > figure out why. > > When I press the special Fn clipboard keys, it actually generates the > IBM style Cut, Copy and Paste via Shift+Del, Ctrl+Ins and Shift+Ins > respectively. The "xev" output shows that - below it generate the key > sequence for Cut. > > Because I use the Dvorak layout, I've always used the IBM style Cut, > Copy and Paste because it is easier to type. I've also set up Lazarus > IDE with secondary shortcuts for those. When I physically press > Shift+Del it works, but the Fn+Cut key doesn't. Yet they generate the > exact same key sequences in xev. > > Anybody got any idea why Lazarus IDE (more specifically SynEdit) doesn't > work correctly? > > NOTE: > Any dialogs in Lazarus IDE that accepts text, the Fn clipboard > functionality works (eg: a TEdit). So LCL is not the problem. > It seems on SynEdit is the issue. > > > If I press Fn+Cut on my TypeMatrix 2030, this is what xev outputs: > > ================[ xev output ]==================== > KeyPress event, serial 36, synthetic NO, window 0x2600001, > root 0x295, subw 0x0, time 175828944, (1760,391), root:(1939,589), > state 0x0, keycode 50 (keysym 0xffe1, Shift_L), same_screen YES, > XLookupString gives 0 bytes: > XmbLookupString gives 0 bytes: > XFilterEvent returns: False > > KeyPress event, serial 36, synthetic NO, window 0x2600001, > root 0x295, subw 0x0, time 175828944, (1760,391), root:(1939,589), > state 0x1, keycode 107 (keysym 0xffff, Delete), same_screen YES, > XLookupString gives 1 bytes: (7f) "" > XmbLookupString gives 1 bytes: (7f) "" > XFilterEvent returns: False > > KeyRelease event, serial 36, synthetic NO, window 0x2600001, > root 0x295, subw 0x0, time 175829000, (1760,391), root:(1939,589), > state 0x1, keycode 50 (keysym 0xffe1, Shift_L), same_screen YES, > XLookupString gives 0 bytes: > XFilterEvent returns: False > > KeyRelease event, serial 36, synthetic NO, window 0x2600001, > root 0x295, subw 0x0, time 175829000, (1760,391), root:(1939,589), > state 0x0, keycode 107 (keysym 0xffff, Delete), same_screen YES, > XLookupString gives 1 bytes: (7f) "" > XFilterEvent returns: False > =========================================== > > > I haven't tested under Windows yet. > > Regards, > Graeme > > > -------------- next part -------------- An HTML attachment was scrubbed... URL: From lazarus at mfriebe.de Fri Aug 12 11:57:41 2016 From: lazarus at mfriebe.de (Martin Frb) Date: Fri, 12 Aug 2016 10:57:41 +0100 Subject: [Lazarus] Cut, Copy, Paste shortcuts don't work in SynEdit In-Reply-To: <77faa5dc-2c78-7eec-f317-b561765a6dc0@mfriebe.de> References: <77faa5dc-2c78-7eec-f317-b561765a6dc0@mfriebe.de> Message-ID: sorry, I simply forgot to paste..... On 12/08/2016 10:56, Martin Frb wrote: > the patch here http://bugs.freepascal.org/view.php?id=14716 > might help, but might cause new issues (so I was told / I remember > some discussion on the topic, but I cant find it) > (It is very old, not sure if the issue is still the same) > > > The issue is that the "time" in the events for different keys is the > same. Apparently that means it is one event only (again Ive been told, > I never looked at the gtk spec) > > The LCL filters by that time. > > the patch adds the key itself to the filter. > But if you take a key that is currently handled correctly, and where > the "key" value is changed by a handler, then the patch will lead to > that stroke being duplicated (or maybe duplicated...) (again so I was > told) > > > > On 12/08/2016 10:31, Graeme Geldenhuys wrote: >> I'm using the TypeMatrix 2030 USB keyboard (Dvorak layout). The >> TypeMatrix keyboard has special clipboard shortcuts via Fn functionality >> for Cut, Copy and Paste. >> >> I'm using FreeBSD running JWM (a plain window manager). The issue is >> observed under Linux (Centos 6) too. All X11 applications work fine with >> the Fn clipboard functions - that's all except Lazarus IDE and I can't >> figure out why. >> >> When I press the special Fn clipboard keys, it actually generates the >> IBM style Cut, Copy and Paste via Shift+Del, Ctrl+Ins and Shift+Ins >> respectively. The "xev" output shows that - below it generate the key >> sequence for Cut. >> >> Because I use the Dvorak layout, I've always used the IBM style Cut, >> Copy and Paste because it is easier to type. I've also set up Lazarus >> IDE with secondary shortcuts for those. When I physically press >> Shift+Del it works, but the Fn+Cut key doesn't. Yet they generate the >> exact same key sequences in xev. >> >> Anybody got any idea why Lazarus IDE (more specifically SynEdit) doesn't >> work correctly? >> >> NOTE: >> Any dialogs in Lazarus IDE that accepts text, the Fn clipboard >> functionality works (eg: a TEdit). So LCL is not the problem. >> It seems on SynEdit is the issue. >> >> >> If I press Fn+Cut on my TypeMatrix 2030, this is what xev outputs: >> >> ================[ xev output ]==================== >> KeyPress event, serial 36, synthetic NO, window 0x2600001, >> root 0x295, subw 0x0, time 175828944, (1760,391), root:(1939,589), >> state 0x0, keycode 50 (keysym 0xffe1, Shift_L), same_screen YES, >> XLookupString gives 0 bytes: >> XmbLookupString gives 0 bytes: >> XFilterEvent returns: False >> >> KeyPress event, serial 36, synthetic NO, window 0x2600001, >> root 0x295, subw 0x0, time 175828944, (1760,391), root:(1939,589), >> state 0x1, keycode 107 (keysym 0xffff, Delete), same_screen YES, >> XLookupString gives 1 bytes: (7f) "" >> XmbLookupString gives 1 bytes: (7f) "" >> XFilterEvent returns: False >> >> KeyRelease event, serial 36, synthetic NO, window 0x2600001, >> root 0x295, subw 0x0, time 175829000, (1760,391), root:(1939,589), >> state 0x1, keycode 50 (keysym 0xffe1, Shift_L), same_screen YES, >> XLookupString gives 0 bytes: >> XFilterEvent returns: False >> >> KeyRelease event, serial 36, synthetic NO, window 0x2600001, >> root 0x295, subw 0x0, time 175829000, (1760,391), root:(1939,589), >> state 0x0, keycode 107 (keysym 0xffff, Delete), same_screen YES, >> XLookupString gives 1 bytes: (7f) "" >> XFilterEvent returns: False >> =========================================== >> >> >> I haven't tested under Windows yet. >> >> Regards, >> Graeme >> >> >> > > > -------------- next part -------------- An HTML attachment was scrubbed... URL: From mailinglists at geldenhuys.co.uk Fri Aug 12 12:23:45 2016 From: mailinglists at geldenhuys.co.uk (Graeme Geldenhuys) Date: Fri, 12 Aug 2016 11:23:45 +0100 Subject: [Lazarus] Cut, Copy, Paste shortcuts don't work in SynEdit In-Reply-To: <77faa5dc-2c78-7eec-f317-b561765a6dc0@mfriebe.de> References: <77faa5dc-2c78-7eec-f317-b561765a6dc0@mfriebe.de> Message-ID: On 2016-08-12 10:56, Martin Frb wrote: > The issue is that the "time" in the events for different keys is the > same. Apparently that means it is one event only (again Ive been told, I > never looked at the gtk spec) > > The LCL filters by that time. But wouldn’t that suggest that the whole of LCL (including TEdit, TMemo) would have that issue? With my testing, it is only SynEdit that has a problem. TEdit & TMemo works just fine with TM2030's hardware clipboard keys. Either way, many thanks for the link to the bug tracker. I'll give that patch a try and report back. Regards, Graeme -- fpGUI Toolkit - a cross-platform GUI toolkit using Free Pascal http://fpgui.sourceforge.net/ My public PGP key: http://tinyurl.com/graeme-pgp From nc-gaertnma at netcologne.de Fri Aug 12 12:42:22 2016 From: nc-gaertnma at netcologne.de (Mattias Gaertner) Date: Fri, 12 Aug 2016 12:42:22 +0200 Subject: [Lazarus] Cut, Copy, Paste shortcuts don't work in SynEdit In-Reply-To: References: <77faa5dc-2c78-7eec-f317-b561765a6dc0@mfriebe.de> Message-ID: <20160812124222.6a1c7924@limapholos.matflo.wg> On Fri, 12 Aug 2016 11:23:45 +0100 Graeme Geldenhuys wrote: > On 2016-08-12 10:56, Martin Frb wrote: > > The issue is that the "time" in the events for different keys is the > > same. Apparently that means it is one event only (again Ive been told, I > > never looked at the gtk spec) > > > > The LCL filters by that time. > > But wouldn’t that suggest that the whole of LCL (including TEdit, TMemo) > would have that issue? With my testing, it is only SynEdit that has a > problem. TEdit & TMemo works just fine with TM2030's hardware clipboard > keys. Martin meant the LCL custom control filters. TEdit and TMemo are native controls, so their keys are handled mostly by the widgetset itself. SynEdit is a custom control, so the LCL and SynEdit has to handle the composed/compound keys. I guess the problem lies in the LCL gtk2 interface. > Either way, many thanks for the link to the bug tracker. I'll give that > patch a try and report back. Mattias From mschnell at lumino.de Fri Aug 12 13:04:12 2016 From: mschnell at lumino.de (Michael Schnell) Date: Fri, 12 Aug 2016 13:04:12 +0200 Subject: [Lazarus] controling a loop In-Reply-To: References: Message-ID: <3e1d3046-b191-6a8b-cdd8-473496fe9b2b@lumino.de> On 10.08.2016 15:56, Schindler Karl-Michael wrote: > I want to control the execution of a loop with a checkbox. If the checkbox is checked the loop should run, if it is unchecked no action. I tried this with onClick: > Something like that should never be done in an "Event driven" system like a Lazarus application. Each event should be finished (ad the handler procedure exited) as fast as possible. So you should exit the procedure when the check box is not checked and start a new execution in the "CheckBox1Change" event. -Michael From mailinglists at geldenhuys.co.uk Fri Aug 12 13:05:15 2016 From: mailinglists at geldenhuys.co.uk (Graeme Geldenhuys) Date: Fri, 12 Aug 2016 12:05:15 +0100 Subject: [Lazarus] Cut, Copy, Paste shortcuts don't work in SynEdit In-Reply-To: <20160812124222.6a1c7924@limapholos.matflo.wg> References: <77faa5dc-2c78-7eec-f317-b561765a6dc0@mfriebe.de> <20160812124222.6a1c7924@limapholos.matflo.wg> Message-ID: On 2016-08-12 11:42, Mattias Gaertner wrote: > > Martin meant the LCL custom control filters. At the time I sent my previous reply, I haven't read the full bug report comments. I now understand what Martin meant. Regards, Graeme -- fpGUI Toolkit - a cross-platform GUI toolkit using Free Pascal http://fpgui.sourceforge.net/ My public PGP key: http://tinyurl.com/graeme-pgp From mailinglists at geldenhuys.co.uk Fri Aug 12 13:10:52 2016 From: mailinglists at geldenhuys.co.uk (Graeme Geldenhuys) Date: Fri, 12 Aug 2016 12:10:52 +0100 Subject: [Lazarus] Cut, Copy, Paste shortcuts don't work in SynEdit In-Reply-To: References: <77faa5dc-2c78-7eec-f317-b561765a6dc0@mfriebe.de> Message-ID: <59f31e98-61c4-d078-642b-7e256f24e4e1@geldenhuys.co.uk> On 2016-08-12 10:57, Martin Frb wrote: > On 12/08/2016 10:56, Martin Frb wrote: >> > the patch here > http://bugs.freepascal.org/view.php?id=14716 The original patch mentioned was for GTK1 (or at the time when GTK2 shared GTK1 code). I created a new LCL-GTK2 patch and now SynEdit works correctly with the hardware clipboard keys. I made some comments to the bug report (regarding OnKeyPress) and attached a new patch. Many thanks for your quick response. ps: This issue might pop up more frequent with newer keyboards flooding the market where many (eg: the Ergodox EZ) support fully programmable key layouts, including one button macros. Regards, Graeme -- fpGUI Toolkit - a cross-platform GUI toolkit using Free Pascal http://fpgui.sourceforge.net/ My public PGP key: http://tinyurl.com/graeme-pgp From bartjunk64 at gmail.com Fri Aug 12 16:10:16 2016 From: bartjunk64 at gmail.com (Bart) Date: Fri, 12 Aug 2016 16:10:16 +0200 Subject: [Lazarus] controling a loop In-Reply-To: <3e1d3046-b191-6a8b-cdd8-473496fe9b2b@lumino.de> References: <3e1d3046-b191-6a8b-cdd8-473496fe9b2b@lumino.de> Message-ID: On 8/12/16, Michael Schnell wrote: > Each event should be finished (ad the handler procedure exited) as fast > as possible. If you extend this (into ludicracy) this would mean that exch event should fire a new thread that rubs the code needed and then exit... ;-) Bart From hfiandor at ceniai.inf.cu Fri Aug 12 10:23:58 2016 From: hfiandor at ceniai.inf.cu (hfiandor) Date: Fri, 12 Aug 2016 10:23:58 +0200 Subject: [Lazarus] no puedo mantener abiertos dos proyectos In-Reply-To: <4f107a12-c1cc-5993-4cb1-95cf285192cc@crettol.ch> References: <57ad2847.0a24ed0a.9d79a.10c5@mx.google.com> <4f107a12-c1cc-5993-4cb1-95cf285192cc@crettol.ch> Message-ID: Estimados colegas: Ya resolvi este problema, aunque me parece que no de la mejor manera posible. Activo el Lazarus para la aplicación nueva. Cuando quiero abrir otra aplicación vieja para consultar voy al icono de Lazarus que tengo en el escritorio. Lo pincho. Aparece el ultimo (la aplicación nueva o un Project1 nuevo). La borro. Abro otra aplicación (le doy el camino de la que quiero abrir). Y SE ABRE UNA SEGUNDA APLICACIÓN y puedo saltar de una a la otra sin problemas. Gracias a todos por su atención. Saludos Ing. Héctor F. Fiandor Rosario From el.es.cr at gmail.com Fri Aug 12 16:31:23 2016 From: el.es.cr at gmail.com (Lukasz Sokol) Date: Fri, 12 Aug 2016 15:31:23 +0100 Subject: [Lazarus] controling a loop In-Reply-To: References: <3e1d3046-b191-6a8b-cdd8-473496fe9b2b@lumino.de> Message-ID: On 12/08/16 15:10, Bart wrote: > On 8/12/16, Michael Schnell wrote: > > >> Each event should be finished (ad the handler procedure exited) as fast >> as possible. > > If you extend this (into ludicracy) this would mean that exch event > should fire a new thread that rubs the code needed and then exit... > ;-) > Well probably if the event is required to do something useful but time-consuming (like launching a long long calculation) while the GUI (thread) needs to be responsive (e.g. report on progress, maybe abort the calculation or change parameters in-flight) > Bart > el es From silvioprog at gmail.com Fri Aug 12 21:47:28 2016 From: silvioprog at gmail.com (silvioprog) Date: Fri, 12 Aug 2016 16:47:28 -0300 Subject: [Lazarus] [FEATURE REQUEST] Dotted package names Message-ID: Hello, It would be nice if Lazarus could allow to use dotted package names, so we could do something like: MyPackage.Base.lpk MyPackage.Core.lpk MyPackage.DataBase.lpk MyPackage.VCL.lpk ... Currently, if you try to use dots on your package name, you may get an error "The package file name "MyPackage.Core" in "~/MyPackage.Core.lpk" is not a valid Lazarus package name". Issue: #30467 . Thank you! -- Silvio Clécio -------------- next part -------------- An HTML attachment was scrubbed... URL: From pascaldragon at googlemail.com Fri Aug 12 22:19:25 2016 From: pascaldragon at googlemail.com (Sven Barth) Date: Fri, 12 Aug 2016 22:19:25 +0200 Subject: [Lazarus] [FEATURE REQUEST] Dotted package names In-Reply-To: References: Message-ID: Am 12.08.2016 21:48 schrieb "silvioprog" : > > Hello, > > It would be nice if Lazarus could allow to use dotted package names, so we could do something like: > > MyPackage.Base.lpk > MyPackage.Core.lpk > MyPackage.DataBase.lpk > MyPackage.VCL.lpk > ... > > Currently, if you try to use dots on your package name, you may get an error "The package file name "MyPackage.Core" in > "~/MyPackage.Core.lpk" is not a valid Lazarus package name". > > Issue: #30467. Sidenote: Dynamic packages will support dotted names as well. Currently I'm trying to get the package rtl.objpas to link ;) Regards, Sven -------------- next part -------------- An HTML attachment was scrubbed... URL: From maaartinus at gmail.com Fri Aug 12 22:56:09 2016 From: maaartinus at gmail.com (Martin Grajcar) Date: Fri, 12 Aug 2016 22:56:09 +0200 Subject: [Lazarus] OSX: Semaphore init failed despite using cthreads and destroying threads. Message-ID: Our application starts a few hundreds threads (one per HTTP request), but it does so in a way ensuring that at any time, there are never more than a few (e.g., 3) of them. We are using cthreads and I could verify that Destroy gets called (most probably via FreeOnTerminate). The pattern looks like Create Create Create Destroy Create Destroy Create Destroy ... The debugger shows only a couple Threads at any time, which looks fine, too. The application runs on Linux without any problems, but on OS X, it crashes when creating the 180th thread or about with the message "Semaphore init failed (possibly too many concurrent threads)" Any idea what may be going wrong? -------------- next part -------------- An HTML attachment was scrubbed... URL: From silvioprog at gmail.com Fri Aug 12 23:33:56 2016 From: silvioprog at gmail.com (silvioprog) Date: Fri, 12 Aug 2016 18:33:56 -0300 Subject: [Lazarus] [FEATURE REQUEST] Dotted package names In-Reply-To: References: Message-ID: On Fri, Aug 12, 2016 at 5:19 PM, Sven Barth wrote: [...] > Sidenote: Dynamic packages will support dotted names as well. Currently > I'm trying to get the package rtl.objpas to link ;) > Forgive my ignorance, but, what are Dynamic packages? ^^' -- Silvio Clécio -------------- next part -------------- An HTML attachment was scrubbed... URL: From pascaldragon at googlemail.com Sat Aug 13 09:18:51 2016 From: pascaldragon at googlemail.com (Sven Barth) Date: Sat, 13 Aug 2016 09:18:51 +0200 Subject: [Lazarus] [FEATURE REQUEST] Dotted package names In-Reply-To: References: Message-ID: Am 12.08.2016 23:34 schrieb "silvioprog" : > > On Fri, Aug 12, 2016 at 5:19 PM, Sven Barth wrote: > [...] >> >> Sidenote: Dynamic packages will support dotted names as well. Currently I'm trying to get the package rtl.objpas to link ;) > > Forgive my ignorance, but, what are Dynamic packages? ^^' The possibility to share binary code among multiple programs by placing it in libraries that also contain a bit of compiler magic. They'll also allow Lazarus to dynamically load components (without recompiling) or for anyone to easily have a plugin system cause you can share strings, classes, etc. without any problems between the "libraries" and the main program. In Delphi you might recognize them from their bpl extension (in FPC it will be ppl). Regards, Sven -------------- next part -------------- An HTML attachment was scrubbed... URL: From hnb.code at gmail.com Sat Aug 13 09:21:53 2016 From: hnb.code at gmail.com (Maciej Izak) Date: Sat, 13 Aug 2016 09:21:53 +0200 Subject: [Lazarus] [FEATURE REQUEST] Dotted package names In-Reply-To: References: Message-ID: 2016-08-13 9:18 GMT+02:00 Sven Barth : > (in FPC it will be ppl) ppl - Pascal Package Library ? ;) -- Best regards, Maciej Izak -------------- next part -------------- An HTML attachment was scrubbed... URL: From pascaldragon at googlemail.com Sat Aug 13 09:32:18 2016 From: pascaldragon at googlemail.com (Sven Barth) Date: Sat, 13 Aug 2016 09:32:18 +0200 Subject: [Lazarus] [FEATURE REQUEST] Dotted package names In-Reply-To: References: Message-ID: Am 13.08.2016 09:22 schrieb "Maciej Izak" : > > > 2016-08-13 9:18 GMT+02:00 Sven Barth : >> >> (in FPC it will be ppl) > > > ppl - Pascal Package Library ? ;) Yupp, it's simple and recognizeable :) The metadata file for it (in Delphi dcp) will surprisingly be called pcp and I personally use ppk for the main package file (in Delphi dpk and in Lazarus lpk; though the latter can keep using that for its own packages *shrugs*). Regards, Sven -------------- next part -------------- An HTML attachment was scrubbed... URL: From silvioprog at gmail.com Sat Aug 13 19:02:18 2016 From: silvioprog at gmail.com (silvioprog) Date: Sat, 13 Aug 2016 14:02:18 -0300 Subject: [Lazarus] [FEATURE REQUEST] Dotted package names In-Reply-To: References: Message-ID: On Sat, Aug 13, 2016 at 4:18 AM, Sven Barth wrote: > Am 12.08.2016 23:34 schrieb "silvioprog" : > > > > On Fri, Aug 12, 2016 at 5:19 PM, Sven Barth > wrote: > > [...] > >> > >> Sidenote: Dynamic packages will support dotted names as well. Currently > I'm trying to get the package rtl.objpas to link ;) > > > > Forgive my ignorance, but, what are Dynamic packages? ^^' > > The possibility to share binary code among multiple programs by placing it > in libraries that also contain a bit of compiler magic. They'll also allow > Lazarus to dynamically load components (without recompiling) or for anyone > to easily have a plugin system cause you can share strings, classes, etc. > without any problems between the "libraries" and the main program. > In Delphi you might recognize them from their bpl extension (in FPC it > will be ppl). > > Regards, > Sven > It will be really a big feature: modularization in Free Pascal. *-* Thank you for share it! -- Silvio Clécio -------------- next part -------------- An HTML attachment was scrubbed... URL: From juergen.hestermann at gmx.de Sun Aug 14 11:32:11 2016 From: juergen.hestermann at gmx.de (=?UTF-8?Q?J=c3=bcrgen_Hestermann?=) Date: Sun, 14 Aug 2016 11:32:11 +0200 Subject: [Lazarus] VirtualTreeView 5.5 and binary size Message-ID: I just switched to VirtualTreeView 5.5. Here http://forum.lazarus.freepascal.org/index.php?topic=32856.0 it says, that the binary would be smaller with version 5.5 but as I now used it, the opposite is the case: With VirtualTreeView version 4.8 my program binary size was 4,792,851 bytes. After switching to version 5.5 (together with LCLextension 0.6) the binary increases to 5,962,259 bytes. Is that as expected? I now switched back to version 4.8 and the binary is back to the smaller size. Together with the changes in code I would have to do and the lesser number of supported OSs I don't see any benefit in using version 5.5. Are there any? From Sascha.Hestermann at gmx.de Thu Aug 11 05:31:06 2016 From: Sascha.Hestermann at gmx.de (Lazarus mailing list) Date: Thu, 11 Aug 2016 06:31:06 +0300 Subject: [Lazarus] useful info Message-ID: <00008c0a0a05$dc7d8857$4d893433$@gmx.de> Greetings, As I understood from your last message you were looking for some information , I think this is it Sent from a prehistoric stone tablet, Lazarus mailing list -------------- next part -------------- An HTML attachment was scrubbed... URL: From Sascha.Hestermann at gmx.de Thu Aug 11 05:31:11 2016 From: Sascha.Hestermann at gmx.de (Lazarus mailing list) Date: Thu, 11 Aug 2016 06:31:11 +0300 Subject: [Lazarus] good idea Message-ID: <00000282ab29$6e2f37e3$86f53ed9$@gmx.de> Greetings! I've read spmething worthy on the web and I think this is a very good idea for your business, take a look See you soon, Lazarus mailing list -------------- next part -------------- An HTML attachment was scrubbed... URL: From mschnell at lumino.de Mon Aug 15 09:27:16 2016 From: mschnell at lumino.de (Michael Schnell) Date: Mon, 15 Aug 2016 09:27:16 +0200 Subject: [Lazarus] controling a loop In-Reply-To: References: <3e1d3046-b191-6a8b-cdd8-473496fe9b2b@lumino.de> Message-ID: <9eab274f-fcc4-87a9-c788-79f0d34ab023@lumino.de> On 12.08.2016 16:10, Bart wrote: > > If you extend this (into ludicracy) this would mean that exch event > should fire a new thread that rubs the code needed and then exit... > ;-) Depending on the exact task in question this indeed might be perfectly viable. But doing a busy loop (resulting in 100% do-nothing CPU) on behalf of a GUI switch IMHO is not really appropriate ever. -Michael From mailinglists at geldenhuys.co.uk Mon Aug 15 17:16:12 2016 From: mailinglists at geldenhuys.co.uk (Graeme Geldenhuys) Date: Mon, 15 Aug 2016 16:16:12 +0100 Subject: [Lazarus] TScrollbox + GTK2 causes console warnings. Message-ID: <66bc74eb-8386-a491-decc-4bec8f15339f@geldenhuys.co.uk> Hi, I'm using LCL-GTK2 and when I started using TScrollBox in my application I get the following warnings in my console window. $ ./demo05_truetype_fonts -f lcl WARNING: TGtk2WidgetSet.InvalidateRect refused invalidating during paint message: TScrollBox WARNING: TGtk2WidgetSet.InvalidateRect refused invalidating during paint message: TScrollBox WARNING: TGtk2WidgetSet.InvalidateRect refused invalidating during paint message: TScrollBox WARNING: TGtk2WidgetSet.InvalidateRect refused invalidating during paint message: TScrollBox ...snip... I'm using Lazarus 1.7 r52715 FPC 2.6.4 x86_64-linux-gtk 2. Are these warnings something to worry about? Are there plans to fix (remove, surpress) them? Should this be reporting on Mantis? Regards, Graeme -- fpGUI Toolkit - a cross-platform GUI toolkit using Free Pascal http://fpgui.sourceforge.net/ My public PGP key: http://tinyurl.com/graeme-pgp From silvioprog at gmail.com Mon Aug 15 17:48:01 2016 From: silvioprog at gmail.com (silvioprog) Date: Mon, 15 Aug 2016 12:48:01 -0300 Subject: [Lazarus] Identifier Completion error: unit not found: generics.collections Message-ID: Hello, The Identifier Completion (Ctrl+Space) doesn't complete when you declare any rtl-generics unit. Same error even adding the sparta_generics package in the project. (just testing, I'm using the generics.* units from the FPC sources) Reported as #30473 . Thank you! -- Silvio Clécio -------------- next part -------------- An HTML attachment was scrubbed... URL: From lazarus at kluug.net Mon Aug 15 21:40:50 2016 From: lazarus at kluug.net (Ondrej Pokorny) Date: Mon, 15 Aug 2016 21:40:50 +0200 Subject: [Lazarus] Identifier Completion error: unit not found: generics.collections In-Reply-To: References: Message-ID: On 15.08.2016 17:48, silvioprog wrote: > Hello, > > The Identifier Completion (Ctrl+Space) doesn't complete when you > declare any rtl-generics unit. > > Same error even adding the sparta_generics package in the project. > (just testing, I'm using the generics.* units from the FPC sources) > > Reported as #30473 . No need to report any CodeTools+generics bugs. There are already a lot of issue reports in mantis. It's well known that it doesn't work. E.g. http://bugs.freepascal.org/view.php?id=27847 http://bugs.freepascal.org/view.php?id=30124 etc etc It seems that I should open a fundraising project for CodeTools+Generics on http://foundation.freepascal.org/projects ASAP :) Ondrej -------------- next part -------------- An HTML attachment was scrubbed... URL: From silvioprog at gmail.com Mon Aug 15 23:08:38 2016 From: silvioprog at gmail.com (silvioprog) Date: Mon, 15 Aug 2016 18:08:38 -0300 Subject: [Lazarus] Identifier Completion error: unit not found: generics.collections In-Reply-To: References: Message-ID: On Mon, Aug 15, 2016 at 4:40 PM, Ondrej Pokorny wrote: > On 15.08.2016 17:48, silvioprog wrote: > > Hello, > > The Identifier Completion (Ctrl+Space) doesn't complete when you declare > any rtl-generics unit. > > Same error even adding the sparta_generics package in the project. (just > testing, I'm using the generics.* units from the FPC sources) > > Reported as #30473 . > > > No need to report any CodeTools+generics bugs. There are already a lot of > issue reports in mantis. It's well known that it doesn't work. > > E.g. > http://bugs.freepascal.org/view.php?id=27847 > http://bugs.freepascal.org/view.php?id=30124 > etc etc > OK, no more issues about that. It seems that I should open a fundraising project for CodeTools+Generics on > http://foundation.freepascal.org/projects ASAP :) > Is this specific link for feature requesting? I saw "Extended RTTI, Anonymous functions, Complete Attributes ... and more" there, it sounds very good. :-) -- Silvio Clécio -------------- next part -------------- An HTML attachment was scrubbed... URL: From steveg at nevets.com.au Tue Aug 16 01:55:23 2016 From: steveg at nevets.com.au (steveg) Date: Tue, 16 Aug 2016 09:25:23 +0930 Subject: [Lazarus] Foundation Message-ID: <82b0ee53-661b-8075-a27a-1ab4bbf84e53@nevets.com.au> Would anybody know if there is an english page available for the Freepascal/Lazarus foundation donations page ? Not having much luck with the translations so far :) Thanks - SteveG -------------- next part -------------- An HTML attachment was scrubbed... URL: From lazarus at kluug.net Tue Aug 16 07:45:37 2016 From: lazarus at kluug.net (Ondrej Pokorny) Date: Tue, 16 Aug 2016 07:45:37 +0200 Subject: [Lazarus] Identifier Completion error: unit not found: generics.collections In-Reply-To: References: Message-ID: On 15.08.2016 23:08, silvioprog wrote: > On Mon, Aug 15, 2016 at 4:40 PM, Ondrej Pokorny > wrote: > > On 15.08.2016 17:48, silvioprog wrote: >> Hello, >> >> The Identifier Completion (Ctrl+Space) doesn't complete when you >> declare any rtl-generics unit. >> >> Same error even adding the sparta_generics package in the >> project. (just testing, I'm using the generics.* units from the >> FPC sources) >> >> Reported as #30473 . > > No need to report any CodeTools+generics bugs. There are already a > lot of issue reports in mantis. It's well known that it doesn't work. > > E.g. > http://bugs.freepascal.org/view.php?id=27847 > > http://bugs.freepascal.org/view.php?id=30124 > > etc etc > > > OK, no more issues about that. Sorry, I was wrong - your issue is different from the other ones. Run Menu->Tools->"Rescan FPC Source Directory" to update CodeTools directory cache. Ondrej -------------- next part -------------- An HTML attachment was scrubbed... URL: From JuuS at mykolab.ch Tue Aug 16 13:43:46 2016 From: JuuS at mykolab.ch (JuuS) Date: Tue, 16 Aug 2016 13:43:46 +0200 Subject: [Lazarus] Foundation In-Reply-To: <82b0ee53-661b-8075-a27a-1ab4bbf84e53@nevets.com.au> References: <82b0ee53-661b-8075-a27a-1ab4bbf84e53@nevets.com.au> Message-ID: <1b8bbdd3-dd48-17d0-aa45-587018f6a901@mykolab.ch> > Would anybody know if there is an english page available for the > Freepascal/Lazarus foundation donations page ? Try: http://wiki.lazarus.freepascal.org/How_to_donate_to_Lazarus)? > From michael at freepascal.org Tue Aug 16 14:01:45 2016 From: michael at freepascal.org (Michael Van Canneyt) Date: Tue, 16 Aug 2016 14:01:45 +0200 (CEST) Subject: [Lazarus] Foundation In-Reply-To: <82b0ee53-661b-8075-a27a-1ab4bbf84e53@nevets.com.au> References: <82b0ee53-661b-8075-a27a-1ab4bbf84e53@nevets.com.au> Message-ID: On Tue, 16 Aug 2016, steveg wrote: > Would anybody know if there is an english page available for the > Freepascal/Lazarus foundation donations page ? > > Not having much luck with the translations so far :) My apologies, this is something which I intended to do a long time ago, and it slipped my mind. The paypal page is now in english. Michael. From engelbert_buxbaum at web.de Tue Aug 16 17:27:13 2016 From: engelbert_buxbaum at web.de (Dr Engelbert Buxbaum) Date: Tue, 16 Aug 2016 17:27:13 +0200 Subject: [Lazarus] unexpected segmentation violation Message-ID: <1669447599.20160816172713@web.de> Hi, the following little test program compiles fine but causes an exception "External: SIGSEGV" with Lazarus version # 1.6, Date 2016-02-14, FPC version 3.0.0, SVN-Revision 51630, x86_64-win64-win32/win64, under Win10 Pro 1607 64 bit: program test1; const MaxCases = 1600; type SimMatrix = array [1..MaxCases, 1..MaxCases] of double; var r : double; function ClusterAnalysis : double; var Similarities : SimMatrix; // elimination of this line removes the problem begin ClusterAnalysis := 1.0; end; begin r := ClusterAnalysis; end. Funnily enough, if I create the matrix not as a local but as a global variable, everything runs fine. -- Sincerely Engelbert From doug at moosemail.net Tue Aug 16 17:49:49 2016 From: doug at moosemail.net (DougC) Date: Tue, 16 Aug 2016 11:49:49 -0400 Subject: [Lazarus] unexpected segmentation violation In-Reply-To: <1669447599.20160816172713@web.de> References: <1669447599.20160816172713@web.de> Message-ID: <156940b61e0.fba6a896295407.8082356553163518493@moosemail.net> You have exceeded the stack size limit. The global variable does not have such a limit. Try increasing the maximum stack for the project. ---- On Tue, 16 Aug 2016 11:27:13 -0400 Dr Engelbert Buxbaum <engelbert_buxbaum at web.de>wrote ---- Hi, the following little test program compiles fine but causes an exception "External: SIGSEGV" with Lazarus version # 1.6, Date 2016-02-14, FPC version 3.0.0, SVN-Revision 51630, x86_64-win64-win32/win64, under Win10 Pro 1607 64 bit: program test1; const MaxCases = 1600; type SimMatrix = array [1..MaxCases, 1..MaxCases] of double; var r : double; function ClusterAnalysis : double; var Similarities : SimMatrix; // elimination of this line removes the problem begin ClusterAnalysis := 1.0; end; begin r := ClusterAnalysis; end. Funnily enough, if I create the matrix not as a local but as a global variable, everything runs fine. -- Sincerely Engelbert -- _______________________________________________ Lazarus mailing list Lazarus at lists.lazarus-ide.org http://lists.lazarus-ide.org/listinfo/lazarus -------------- next part -------------- An HTML attachment was scrubbed... URL: From silvioprog at gmail.com Tue Aug 16 23:29:27 2016 From: silvioprog at gmail.com (silvioprog) Date: Tue, 16 Aug 2016 18:29:27 -0300 Subject: [Lazarus] Identifier Completion error: unit not found: generics.collections In-Reply-To: References: Message-ID: On Tue, Aug 16, 2016 at 2:45 AM, Ondrej Pokorny wrote: [...] > Sorry, I was wrong - your issue is different from the other ones. Run > Menu->Tools->"Rescan FPC Source Directory" to update CodeTools directory > cache. > Now it works like a charm! :-) Thank you! -- Silvio Clécio -------------- next part -------------- An HTML attachment was scrubbed... URL: From alfred at consulab.nl Wed Aug 17 11:31:43 2016 From: alfred at consulab.nl (Alfred) Date: Wed, 17 Aug 2016 09:31:43 +0000 Subject: [Lazarus] GDB on Win32 and Win64 (feature request) Message-ID: While developing (and debugging) for Win32 and Win64, I have to frequently switch the target between these two. This also means: switching the debugger in the tools menu. Am I missing something, or would it be an idea to add the debugger location into the target dependent options ? -------------- next part -------------- An HTML attachment was scrubbed... URL: From listbox at martoks-place.de Wed Aug 17 11:40:14 2016 From: listbox at martoks-place.de (Martok) Date: Wed, 17 Aug 2016 11:40:14 +0200 Subject: [Lazarus] GDB on Win32 and Win64 (feature request) In-Reply-To: References: Message-ID: > Am I missing something, or would it be an idea to add the debugger location into > the target dependent options ? You can use target/platform macros there. The default for the directory structure from the installer should be: $(LazarusDir)\mingw\bin\$(TargetCPU)-$(TargetOS)\gdb.exe From mail at michael-ring.org Wed Aug 17 11:47:11 2016 From: mail at michael-ring.org (Michael Ring) Date: Wed, 17 Aug 2016 11:47:11 +0200 Subject: [Lazarus] GDB on Win32 and Win64 (feature request) In-Reply-To: References: Message-ID: Great tip! I was searching for something like this for a while! Michael Am 17.08.16 um 11:40 schrieb Martok: >> Am I missing something, or would it be an idea to add the debugger location into >> the target dependent options ? > You can use target/platform macros there. The default for the directory > structure from the installer should be: > > $(LazarusDir)\mingw\bin\$(TargetCPU)-$(TargetOS)\gdb.exe > > From alfred at consulab.nl Wed Aug 17 12:12:43 2016 From: alfred at consulab.nl (Alfred) Date: Wed, 17 Aug 2016 10:12:43 +0000 Subject: [Lazarus] GDB on Win32 and Win64 (feature request) In-Reply-To: Message-ID: Thanks. Working ! >$(LazarusDir)\mingw\bin\$(TargetCPU)-$(TargetOS)\gdb.exe From steveg at nevets.com.au Thu Aug 18 01:34:31 2016 From: steveg at nevets.com.au (steveg) Date: Thu, 18 Aug 2016 09:04:31 +0930 Subject: [Lazarus] Foundation In-Reply-To: References: <82b0ee53-661b-8075-a27a-1ab4bbf84e53@nevets.com.au> Message-ID: <79c88de9-3f57-ccc4-b8f8-347ac3ef924d@nevets.com.au> On 16/08/16 21:31, Michael Van Canneyt wrote: > > > On Tue, 16 Aug 2016, steveg wrote: > >> Would anybody know if there is an english page available for the >> Freepascal/Lazarus foundation donations page ? >> >> Not having much luck with the translations so far :) > > My apologies, this is something which I intended to do a long time > ago, and it > slipped my mind. > > The paypal page is now in english. > > Michael. Thank you Michael - all done now :) -------------- next part -------------- An HTML attachment was scrubbed... URL: From marc at dommelstein.nl Sat Aug 20 19:49:45 2016 From: marc at dommelstein.nl (Marc Weustink) Date: Sat, 20 Aug 2016 19:49:45 +0200 Subject: [Lazarus] Test ( nt) Message-ID: <31B728CA-006A-4523-9A32-9ABC9A1885CA@dommelstein.nl> From donald at ziesig.org Sun Aug 21 15:48:20 2016 From: donald at ziesig.org (Donald Ziesig) Date: Sun, 21 Aug 2016 09:48:20 -0400 Subject: [Lazarus] HiRes for IDC icons Message-ID: <47cf144b-81f0-af4f-ddeb-e4bc824e04f5@ziesig.org> Hi Qll! I just got a band new laptop :-D witth a 1920x1080 display. I set it up with Linux Mint 18 Xfce and have been working on the display resolution for the past day or so. Almost everything is set up so I can see/read it. The big problem is with Lazarus IDE icons. The control buttons are so small that they are almost invisible which makes them extremely hard to use. I have changed the display resolution with xrandr. Most apps follow this. Those that don't do follow the system font setting. How can I rescale the IDE buttons (with or without changing the font size) so they are visible? Thanks, Don Ziesig From luizamericop at gmail.com Mon Aug 22 03:06:50 2016 From: luizamericop at gmail.com (Luiz Americo Pereira Camara) Date: Sun, 21 Aug 2016 22:06:50 -0300 Subject: [Lazarus] VirtualTreeView 5.5 and binary size In-Reply-To: References: Message-ID: Sending again, in case not received in list due to recent issues 2016-08-14 6:32 GMT-03:00 Jürgen Hestermann : > I just switched to VirtualTreeView 5.5. Here > > http://forum.lazarus.freepascal.org/index.php?topic=32856.0 > > it says, that the binary would be smaller with version 5.5 > The change in binary size compares with the previous LCL release so version 4.8.7 - LCL Release 4 should be smaller than version 4.8.7 - LCL Release 3 Since there's no previous 5.5 release for LCL, the comparison does not apply > > but as I now used it, the opposite is the case: > > With VirtualTreeView version 4.8 my program binary size was > > 4,792,851 bytes. > > After switching to version 5.5 (together with LCLextension 0.6) > > the binary increases to > > 5,962,259 bytes. > > Is that as expected? > With the port of 5.x Delphi branch, comes the new features but also the increased size. Anyway i think the increased size is too big. I will investigate to see if is related to changes in original code or something related to the port > > > I now switched back to version 4.8 and the binary is back to the smaller > size. > > Together with the changes in code I would have to do and the lesser number > > of supported OSs I don't see any benefit in using version 5.5. > > What OS does not work with 5.5? > Are there any? > > You must refer to original code documentation, which is really lacking to describe the changes. You must dig at changes file https://github.com/Virtual-TreeView/Virtual-TreeView/blob/master/CHANGES.txt or in the google group: https://groups.google.com/forum/?nomobile=true#! searchin/virtual-treeview/released|sort:relevance Luiz 2016-08-14 6:32 GMT-03:00 Jürgen Hestermann : > I just switched to VirtualTreeView 5.5. Here > > http://forum.lazarus.freepascal.org/index.php?topic=32856.0 > > it says, that the binary would be smaller with version 5.5 > > but as I now used it, the opposite is the case: > > With VirtualTreeView version 4.8 my program binary size was > > 4,792,851 bytes. > > After switching to version 5.5 (together with LCLextension 0.6) > > the binary increases to > > 5,962,259 bytes. > > Is that as expected? > > > I now switched back to version 4.8 and the binary is back to the smaller > size. > > Together with the changes in code I would have to do and the lesser number > > of supported OSs I don't see any benefit in using version 5.5. > > Are there any? > > > -- > _______________________________________________ > Lazarus mailing list > Lazarus at lists.lazarus-ide.org > http://lists.lazarus-ide.org/listinfo/lazarus > -------------- next part -------------- An HTML attachment was scrubbed... URL: From mailinglists at geldenhuys.co.uk Mon Aug 22 10:14:02 2016 From: mailinglists at geldenhuys.co.uk (Graeme Geldenhuys) Date: Mon, 22 Aug 2016 09:14:02 +0100 Subject: [Lazarus] VirtualTreeView 5.5 and binary size In-Reply-To: References: Message-ID: On 2016-08-14 10:32, Jürgen Hestermann wrote: > Is that as expected? I’m not using VirtualTreeview myself, but as someone that works on multiple large frameworks, I could make a personal observation. A jump from v4.8 to v5.5 seems like a major jump (a major version change, and multiple minor version increases), and if lots of new functionality was added (and no major refactoring was done) it seems logical that the binary size increases. More code equals larger binaries. If the functionality added is worth the 1.2MB binary increase? That’s for you to decide. If you are happy with the workings of v4.8 and require a smaller binary size, then simply stay with v4.8. Regards, Graeme -- fpGUI Toolkit - a cross-platform GUI toolkit using Free Pascal http://fpgui.sourceforge.net/ My public PGP key: http://tinyurl.com/graeme-pgp From juergen.hestermann at gmx.de Mon Aug 22 16:47:40 2016 From: juergen.hestermann at gmx.de (=?UTF-8?Q?J=c3=bcrgen_Hestermann?=) Date: Mon, 22 Aug 2016 16:47:40 +0200 Subject: [Lazarus] VirtualTreeView 5.5 and binary size In-Reply-To: References: Message-ID: Am 2016-08-22 um 03:06 schrieb Luiz Americo Pereira Camara: > Sending again, in case not received in list due to recent issues > 2016-08-14 6:32 GMT-03:00 Jürgen Hestermann : > I just switched to VirtualTreeView 5.5. Here > http://forum.lazarus.freepascal.org/index.php?topic=32856.0 > it says, that the binary would be smaller with version 5.5 > The change in binary size compares with the previous LCL release so version 4.8.7 - LCL Release 4 should be smaller than version 4.8.7 - LCL Release 3 > Since there's no previous 5.5 release for LCL, the comparison does not apply Okay, this was not clear from the simple sentence: Major changes: - Uses native resources instead of Lazarus resources: smaller binary > What OS does not work with 5.5? I don't know about special issues with certain OSes. I am just under the impression that 4.8.7 is tested (successfully) on more OSes than 5.5 so issues *may* occur with 5.5. Therefore I would be on the safe side when using 4.8.7 (especially as I don't need any of the changes in 5.5 as far as I see) From l.rame at griensu.com Tue Aug 23 02:56:18 2016 From: l.rame at griensu.com (=?UTF-8?Q?Leonardo_M._Ram=c3=a9?=) Date: Mon, 22 Aug 2016 21:56:18 -0300 Subject: [Lazarus] ZeroMQ Bindings Message-ID: <3ee43af6-4e39-be6e-f93a-180f637e7af5@griensu.com> Hi, I need to use ZeroMQ for inter process communication, but the bindings at https://github.com/bvarga/delphizmq does not seems to work, at least on Linux (XUbuntu 16.04 64bits) and zmq 4.2. The client is an C++ app and the server is the FPC/Lazarus one. Before trying with Lazarus I did this very simple Python program and it worked: import zmq context = zmq.Context() socket = context.socket(zmq.REP) socket.bind("ipc://localscp") while True: # Wait for next request from client message = socket.recv() print "Received request: ", message socket.send("AA") The port to FPC/Lazarus should be this: var context: pointer; responder: pointer; buf: array[0..9] of char; begin context := zmq_ctx_new; responder := zmq_socket(context, ZMQ_REP); zmq_bind(responder, 'ipc:///localscp'); while true do begin zmq_recv(responder, buf, 10, 0); // here hangs writeln(buf); end; end; Any hint? -- Leonardo M. Ramé Medical IT - Griensu S.A. Av. Colón 636 - Piso 8 Of. A X5000EPT -- Córdoba Tel.: +54(351)4246924 +54(351)4247788 +54(351)4247979 int. 19 Cel.: +54 9 (011) 40871877 From juha.manninen62 at gmail.com Tue Aug 23 09:55:51 2016 From: juha.manninen62 at gmail.com (Juha Manninen) Date: Tue, 23 Aug 2016 10:55:51 +0300 Subject: [Lazarus] test Message-ID: Testing ... last time I got a boomerang from this list. From sandro.cumerlato at gmail.com Tue Aug 23 12:31:11 2016 From: sandro.cumerlato at gmail.com (Sandro Cumerlato) Date: Tue, 23 Aug 2016 12:31:11 +0200 Subject: [Lazarus] ZeroMQ Bindings In-Reply-To: <3ee43af6-4e39-be6e-f93a-180f637e7af5@griensu.com> References: <3ee43af6-4e39-be6e-f93a-180f637e7af5@griensu.com> Message-ID: Hello Leonardo, please test attached "client.pas" source code. Sandro Cumerlato On 23 August 2016 at 02:56, Leonardo M. Ramé wrote: ... > The port to FPC/Lazarus should be this: > > var > context: pointer; > responder: pointer; > buf: array[0..9] of char; > begin > context := zmq_ctx_new; > responder := zmq_socket(context, ZMQ_REP); > zmq_bind(responder, 'ipc:///localscp'); too many "/" here > > while true do > begin > zmq_recv(responder, buf, 10, 0); // here hangs you have to pass a pointer to buf[0] I guess > writeln(buf); > end; > end; > > Any hint? > -------------- next part -------------- A non-text attachment was scrubbed... Name: client.pas Type: application/octet-stream Size: 389 bytes Desc: not available URL: From sandro.cumerlato at gmail.com Tue Aug 23 12:39:38 2016 From: sandro.cumerlato at gmail.com (Sandro Cumerlato) Date: Tue, 23 Aug 2016 12:39:38 +0200 Subject: [Lazarus] HiRes for IDC icons In-Reply-To: <47cf144b-81f0-af4f-ddeb-e4bc824e04f5@ziesig.org> References: <47cf144b-81f0-af4f-ddeb-e4bc824e04f5@ziesig.org> Message-ID: Hello Don, this is a "known" issue of the Lazarus IDE. Is it already listed on the Lazarus Bugtracker? If the problem is related to the size of the component palette buttons, I have a partial patch for it to work on... Best regards, Sandro Cumerlato Index: components/ideintf/formeditingintf.pas =================================================================== --- components/ideintf/formeditingintf.pas (revision 51215) +++ components/ideintf/formeditingintf.pas (working copy) @@ -20,8 +20,8 @@ LCLClasses, ProjectIntf, ComponentEditors, ObjectInspector, UnitResources; const - ComponentPaletteImageWidth = 24; - ComponentPaletteImageHeight = 24; + ComponentPaletteImageWidth = 48; + ComponentPaletteImageHeight = 48; ComponentPaletteBtnWidth = ComponentPaletteImageWidth + 3; ComponentPaletteBtnHeight = ComponentPaletteImageHeight + 3; DesignerBaseClassId_TForm = 0; On 21 August 2016 at 15:48, Donald Ziesig wrote: > Hi Qll! > > > I just got a band new laptop :-D witth a 1920x1080 display. I set it up > with Linux Mint 18 Xfce and have been working on the display resolution for > the past day or so. > > > Almost everything is set up so I can see/read it. The big problem is with > Lazarus IDE icons. The control buttons are so small that they are almost > invisible which makes them extremely hard to use. I have changed the > display resolution with xrandr. Most apps follow this. Those that don't do > follow the system font setting. > > > How can I rescale the IDE buttons (with or without changing the font size) > so they are visible? > > > Thanks, > > > Don Ziesig > > > -- > _______________________________________________ > Lazarus mailing list > Lazarus at lists.lazarus-ide.org > http://lists.lazarus-ide.org/listinfo/lazarus From nc-gaertnma at netcologne.de Tue Aug 23 13:14:34 2016 From: nc-gaertnma at netcologne.de (Mattias Gaertner) Date: Tue, 23 Aug 2016 13:14:34 +0200 Subject: [Lazarus] HiRes for IDC icons In-Reply-To: References: <47cf144b-81f0-af4f-ddeb-e4bc824e04f5@ziesig.org> Message-ID: <20160823131434.2db5286d@limapholos.matflo.wg> On Tue, 23 Aug 2016 12:39:38 +0200 Sandro Cumerlato wrote: > Hello Don, > this is a "known" issue of the Lazarus IDE. > > Is it already listed on the Lazarus Bugtracker? > > If the problem is related to the size of the component palette > buttons, I have a partial patch for it to work on... > > Best regards, > Sandro Cumerlato > > > Index: components/ideintf/formeditingintf.pas > =================================================================== > --- components/ideintf/formeditingintf.pas (revision 51215) > +++ components/ideintf/formeditingintf.pas (working copy) > @@ -20,8 +20,8 @@ > LCLClasses, ProjectIntf, ComponentEditors, ObjectInspector, UnitResources; > > const > - ComponentPaletteImageWidth = 24; > - ComponentPaletteImageHeight = 24; > + ComponentPaletteImageWidth = 48; > + ComponentPaletteImageHeight = 48; That needs a more flexible solution. What do you purpose? Mattias From sandro.cumerlato at gmail.com Tue Aug 23 13:33:26 2016 From: sandro.cumerlato at gmail.com (Sandro Cumerlato) Date: Tue, 23 Aug 2016 13:33:26 +0200 Subject: [Lazarus] HiRes for IDC icons In-Reply-To: <20160823131434.2db5286d@limapholos.matflo.wg> References: <47cf144b-81f0-af4f-ddeb-e4bc824e04f5@ziesig.org> <20160823131434.2db5286d@limapholos.matflo.wg> Message-ID: Hello Mattias, please take a look at the following image and at the attached "partial" patch: ​ Well, attached patch introduces a ButtonSizeSpinEdit and a ButtonSizeLabel within the ComponentPalette - IDE Options frame. SpinEdit value is saved/restored to/from the Lazarus - IDE Options settings file. *** TODO *** 1) implement ButtonSizeLabel localizations (recalling localizations from .po files, I huess). 2) connect ButtonSizeSpinEdit changed value to ComponentPalette[Image/Btn][Width/Height], these values are actually *hardcoded* within the "components/ideintf/formeditingintf.pas" file as listed here: Index: components/ideintf/formeditingintf.pas =================================================================== --- components/ideintf/formeditingintf.pas (revision 51215) +++ components/ideintf/formeditingintf.pas (working copy) @@ -20,8 +20,8 @@ LCLClasses, ProjectIntf, ComponentEditors, ObjectInspector, UnitResources; const - ComponentPaletteImageWidth = 24; - ComponentPaletteImageHeight = 24; + ComponentPaletteImageWidth = 48; + ComponentPaletteImageHeight = 48; ComponentPaletteBtnWidth = ComponentPaletteImageWidth + 3; ComponentPaletteBtnHeight = ComponentPaletteImageHeight + 3; DesignerBaseClassId_TForm = 0; ... Can you please take care of the missing part of the patch? I've looked within the Lazarus IDE source code, but it seems an hard task for me to implement it, sorry. Thank you for your cooperation. Sandro Cumerlato On 23 August 2016 at 13:14, Mattias Gaertner wrote: > On Tue, 23 Aug 2016 12:39:38 +0200 > Sandro Cumerlato wrote: > > > Hello Don, > > this is a "known" issue of the Lazarus IDE. > > > > Is it already listed on the Lazarus Bugtracker? > > > > If the problem is related to the size of the component palette > > buttons, I have a partial patch for it to work on... > > > > Best regards, > > Sandro Cumerlato > > > > > > Index: components/ideintf/formeditingintf.pas > > =================================================================== > > --- components/ideintf/formeditingintf.pas (revision 51215) > > +++ components/ideintf/formeditingintf.pas (working copy) > > @@ -20,8 +20,8 @@ > > LCLClasses, ProjectIntf, ComponentEditors, ObjectInspector, > UnitResources; > > > > const > > - ComponentPaletteImageWidth = 24; > > - ComponentPaletteImageHeight = 24; > > + ComponentPaletteImageWidth = 48; > > + ComponentPaletteImageHeight = 48; > > That needs a more flexible solution. > What do you purpose? > > Mattias > -- > _______________________________________________ > Lazarus mailing list > Lazarus at lists.lazarus-ide.org > http://lists.lazarus-ide.org/listinfo/lazarus > -------------- next part -------------- An HTML attachment was scrubbed... URL: -------------- next part -------------- A non-text attachment was scrubbed... Name: button_size.png Type: image/png Size: 23742 bytes Desc: not available URL: -------------- next part -------------- Index: components/ideintf/componentreg.pas =================================================================== --- components/ideintf/componentreg.pas (revision 51215) +++ components/ideintf/componentreg.pas (working copy) @@ -84,6 +84,7 @@ // Pages removed or renamed. They must be hidden in the palette. FHiddenPageNames: TStringList; FVisible: boolean; + FButtonSize: integer; public constructor Create; destructor Destroy; override; @@ -95,6 +96,7 @@ public property HiddenPageNames: TStringList read FHiddenPageNames; property Visible: boolean read FVisible write FVisible; + property ButtonSize: integer read FButtonSize write FButtonSize; end; { TCompPaletteUserOrder } @@ -407,6 +409,7 @@ inherited Create; FHiddenPageNames := TStringList.Create; FVisible := True; + FButtonSize := 24; end; destructor TCompPaletteOptions.Destroy; @@ -426,6 +429,7 @@ inherited Assign(Source); FHiddenPageNames.Assign(Source.FHiddenPageNames); FVisible := Source.FVisible; + FButtonSize := Source.FButtonSize; end; function TCompPaletteOptions.IsDefault: Boolean; @@ -446,6 +450,7 @@ Path := Path + BasePath; try FVisible:=XMLConfig.GetValue(Path+'Visible/Value',true); + FButtonSize:=XMLConfig.GetValue(Path+'ButtonSize/Value',24); // Pages FPageNames.Clear; @@ -498,7 +503,8 @@ begin try Path := Path + BasePath; - XMLConfig.SetDeleteValue(Path+'Visible/Value', FVisible,true); + XMLConfig.SetDeleteValue(Path+'Visible/Value', FVisible, true); + XMLConfig.SetDeleteValue(Path+'ButtonSize/Value', FButtonSize, 24); SubPath:=Path+'Pages/'; XMLConfig.DeletePath(SubPath); Index: components/ideintf/formeditingintf.pas =================================================================== --- components/ideintf/formeditingintf.pas (revision 51215) +++ components/ideintf/formeditingintf.pas (working copy) @@ -20,8 +20,8 @@ LCLClasses, ProjectIntf, ComponentEditors, ObjectInspector, UnitResources; const - ComponentPaletteImageWidth = 24; - ComponentPaletteImageHeight = 24; + ComponentPaletteImageWidth = 48; + ComponentPaletteImageHeight = 48; ComponentPaletteBtnWidth = ComponentPaletteImageWidth + 3; ComponentPaletteBtnHeight = ComponentPaletteImageHeight + 3; DesignerBaseClassId_TForm = 0; Index: ide/frames/componentpalette_options.lfm =================================================================== --- ide/frames/componentpalette_options.lfm (revision 51215) +++ ide/frames/componentpalette_options.lfm (working copy) @@ -7,11 +7,11 @@ ClientWidth = 589 TabOrder = 0 Visible = False - DesignLeft = 494 - DesignTop = 307 + DesignLeft = 644 + DesignTop = 315 object PagesGroupBox: TGroupBox AnchorSideLeft.Control = Owner - AnchorSideTop.Control = cbPaletteVisible + AnchorSideTop.Control = ButtonSizeSpinEdit AnchorSideTop.Side = asrBottom AnchorSideRight.Control = Splitter1 AnchorSideRight.Side = asrBottom @@ -18,13 +18,13 @@ AnchorSideBottom.Control = Owner AnchorSideBottom.Side = asrBottom Left = 0 - Height = 440 - Top = 28 + Height = 394 + Top = 74 Width = 195 Anchors = [akTop, akLeft, akRight, akBottom] BorderSpacing.Top = 6 Caption = 'PagesGroupBox' - ClientHeight = 419 + ClientHeight = 364 ClientWidth = 191 Constraints.MinWidth = 100 TabOrder = 0 @@ -34,7 +34,7 @@ AnchorSideRight.Control = PageMoveUpBtn AnchorSideBottom.Control = AddPageButton Left = 1 - Height = 326 + Height = 251 Top = 0 Width = 156 Anchors = [akTop, akLeft, akRight, akBottom] @@ -54,9 +54,9 @@ AnchorSideTop.Side = asrBottom AnchorSideBottom.Control = ImportDividerBevel Left = 1 - Height = 29 - Top = 332 - Width = 49 + Height = 35 + Top = 257 + Width = 77 Anchors = [akLeft, akBottom] AutoSize = True BorderSpacing.Top = 6 @@ -70,10 +70,10 @@ AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = AddPageButton AnchorSideBottom.Side = asrBottom - Left = 59 - Height = 29 - Top = 332 - Width = 101 + Left = 87 + Height = 35 + Top = 257 + Width = 146 AutoSize = True BorderSpacing.Left = 9 BorderSpacing.Bottom = 6 @@ -118,8 +118,8 @@ AnchorSideRight.Side = asrBottom AnchorSideBottom.Control = ImportButton Left = 1 - Height = 17 - Top = 367 + Height = 25 + Top = 298 Width = 190 Caption = 'Import / Export' Anchors = [akLeft, akRight, akBottom] @@ -133,10 +133,10 @@ AnchorSideTop.Side = asrCenter AnchorSideBottom.Control = PagesGroupBox AnchorSideBottom.Side = asrBottom - Left = 77 - Height = 29 - Top = 384 - Width = 65 + Left = 108 + Height = 35 + Top = 323 + Width = 98 AutoSize = True BorderSpacing.Left = 13 BorderSpacing.Bottom = 6 @@ -151,9 +151,9 @@ AnchorSideBottom.Control = PagesGroupBox AnchorSideBottom.Side = asrBottom Left = 1 - Height = 29 - Top = 384 - Width = 63 + Height = 35 + Top = 323 + Width = 94 Anchors = [akLeft, akBottom] AutoSize = True BorderSpacing.Top = 3 @@ -177,7 +177,7 @@ Anchors = [akTop, akLeft, akRight, akBottom] BorderSpacing.Left = 6 Caption = 'ComponentsGroupBox' - ClientHeight = 447 + ClientHeight = 438 ClientWidth = 384 TabOrder = 1 object ComponentsListView: TListView @@ -187,7 +187,7 @@ AnchorSideBottom.Control = ComponentsGroupBox AnchorSideBottom.Side = asrBottom Left = 1 - Height = 445 + Height = 436 Top = 1 Width = 349 Anchors = [akTop, akLeft, akRight, akBottom] @@ -276,13 +276,46 @@ object cbPaletteVisible: TCheckBox AnchorSideTop.Side = asrBottom Left = 1 - Height = 22 + Height = 29 Top = 0 - Width = 115 + Width = 154 BorderSpacing.Top = 6 Caption = 'Palette is visible' TabOrder = 3 end + object ButtonSizeSpinEdit: TSpinEdit + AnchorSideLeft.Control = Owner + AnchorSideTop.Control = cbPaletteVisible + AnchorSideTop.Side = asrBottom + AnchorSideRight.Control = ButtonSizeLabel + Left = 0 + Height = 33 + Top = 35 + Width = 72 + BorderSpacing.Top = 6 + Increment = 24 + MaxValue = 96 + MinValue = 24 + TabOrder = 4 + Value = 24 + end + object ButtonSizeLabel: TLabel + AnchorSideLeft.Control = ButtonSizeSpinEdit + AnchorSideLeft.Side = asrBottom + AnchorSideTop.Control = cbPaletteVisible + AnchorSideTop.Side = asrBottom + AnchorSideRight.Control = Splitter1 + AnchorSideRight.Side = asrBottom + Left = 78 + Height = 25 + Top = 38 + Width = 117 + Anchors = [akTop, akLeft, akRight] + BorderSpacing.Left = 6 + BorderSpacing.Top = 9 + Caption = 'Button size' + ParentColor = False + end object ImportDialog: TOpenDialog left = 168 top = 432 Index: ide/frames/componentpalette_options.pas =================================================================== --- ide/frames/componentpalette_options.pas (revision 51215) +++ ide/frames/componentpalette_options.pas (working copy) @@ -26,10 +26,9 @@ uses Classes, SysUtils, Graphics, Forms, Controls, StdCtrls, Dialogs, Buttons, - ComCtrls, ExtCtrls, FileUtil, LCLProc, LCLType, Menus, IDEProcs, Laz2_XMLCfg, - EnvironmentOpts, LazarusIDEStrConsts, IDEOptionsIntf, - IDEImagesIntf, DividerBevel, ComponentReg, IDEOptionDefs, - PackageDefs; + ComCtrls, ExtCtrls, FileUtil, LCLProc, LCLType, Menus, Spin, IDEProcs, + Laz2_XMLCfg, EnvironmentOpts, LazarusIDEStrConsts, IDEOptionsIntf, + IDEImagesIntf, DividerBevel, ComponentReg, IDEOptionDefs, PackageDefs; type { TCompPaletteOptionsFrame } @@ -41,6 +40,7 @@ ComponentsListView: TListView; CompMoveDownBtn: TSpeedButton; DeleteMenuItem: TMenuItem; + ButtonSizeLabel: TLabel; RenameMenuItem: TMenuItem; PagesPopupMenu: TPopupMenu; ExportButton: TBitBtn; @@ -54,6 +54,7 @@ PagesGroupBox: TGroupBox; RestoreButton: TBitBtn; ExportDialog: TSaveDialog; + ButtonSizeSpinEdit: TSpinEdit; Splitter1: TSplitter; procedure AddPageButtonClick(Sender: TObject); procedure ComponentsListViewChange(Sender: TObject; Item: TListItem; @@ -194,6 +195,7 @@ fLocalOptions.Assign(Opts); fLocalUserOrder.Options := fLocalOptions; cbPaletteVisible.Checked := Opts.Visible; + ButtonSizeSpinEdit.Value := Opts.ButtonSize; ActualReadSettings; end; @@ -213,6 +215,7 @@ begin Opts := (AOptions as TEnvironmentOptions).Desktop.ComponentPaletteOptions; Opts.Visible := cbPaletteVisible.Checked; + Opts.ButtonSize := ButtonSizeSpinEdit.Value; MainIDEBar.DoSetViewComponentPalette(cbPaletteVisible.Checked); if not fConfigChanged then Exit; ActualWriteSettings(Opts); From vojtech.cihak at atlas.cz Tue Aug 23 13:53:24 2016 From: vojtech.cihak at atlas.cz (=?utf-8?q?Vojt=C4=9Bch_=C4=8Cih=C3=A1k?=) Date: Tue, 23 Aug 2016 13:53:24 +0200 Subject: [Lazarus] =?utf-8?q?HiRes_for_IDC_icons?= In-Reply-To: 0000000061f40001fb6000ea5086 References: <47cf144b-81f0-af4f-ddeb-e4bc824e04f5@ziesig.org>, , <20160823131434.2db5286d@limapholos.matflo.wg> 0000000061f40001fb6000ea5086 Message-ID: <20160823135324.32ADA2BB@atlas.cz> Will this need to draw again all the hundreds icons of Lazarus components in higher resolution? Proper solution would be to distribute *.svg icons packed in *.lrs or *.res resource files of packages and Lazarus will contain something like "rsvg-convert" and will convert *.svg to *.png (*.bmp, *.ico) during installation. V. ______________________________________________________________ > Od: Sandro Cumerlato > Komu: Lazarus mailing list > Datum: 23.08.2016 13:33 > Předmět: Re: [Lazarus] HiRes for IDC icons From l.rame at griensu.com Tue Aug 23 14:06:23 2016 From: l.rame at griensu.com (=?UTF-8?Q?Leonardo_M._Ram=c3=a9?=) Date: Tue, 23 Aug 2016 09:06:23 -0300 Subject: [Lazarus] ZeroMQ Bindings In-Reply-To: References: <3ee43af6-4e39-be6e-f93a-180f637e7af5@griensu.com> Message-ID: El 23/08/16 a las 07:31, Sandro Cumerlato escribió: > Hello Leonardo, > please test attached "client.pas" source code. > > > Sandro Cumerlato > > Thanks Sandro, looks like the only change is this zmq_recv(responder, @buf[0], 10, 0); But when I change the code to that I get this error: unit1.pas(52,42) Error: Can't assign values to an address Regards, -- Leonardo M. Ramé Medical IT - Griensu S.A. Av. Colón 636 - Piso 8 Of. A X5000EPT -- Córdoba Tel.: +54(351)4246924 +54(351)4247788 +54(351)4247979 int. 19 Cel.: +54 9 (011) 40871877 From sandro.cumerlato at gmail.com Tue Aug 23 14:22:09 2016 From: sandro.cumerlato at gmail.com (Sandro Cumerlato) Date: Tue, 23 Aug 2016 14:22:09 +0200 Subject: [Lazarus] ZeroMQ Bindings In-Reply-To: References: <3ee43af6-4e39-be6e-f93a-180f637e7af5@griensu.com> Message-ID: Hello Leonardo, try to change your binding zmq.pas file like this: function zmq_recv (s: pointer; buf: pointer; len: size_t; flags: Integer): Integer; cdecl; external libzmq; it should be the correct translation of original code: ZMQ_EXPORT int zmq_recv (void *s, void *buf, size_t len, int flags); Sandro Cumerlato On 23 August 2016 at 14:06, Leonardo M. Ramé wrote: ... > zmq_recv(responder, @buf[0], 10, 0); > > But when I change the code to that I get this error: > > unit1.pas(52,42) Error: Can't assign values to an address > > Regards, From nc-gaertnma at netcologne.de Tue Aug 23 14:23:08 2016 From: nc-gaertnma at netcologne.de (Mattias Gaertner) Date: Tue, 23 Aug 2016 14:23:08 +0200 Subject: [Lazarus] HiRes for IDC icons In-Reply-To: <20160823135324.32ADA2BB@atlas.cz> References: <47cf144b-81f0-af4f-ddeb-e4bc824e04f5@ziesig.org> <20160823131434.2db5286d@limapholos.matflo.wg> <20160823135324.32ADA2BB@atlas.cz> Message-ID: <20160823142308.2777344e@limapholos.matflo.wg> On Tue, 23 Aug 2016 13:53:24 +0200 Vojtěch Čihák wrote: > Will this need to draw again all the hundreds icons of Lazarus components in higher resolution? > Proper solution would be to distribute *.svg icons packed in *.lrs or *.res resource files of packages and Lazarus will contain something like "rsvg-convert" and will convert *.svg to *.png (*.bmp, *.ico) during installation. Scaling works bad with small icons. The svg might be useful on 4k+ displays. Why convert on installation? Mattias From sandro.cumerlato at gmail.com Tue Aug 23 14:38:50 2016 From: sandro.cumerlato at gmail.com (Sandro Cumerlato) Date: Tue, 23 Aug 2016 14:38:50 +0200 Subject: [Lazarus] HiRes for IDC icons In-Reply-To: <20160823135324.32ADA2BB@atlas.cz> References: <47cf144b-81f0-af4f-ddeb-e4bc824e04f5@ziesig.org> <20160823131434.2db5286d@limapholos.matflo.wg> <20160823135324.32ADA2BB@atlas.cz> Message-ID: Hello Vojtěch, patch doesn't alter icon visualization, just increase (and make usable and even touchable!) all the Componet Palette buttons, even on HighDPI devices. SVG icons distribution is another matter: I believe that the Lazarus project should use *only* the SVG file format to store icons (and other images in general) within the svn trunk repository. Furthermore, to avoid lossless of quality during conversion a different set of SVG files should be created: icon1_24x24.svg, icon1_48x48.svg, icon1_96x96.svg, and so on for all the images/icons used... If you are thinking that this is too much work to manage then think to the benefits. "rsvg-convert" tool is a good solution to convert from SVG to PNG, since fpvectorial is still immature for such purpose. Best regards, Sandro Cumerlato On 23 August 2016 at 13:53, Vojtěch Čihák wrote: > Will this need to draw again all the hundreds icons of Lazarus components in higher resolution? > Proper solution would be to distribute *.svg icons packed in *.lrs or *.res resource files of packages and Lazarus will contain something like "rsvg-convert" and will convert *.svg to *.png (*.bmp, *.ico) during installation. > > V. > ______________________________________________________________ >> Od: Sandro Cumerlato >> Komu: Lazarus mailing list >> Datum: 23.08.2016 13:33 >> Předmět: Re: [Lazarus] HiRes for IDC icons > -- > _______________________________________________ > Lazarus mailing list > Lazarus at lists.lazarus-ide.org > http://lists.lazarus-ide.org/listinfo/lazarus From l.rame at griensu.com Tue Aug 23 14:39:47 2016 From: l.rame at griensu.com (=?UTF-8?Q?Leonardo_M._Ram=c3=a9?=) Date: Tue, 23 Aug 2016 09:39:47 -0300 Subject: [Lazarus] ZeroMQ Bindings In-Reply-To: References: <3ee43af6-4e39-be6e-f93a-180f637e7af5@griensu.com> Message-ID: <00adc239-6774-3416-8639-9a87eed306c3@griensu.com> El 23/08/16 a las 09:22, Sandro Cumerlato escribió: > Hello Leonardo, > try to change your binding zmq.pas file like this: > > function zmq_recv (s: pointer; buf: pointer; len: size_t; flags: > Integer): Integer; cdecl; external libzmq; > > > it should be the correct translation of original code: > > ZMQ_EXPORT int zmq_recv (void *s, void *buf, size_t len, int flags); > > This time it compiles, but hands on the zmq_recv. -- Leonardo M. Ramé Medical IT - Griensu S.A. Av. Colón 636 - Piso 8 Of. A X5000EPT -- Córdoba Tel.: +54(351)4246924 +54(351)4247788 +54(351)4247979 int. 19 Cel.: +54 9 (011) 40871877 From wkitty42 at windstream.net Tue Aug 23 14:42:45 2016 From: wkitty42 at windstream.net (wkitty42 at windstream.net) Date: Tue, 23 Aug 2016 08:42:45 -0400 Subject: [Lazarus] test In-Reply-To: References: Message-ID: On 08/23/2016 03:55 AM, Juha Manninen wrote: > Testing ... last time I got a boomerang from this list. no boomerang this time... -- NOTE: No off-list assistance is given without prior approval. *Please keep mailing list traffic on the list* unless private contact is specifically requested and granted. From wkitty42 at windstream.net Tue Aug 23 14:45:54 2016 From: wkitty42 at windstream.net (wkitty42 at windstream.net) Date: Tue, 23 Aug 2016 08:45:54 -0400 Subject: [Lazarus] HiRes for IDC icons In-Reply-To: <20160823135324.32ADA2BB@atlas.cz> References: <47cf144b-81f0-af4f-ddeb-e4bc824e04f5@ziesig.org> <20160823131434.2db5286d@limapholos.matflo.wg> <20160823135324.32ADA2BB@atlas.cz> Message-ID: <8ed79069-b539-6c6f-4353-50e83a3d588d@windstream.net> On 08/23/2016 07:53 AM, Vojtěch Čihák wrote: > Proper solution would be to distribute *.svg icons packed in *.lrs or *.res > resource files of packages and Lazarus will contain something like > "rsvg-convert" and will convert *.svg to *.png (*.bmp, *.ico) during > installation. why? why not just use SVG as is? no conversion needed... -- NOTE: No off-list assistance is given without prior approval. *Please keep mailing list traffic on the list* unless private contact is specifically requested and granted. From l.rame at griensu.com Tue Aug 23 14:48:21 2016 From: l.rame at griensu.com (=?UTF-8?Q?Leonardo_M._Ram=c3=a9?=) Date: Tue, 23 Aug 2016 09:48:21 -0300 Subject: [Lazarus] ZeroMQ Bindings In-Reply-To: <00adc239-6774-3416-8639-9a87eed306c3@griensu.com> References: <3ee43af6-4e39-be6e-f93a-180f637e7af5@griensu.com> <00adc239-6774-3416-8639-9a87eed306c3@griensu.com> Message-ID: <08fb80f8-53be-f651-f270-c0c653e7627b@griensu.com> El 23/08/16 a las 09:39, Leonardo M. Ramé escribió: > > El 23/08/16 a las 09:22, Sandro Cumerlato escribió: >> Hello Leonardo, >> try to change your binding zmq.pas file like this: >> >> function zmq_recv (s: pointer; buf: pointer; len: size_t; flags: >> Integer): Integer; cdecl; external libzmq; >> >> >> it should be the correct translation of original code: >> >> ZMQ_EXPORT int zmq_recv (void *s, void *buf, size_t len, int flags); >> >> > > This time it compiles, but hands on the zmq_recv. > Sorry "hands" -> "hangs". -- Leonardo M. Ramé Medical IT - Griensu S.A. Av. Colón 636 - Piso 8 Of. A X5000EPT -- Córdoba Tel.: +54(351)4246924 +54(351)4247788 +54(351)4247979 int. 19 Cel.: +54 9 (011) 40871877 From juha.manninen62 at gmail.com Tue Aug 23 14:50:49 2016 From: juha.manninen62 at gmail.com (Juha Manninen) Date: Tue, 23 Aug 2016 15:50:49 +0300 Subject: [Lazarus] test In-Reply-To: References: Message-ID: On Tue, Aug 23, 2016 at 3:42 PM, wrote: > no boomerang this time... Good! There were some changes recently. Many people still cannot post here. The reasons are unknown. Juha From sandro.cumerlato at gmail.com Tue Aug 23 14:57:55 2016 From: sandro.cumerlato at gmail.com (Sandro Cumerlato) Date: Tue, 23 Aug 2016 14:57:55 +0200 Subject: [Lazarus] ZeroMQ Bindings In-Reply-To: <08fb80f8-53be-f651-f270-c0c653e7627b@griensu.com> References: <3ee43af6-4e39-be6e-f93a-180f637e7af5@griensu.com> <00adc239-6774-3416-8639-9a87eed306c3@griensu.com> <08fb80f8-53be-f651-f270-c0c653e7627b@griensu.com> Message-ID: I never played with ZeroMQ before, can you please provide the corresponding server side piece of source code? Sandro Cumerlato On 23 August 2016 at 14:48, Leonardo M. Ramé wrote: ... >> >> This time it compiles, but hands on the zmq_recv. >> > > Sorry "hands" -> "hangs". > From sandro.cumerlato at gmail.com Tue Aug 23 15:10:38 2016 From: sandro.cumerlato at gmail.com (Sandro Cumerlato) Date: Tue, 23 Aug 2016 15:10:38 +0200 Subject: [Lazarus] HiRes for IDC icons In-Reply-To: <8ed79069-b539-6c6f-4353-50e83a3d588d@windstream.net> References: <47cf144b-81f0-af4f-ddeb-e4bc824e04f5@ziesig.org> <20160823131434.2db5286d@limapholos.matflo.wg> <20160823135324.32ADA2BB@atlas.cz> <8ed79069-b539-6c6f-4353-50e83a3d588d@windstream.net> Message-ID: What do you mean? I'm quite sure that SVG visualization requires a rendering engine, my "favourite" one is LibRsvg (+ Cairo). Sandro Cumerlato On 23 August 2016 at 14:45, wrote: ... > > why? why not just use SVG as is? no conversion needed... > From sandro.cumerlato at gmail.com Tue Aug 23 15:23:30 2016 From: sandro.cumerlato at gmail.com (Sandro Cumerlato) Date: Tue, 23 Aug 2016 15:23:30 +0200 Subject: [Lazarus] HiRes for IDC icons In-Reply-To: <20160823142308.2777344e@limapholos.matflo.wg> References: <47cf144b-81f0-af4f-ddeb-e4bc824e04f5@ziesig.org> <20160823131434.2db5286d@limapholos.matflo.wg> <20160823135324.32ADA2BB@atlas.cz> <20160823142308.2777344e@limapholos.matflo.wg> Message-ID: Indeed, PNG images scaling is a bad practise. In contrary, scaling and adapting to different resolutions a SVG image is quite simple. Consider that in most cases icon1_24x24.svg content could be equal to icon1_48x48.svg and equal to icon1_96x96.svg, because changing the SVG document paper size (in pixels) and scaling initial content should be enough... if you need more details for the 96x96 image then you can modify icon1_96x96.svg file content only. Sandro Cumerlato On 23 August 2016 at 14:23, Mattias Gaertner wrote: ... > > Scaling works bad with small icons. The svg might be useful on 4k+ > displays. ... > > Mattias From l.rame at griensu.com Tue Aug 23 15:27:49 2016 From: l.rame at griensu.com (=?UTF-8?Q?Leonardo_M._Ram=c3=a9?=) Date: Tue, 23 Aug 2016 10:27:49 -0300 Subject: [Lazarus] ZeroMQ Bindings In-Reply-To: References: <3ee43af6-4e39-be6e-f93a-180f637e7af5@griensu.com> <00adc239-6774-3416-8639-9a87eed306c3@griensu.com> <08fb80f8-53be-f651-f270-c0c653e7627b@griensu.com> Message-ID: El 23/08/16 a las 09:57, Sandro Cumerlato escribió: > I never played with ZeroMQ before, can you please provide the > corresponding server side piece of source code? > > Sandro Cumerlato > > > On 23 August 2016 at 14:48, Leonardo M. Ramé wrote: > ... >>> >>> This time it compiles, but hands on the zmq_recv. >>> >> >> Sorry "hands" -> "hangs". >> Well, this is the server that's waiting (zmq_recv) for messages. The client is this (written in "C"): void *context = zmq_ctx_new(); void *requester = zmq_socket(context, ZMQ_REQ); int conn = zmq_connect(requester, "ipc://localscp"); zmq_send(requester, "hello world", 11, 0); zmq_close(requester); zmq_ctx_destroy(context); -- Leonardo M. Ramé Medical IT - Griensu S.A. Av. Colón 636 - Piso 8 Of. A X5000EPT -- Córdoba Tel.: +54(351)4246924 +54(351)4247788 +54(351)4247979 int. 19 Cel.: +54 9 (011) 40871877 From juergen.hestermann at gmx.de Tue Aug 23 17:11:37 2016 From: juergen.hestermann at gmx.de (=?UTF-8?Q?J=c3=bcrgen_Hestermann?=) Date: Tue, 23 Aug 2016 17:11:37 +0200 Subject: [Lazarus] Collapse/Expand "bug" in VirtualTreeView "fixed". Message-ID: <76b19750-8c33-d25b-b518-5e9734505fe6@gmx.de> I have investigated a bit more into the "bug" in VirtualTreeView where clicking on the plus or minus left to a node to collapse or expand it only works when this (main) column is the most left column. When moving this main column away from the most left position (either in object inspector or on the fly on program run) then expanding/collapsing with the mouse no longer works. After a lot of debugging the whole afternoon I think I now know the reason of this behaviour: First step was the VTV procedure DetermineHitpositionLTR. The first code line is: MainColumnHit := HitInfo.HitColumn = FHeader.MainColumn; When, for example, the main column is 5 and I move this (main) column to the most left of all columns then both, HitInfo.HitColumn and FHeader.MainColumn are set to 5. So both match and MainColumnHit is true. In this case everything works fine and the node is collapsed/expanded as expected. But when I have the tree unchanged so that the main column is still at position 5 then HitInfo.HitColumn suddenly becomes 0! Going further and checking where HitInfo.HitColumn is defined led me to HandleMouseDown. This routine again uses GetHitTestInfoAt to set HitInfo: ----------------------------------------------------------- HitInfo.HitColumn := FHeader.Columns.GetColumnAndBounds(Point(X, Y), ColLeft, ColRight, False); // Here HitColumn is correct! // If auto column spanning is enabled then look for the last non empty column. if toAutoSpanColumns in FOptions.FAutoOptions then begin InitialColumn := HitInfo.HitColumn; // Search to the left of the hit column for empty columns. while (HitInfo.HitColumn > NoColumn) and ColumnIsEmpty(HitInfo.HitNode, HitInfo.HitColumn) do // this is true... begin NextColumn := FHeader.FColumns.GetPreviousVisibleColumn(HitInfo.HitColumn); // ... so HitColumn will be decreased down to 0! if NextColumn = InvalidColumn then Break; HitInfo.HitColumn := NextColumn; [...] ----------------------------------------------------------- Here HitColumn starts with the correct value 5 but then, depending on ColumnIsEmpty, is decreased to zero! Looking at ColumnIsEmpty shows this comment: // Returns True if the given column is to be considered as being empty. This will usually be determined by // descendants as the base tree implementation has not enough information to decide. Its body is: ----------------------------------------------------------- begin Result := True; if Assigned(FOnGetCellIsEmpty) then FOnGetCellIsEmpty(Self, Node, Column, Result); end; ----------------------------------------------------------- So as default, all cells are considered to be empty! But when adding an event routine OnGetCellsEmpty that always sets IsEmpty := false; then suddenly everything works as expected and the bug is gone! I am wondering whether this is all as intended. Why is the column changed in GetColumnAndBounds depending on whether a cell is empty? It makes no sense to me. From silvioprog at gmail.com Tue Aug 23 17:42:32 2016 From: silvioprog at gmail.com (silvioprog) Date: Tue, 23 Aug 2016 12:42:32 -0300 Subject: [Lazarus] ZeroMQ Bindings In-Reply-To: References: <3ee43af6-4e39-be6e-f93a-180f637e7af5@griensu.com> <00adc239-6774-3416-8639-9a87eed306c3@griensu.com> <08fb80f8-53be-f651-f270-c0c653e7627b@griensu.com> Message-ID: On Tue, Aug 23, 2016, Leonardo M. Ramé wrote: > Hi, I need to use ZeroMQ for inter process communication, but the > bindings at https://github.com/bvarga/delphizmq does not seems to work, > at least on Linux (XUbuntu 16.04 64bits) and zmq 4.2. [...] Just curious, why not FPC's SimpleIPCServer/SimpleIPCClient? -- Silvio Clécio -------------- next part -------------- An HTML attachment was scrubbed... URL: From sandro.cumerlato at gmail.com Tue Aug 23 18:07:54 2016 From: sandro.cumerlato at gmail.com (Sandro Cumerlato) Date: Tue, 23 Aug 2016 18:07:54 +0200 Subject: [Lazarus] ZeroMQ Bindings In-Reply-To: References: <3ee43af6-4e39-be6e-f93a-180f637e7af5@griensu.com> <00adc239-6774-3416-8639-9a87eed306c3@griensu.com> <08fb80f8-53be-f651-f270-c0c653e7627b@griensu.com> Message-ID: Maybe other side is not written in Free Pascal, I guess. BTW: I got ZeroMQ TCP working (look at the attachments), IPC not yet :-( Sandro Cumerlato P.S: I'm playing with ZeroMQ under Windows only, what about you? On 23 August 2016 at 17:42, silvioprog wrote: .. > > Just curious, why not FPC's SimpleIPCServer/SimpleIPCClient? > -------------- next part -------------- A non-text attachment was scrubbed... Name: tcp_client.pas Type: application/octet-stream Size: 549 bytes Desc: not available URL: -------------- next part -------------- A non-text attachment was scrubbed... Name: tcp_server.pas Type: application/octet-stream Size: 540 bytes Desc: not available URL: From juergen.hestermann at gmx.de Tue Aug 23 18:10:35 2016 From: juergen.hestermann at gmx.de (=?UTF-8?Q?J=c3=bcrgen_Hestermann?=) Date: Tue, 23 Aug 2016 18:10:35 +0200 Subject: [Lazarus] Collapse/Expand "bug" in VirtualTreeView "fixed". In-Reply-To: <76b19750-8c33-d25b-b518-5e9734505fe6@gmx.de> References: <76b19750-8c33-d25b-b518-5e9734505fe6@gmx.de> Message-ID: <6c732763-2b19-0568-a950-42726a154833@gmx.de> Am 2016-08-23 um 17:11 schrieb Jürgen Hestermann: > I am wondering whether this is all as intended. > Why is the column changed in GetColumnAndBounds > depending on whether a cell is empty? > It makes no sense to me. I think the code in GetHitTestInfoAt needs changes (is buggy). For example, the searching to the right for an non-empty column has no effect as it does not change HitInfo.HitColumn: > ----------------------------------------------------------- // Search to the right of the hit column for empty columns. repeat InitialColumn := FHeader.FColumns.GetNextVisibleColumn(InitialColumn); if (InitialColumn = InvalidColumn) or not ColumnIsEmpty(HitInfo.HitNode, InitialColumn) then Break; Inc(ColRight,FHeader.FColumns[InitialColumn].Width); until False; > ----------------------------------------------------------- It only changes InitialColumn but not HitInfo.HitColumn. In the end, when *all* cells (columns) of a row are empty (as ist the case as default if no event routine OnGetCellsEmpty is defined by the programmer) then GetHitTestInfoAt should report the original column and not change this default (correct) column value. In this case the bug would be avoided even without the workaround of defining an event routine OnGetCellsEmpty with IsEmpty := false. Another option would be to set Result := False; in ColumnIsEmpty. As this routine does not know about the state anyway setting it to true is not good. Setting it to false would avoid the issue above too. From silvioprog at gmail.com Tue Aug 23 18:15:08 2016 From: silvioprog at gmail.com (silvioprog) Date: Tue, 23 Aug 2016 13:15:08 -0300 Subject: [Lazarus] ZeroMQ Bindings In-Reply-To: References: <3ee43af6-4e39-be6e-f93a-180f637e7af5@griensu.com> <00adc239-6774-3416-8639-9a87eed306c3@griensu.com> <08fb80f8-53be-f651-f270-c0c653e7627b@griensu.com> Message-ID: On Tue, Aug 23, 2016 at 1:07 PM, Sandro Cumerlato < sandro.cumerlato at gmail.com> wrote: > Maybe other side is not written in Free Pascal, I guess. > Indeed. > BTW: I got ZeroMQ TCP working (look at the attachments), IPC not yet :-( I'm going to try it here with TEncoding, just a moment ... -- Silvio Clécio -------------- next part -------------- An HTML attachment was scrubbed... URL: From silvioprog at gmail.com Tue Aug 23 18:26:19 2016 From: silvioprog at gmail.com (silvioprog) Date: Tue, 23 Aug 2016 13:26:19 -0300 Subject: [Lazarus] ZeroMQ Bindings In-Reply-To: References: <3ee43af6-4e39-be6e-f93a-180f637e7af5@griensu.com> <00adc239-6774-3416-8639-9a87eed306c3@griensu.com> <08fb80f8-53be-f651-f270-c0c653e7627b@griensu.com> Message-ID: On Tue, Aug 23, 2016 at 1:15 PM, silvioprog wrote: > On Tue, Aug 23, 2016 at 1:07 PM, Sandro Cumerlato < > sandro.cumerlato at gmail.com> wrote: > >> Maybe other side is not written in Free Pascal, I guess. >> > > Indeed. > > >> BTW: I got ZeroMQ TCP working (look at the attachments), IPC not yet :-( > > > I'm going to try it here with TEncoding, just a moment ... > Done. Please check the attached file: first, compile and run the myserver, after, compile and run the myclient. When you run the client it will print '0' and server will print a lot of 'hello world' message in the terminal. I noticed it creates a socket called 'localscp'. I'm not sure about zmq because it is very new for me. -- Silvio Clécio -------------- next part -------------- An HTML attachment was scrubbed... URL: -------------- next part -------------- A non-text attachment was scrubbed... Name: myzmq.tar.gz Type: application/x-gzip Size: 5215 bytes Desc: not available URL: From luizamericop at gmail.com Tue Aug 23 18:36:54 2016 From: luizamericop at gmail.com (Luiz Americo Pereira Camara) Date: Tue, 23 Aug 2016 13:36:54 -0300 Subject: [Lazarus] Collapse/Expand "bug" in VirtualTreeView "fixed". In-Reply-To: <76b19750-8c33-d25b-b518-5e9734505fe6@gmx.de> References: <76b19750-8c33-d25b-b518-5e9734505fe6@gmx.de> Message-ID: 2016-08-23 12:11 GMT-03:00 Jürgen Hestermann : > I have investigated a bit more into the "bug" in VirtualTreeView where > clicking > on the plus or minus left to a node to collapse or expand it only works > when > this (main) column is the most left column. > Do you know what is the behavior with Delphi? Can you open a issue with a sample project? Luiz -------------- next part -------------- An HTML attachment was scrubbed... URL: From silvioprog at gmail.com Tue Aug 23 18:40:13 2016 From: silvioprog at gmail.com (silvioprog) Date: Tue, 23 Aug 2016 13:40:13 -0300 Subject: [Lazarus] ZeroMQ Bindings In-Reply-To: References: <3ee43af6-4e39-be6e-f93a-180f637e7af5@griensu.com> <00adc239-6774-3416-8639-9a87eed306c3@griensu.com> <08fb80f8-53be-f651-f270-c0c653e7627b@griensu.com> Message-ID: On Tue, Aug 23, 2016 at 1:26 PM, silvioprog wrote: > On Tue, Aug 23, 2016 at 1:15 PM, silvioprog wrote: > >> On Tue, Aug 23, 2016 at 1:07 PM, Sandro Cumerlato < >> sandro.cumerlato at gmail.com> wrote: >> >>> Maybe other side is not written in Free Pascal, I guess. >>> >> >> Indeed. >> >> >>> BTW: I got ZeroMQ TCP working (look at the attachments), IPC not yet :-( >> >> >> I'm going to try it here with TEncoding, just a moment ... >> > > Done. Please check the attached file: first, compile and run the myserver, > after, compile and run the myclient. When you run the client it will print > '0' and server will print a lot of 'hello world' message in the terminal. I > noticed it creates a socket called 'localscp'. > > I'm not sure about zmq because it is very new for me. > A possible way to print the 'hello world' message for each client. === begin code === const BUF_SIZE = 1024 * 1000; var context: pointer; responder: pointer; buf: TBytes; recv: Integer; begin while True do begin context := zmq_ctx_new; responder := zmq_socket(context, ZMQ_REP); zmq_bind(responder, 'ipc://localscp'); SetLength(buf, BUF_SIZE); while True do begin recv := zmq_recv(responder, buf[0], BUF_SIZE, 0); if recv < 1 then Break; if recv > BUF_SIZE then SetLength(buf, recv); end; WriteLn(TEncoding.UTF8.GetString(buf)); end; end === end code === Sorry for the weird code, it is just a test, I would need time to read and understand zmq. -- Silvio Clécio -------------- next part -------------- An HTML attachment was scrubbed... URL: From sandro.cumerlato at gmail.com Tue Aug 23 19:38:59 2016 From: sandro.cumerlato at gmail.com (Sandro Cumerlato) Date: Tue, 23 Aug 2016 19:38:59 +0200 Subject: [Lazarus] ZeroMQ Bindings In-Reply-To: References: <3ee43af6-4e39-be6e-f93a-180f637e7af5@griensu.com> <00adc239-6774-3416-8639-9a87eed306c3@griensu.com> <08fb80f8-53be-f651-f270-c0c653e7627b@griensu.com> Message-ID: ZeroMQ IPC client always print "-1" on my system... at this point I have doubts about the libzmq.dll I am playing with... :-\ Sandro From l.rame at griensu.com Tue Aug 23 19:45:11 2016 From: l.rame at griensu.com (=?UTF-8?Q?Leonardo_M._Ram=c3=a9?=) Date: Tue, 23 Aug 2016 14:45:11 -0300 Subject: [Lazarus] ZeroMQ Bindings In-Reply-To: References: <3ee43af6-4e39-be6e-f93a-180f637e7af5@griensu.com> <00adc239-6774-3416-8639-9a87eed306c3@griensu.com> <08fb80f8-53be-f651-f270-c0c653e7627b@griensu.com> Message-ID: I'm using the latest (on Linux x64) and I'm wondering if the bindings only work with the 3.x release. I'll download the 3.2.5 legacy release from here http://zeromq.org/intro:get-the-software El 23/08/16 a las 14:38, Sandro Cumerlato escribió: > ZeroMQ IPC client always print "-1" on my system... at this point I > have doubts about the libzmq.dll I am playing with... :-\ > > Sandro -- Leonardo M. Ramé Medical IT - Griensu S.A. Av. Colón 636 - Piso 8 Of. A X5000EPT -- Córdoba Tel.: +54(351)4246924 +54(351)4247788 +54(351)4247979 int. 19 Cel.: +54 9 (011) 40871877 From l.rame at griensu.com Tue Aug 23 19:58:49 2016 From: l.rame at griensu.com (=?UTF-8?Q?Leonardo_M._Ram=c3=a9?=) Date: Tue, 23 Aug 2016 14:58:49 -0300 Subject: [Lazarus] ZeroMQ Bindings In-Reply-To: References: <3ee43af6-4e39-be6e-f93a-180f637e7af5@griensu.com> <00adc239-6774-3416-8639-9a87eed306c3@griensu.com> <08fb80f8-53be-f651-f270-c0c653e7627b@griensu.com> Message-ID: <9255037c-c135-9f7f-13fc-c5367ff9fed6@griensu.com> El 23/08/16 a las 14:45, Leonardo M. Ramé escribió: > I'm using the latest (on Linux x64) and I'm wondering if the bindings > only work with the 3.x release. I'll download the 3.2.5 legacy release > from here http://zeromq.org/intro:get-the-software > I got the same result, even when using Silvio's code. It keeps waiting at zmq_recv. -- Leonardo M. Ramé Medical IT - Griensu S.A. Av. Colón 636 - Piso 8 Of. A X5000EPT -- Córdoba Tel.: +54(351)4246924 +54(351)4247788 +54(351)4247979 int. 19 Cel.: +54 9 (011) 40871877 From silvioprog at gmail.com Tue Aug 23 20:02:58 2016 From: silvioprog at gmail.com (silvioprog) Date: Tue, 23 Aug 2016 15:02:58 -0300 Subject: [Lazarus] ZeroMQ Bindings In-Reply-To: References: <3ee43af6-4e39-be6e-f93a-180f637e7af5@griensu.com> <00adc239-6774-3416-8639-9a87eed306c3@griensu.com> <08fb80f8-53be-f651-f270-c0c653e7627b@griensu.com> Message-ID: On Tue, Aug 23, 2016 at 2:38 PM, Sandro Cumerlato < sandro.cumerlato at gmail.com> wrote: > ZeroMQ IPC client always print "-1" on my system... at this point I > have doubts about the libzmq.dll I am playing with... :-\ Strange. :-/ my steps was: $ cd ~ $ mkdir zeromq && cd zeromq $ wget -c https://github.com/zeromq/zeromq4-1/releases/download/v4.1.5/zeromq-4.1.5.tar.gz $ tar -zxvf zeromq-4.1.5.tar.gz && cd zeromq-4.1.5/ $ ./configure && make $ sudo cp .libs/libzmq.* /usr/lib/ now just open and compile myserver.lpr/myclient.lpr. I just copied the files libzmq.* to my lib dir because I don't know zmq makefile, so to uninstall I just did `rm /usr/lib/libzmq.*'. My environment: Lazarus 1.7 r52835 FPC 3.1.1 x86_64-linux-gtk 2 $ lsb_release -a Distributor ID: Ubuntu Description: Ubuntu 16.04.1 LTS Release: 16.04 Codename: xenial -- Silvio Clécio -------------- next part -------------- An HTML attachment was scrubbed... URL: From l.rame at griensu.com Tue Aug 23 20:13:34 2016 From: l.rame at griensu.com (=?UTF-8?Q?Leonardo_M._Ram=c3=a9?=) Date: Tue, 23 Aug 2016 15:13:34 -0300 Subject: [Lazarus] ZeroMQ Bindings In-Reply-To: <9255037c-c135-9f7f-13fc-c5367ff9fed6@griensu.com> References: <3ee43af6-4e39-be6e-f93a-180f637e7af5@griensu.com> <00adc239-6774-3416-8639-9a87eed306c3@griensu.com> <08fb80f8-53be-f651-f270-c0c653e7627b@griensu.com> <9255037c-c135-9f7f-13fc-c5367ff9fed6@griensu.com> Message-ID: El 23/08/16 a las 14:58, Leonardo M. Ramé escribió: > > > El 23/08/16 a las 14:45, Leonardo M. Ramé escribió: >> I'm using the latest (on Linux x64) and I'm wondering if the bindings >> only work with the 3.x release. I'll download the 3.2.5 legacy release >> from here http://zeromq.org/intro:get-the-software >> > > I got the same result, even when using Silvio's code. > > It keeps waiting at zmq_recv. > False alarm, with 3.2.5 it did Work!!!! Regards, -- Leonardo M. Ramé Medical IT - Griensu S.A. Av. Colón 636 - Piso 8 Of. A X5000EPT -- Córdoba Tel.: +54(351)4246924 +54(351)4247788 +54(351)4247979 int. 19 Cel.: +54 9 (011) 40871877 From silvioprog at gmail.com Tue Aug 23 20:19:25 2016 From: silvioprog at gmail.com (silvioprog) Date: Tue, 23 Aug 2016 15:19:25 -0300 Subject: [Lazarus] ZeroMQ Bindings In-Reply-To: References: <3ee43af6-4e39-be6e-f93a-180f637e7af5@griensu.com> <00adc239-6774-3416-8639-9a87eed306c3@griensu.com> <08fb80f8-53be-f651-f270-c0c653e7627b@griensu.com> <9255037c-c135-9f7f-13fc-c5367ff9fed6@griensu.com> Message-ID: On Tue, Aug 23, 2016 at 3:13 PM, Leonardo M. Ramé wrote: > El 23/08/16 a las 14:58, Leonardo M. Ramé escribió: > >> El 23/08/16 a las 14:45, Leonardo M. Ramé escribió: >> >>> I'm using the latest (on Linux x64) and I'm wondering if the bindings >>> only work with the 3.x release. I'll download the 3.2.5 legacy release >>> from here http://zeromq.org/intro:get-the-software >>> >>> >> I got the same result, even when using Silvio's code. >> >> It keeps waiting at zmq_recv. >> >> > False alarm, with 3.2.5 it did Work!!!! Awesome. :-) -- Silvio Clécio -------------- next part -------------- An HTML attachment was scrubbed... URL: From sandro.cumerlato at gmail.com Tue Aug 23 21:01:17 2016 From: sandro.cumerlato at gmail.com (Sandro Cumerlato) Date: Tue, 23 Aug 2016 21:01:17 +0200 Subject: [Lazarus] ZeroMQ Bindings In-Reply-To: References: <3ee43af6-4e39-be6e-f93a-180f637e7af5@griensu.com> <00adc239-6774-3416-8639-9a87eed306c3@griensu.com> <08fb80f8-53be-f651-f270-c0c653e7627b@griensu.com> <9255037c-c135-9f7f-13fc-c5367ff9fed6@griensu.com> Message-ID: Good to know Leonardo! :-) BUT please let me know if my IPC client/server are working too (look at the attachments), thank you! Sandro Cumerlato p.s.: maybe using "patched" zmq.pas header binding file. On 23 August 2016 at 20:13, Leonardo M. Ramé wrote: ... > > False alarm, with 3.2.5 it did Work!!!! > > Regards, > -------------- next part -------------- A non-text attachment was scrubbed... Name: ipc_client.pas Type: application/octet-stream Size: 608 bytes Desc: not available URL: -------------- next part -------------- A non-text attachment was scrubbed... Name: ipc_server.pas Type: application/octet-stream Size: 534 bytes Desc: not available URL: From l.rame at griensu.com Tue Aug 23 21:15:05 2016 From: l.rame at griensu.com (=?UTF-8?Q?Leonardo_M._Ram=c3=a9?=) Date: Tue, 23 Aug 2016 16:15:05 -0300 Subject: [Lazarus] ZeroMQ Bindings In-Reply-To: References: <3ee43af6-4e39-be6e-f93a-180f637e7af5@griensu.com> <00adc239-6774-3416-8639-9a87eed306c3@griensu.com> <08fb80f8-53be-f651-f270-c0c653e7627b@griensu.com> <9255037c-c135-9f7f-13fc-c5367ff9fed6@griensu.com> Message-ID: <061bb165-22c6-3b56-438f-5802cc84c4db@griensu.com> El 23/08/16 a las 16:01, Sandro Cumerlato escribió: > Good to know Leonardo! :-) > > BUT please let me know if my IPC client/server are working too (look > at the attachments), thank you! > > Sandro Cumerlato > > > p.s.: maybe using "patched" zmq.pas header binding file. > > > I must add in my project I had to rename the pipe from ipc://localscp to ipc:///tmp/localscp (I don't know how can I name them on Windows). I did the same in your examples and worked like a charm. -- Leonardo M. Ramé Medical IT - Griensu S.A. Av. Colón 636 - Piso 8 Of. A X5000EPT -- Córdoba Tel.: +54(351)4246924 +54(351)4247788 +54(351)4247979 int. 19 Cel.: +54 9 (011) 40871877 From silvioprog at gmail.com Tue Aug 23 21:21:12 2016 From: silvioprog at gmail.com (silvioprog) Date: Tue, 23 Aug 2016 16:21:12 -0300 Subject: [Lazarus] ZeroMQ Bindings In-Reply-To: <061bb165-22c6-3b56-438f-5802cc84c4db@griensu.com> References: <3ee43af6-4e39-be6e-f93a-180f637e7af5@griensu.com> <00adc239-6774-3416-8639-9a87eed306c3@griensu.com> <08fb80f8-53be-f651-f270-c0c653e7627b@griensu.com> <9255037c-c135-9f7f-13fc-c5367ff9fed6@griensu.com> <061bb165-22c6-3b56-438f-5802cc84c4db@griensu.com> Message-ID: On Tue, Aug 23, 2016 at 4:15 PM, Leonardo M. Ramé wrote: > El 23/08/16 a las 16:01, Sandro Cumerlato escribió: > >> Good to know Leonardo! :-) >> >> BUT please let me know if my IPC client/server are working too (look >> at the attachments), thank you! >> >> Sandro Cumerlato >> >> p.s.: maybe using "patched" zmq.pas header binding file. > > I must add in my project I had to rename the pipe from ipc://localscp to > ipc:///tmp/localscp (I don't know how can I name them on Windows). I did > the same in your examples and worked like a charm. I did some changes (sources in attachment) to compile on FPC from trunk (3.1.1) and Sandro's code worked like a charm for me too. :-) -- Silvio Clécio -------------- next part -------------- An HTML attachment was scrubbed... URL: -------------- next part -------------- A non-text attachment was scrubbed... Name: ipc_client.pas Type: text/x-pascal Size: 607 bytes Desc: not available URL: -------------- next part -------------- A non-text attachment was scrubbed... Name: ipc_server.pas Type: text/x-pascal Size: 576 bytes Desc: not available URL: From sandro.cumerlato at gmail.com Tue Aug 23 21:33:06 2016 From: sandro.cumerlato at gmail.com (Sandro Cumerlato) Date: Tue, 23 Aug 2016 21:33:06 +0200 Subject: [Lazarus] ZeroMQ Bindings In-Reply-To: References: <3ee43af6-4e39-be6e-f93a-180f637e7af5@griensu.com> <00adc239-6774-3416-8639-9a87eed306c3@griensu.com> <08fb80f8-53be-f651-f270-c0c653e7627b@griensu.com> <9255037c-c135-9f7f-13fc-c5367ff9fed6@griensu.com> <061bb165-22c6-3b56-438f-5802cc84c4db@griensu.com> Message-ID: Thank you all for the prompt reply! I was getting crazy... LOL Bye bye, Sandro On 23 Aug 2016 23:22, "silvioprog" wrote: On Tue, Aug 23, 2016 at 4:15 PM, Leonardo M. Ramé wrote: > El 23/08/16 a las 16:01, Sandro Cumerlato escribió: > >> Good to know Leonardo! :-) >> >> BUT please let me know if my IPC client/server are working too (look >> at the attachments), thank you! >> >> Sandro Cumerlato >> >> p.s.: maybe using "patched" zmq.pas header binding file. > > I must add in my project I had to rename the pipe from ipc://localscp to > ipc:///tmp/localscp (I don't know how can I name them on Windows). I did > the same in your examples and worked like a charm. I did some changes (sources in attachment) to compile on FPC from trunk (3.1.1) and Sandro's code worked like a charm for me too. :-) -- Silvio Clécio -- _______________________________________________ Lazarus mailing list Lazarus at lists.lazarus-ide.org http://lists.lazarus-ide.org/listinfo/lazarus -------------- next part -------------- An HTML attachment was scrubbed... URL: From donald at ziesig.org Tue Aug 23 23:16:22 2016 From: donald at ziesig.org (Donald Ziesig) Date: Tue, 23 Aug 2016 17:16:22 -0400 Subject: [Lazarus] HiRes for IDC icons In-Reply-To: References: <47cf144b-81f0-af4f-ddeb-e4bc824e04f5@ziesig.org> Message-ID: <3fdb75ae-adeb-1c17-d59a-599267b6ab52@ziesig.org> On 08/23/2016 06:39 AM, Sandro Cumerlato wrote: > Hello Don, > this is a "known" issue of the Lazarus IDE. > > Is it already listed on the Lazarus Bugtracker? > > If the problem is related to the size of the component palette > buttons, I have a partial patch for it to work on... > > Best regards, > Sandro Cumerlato > > > Index: components/ideintf/formeditingintf.pas > =================================================================== > --- components/ideintf/formeditingintf.pas (revision 51215) > +++ components/ideintf/formeditingintf.pas (working copy) > @@ -20,8 +20,8 @@ > LCLClasses, ProjectIntf, ComponentEditors, ObjectInspector, UnitResources; > > const > - ComponentPaletteImageWidth = 24; > - ComponentPaletteImageHeight = 24; > + ComponentPaletteImageWidth = 48; > + ComponentPaletteImageHeight = 48; > ComponentPaletteBtnWidth = ComponentPaletteImageWidth + 3; > ComponentPaletteBtnHeight = ComponentPaletteImageHeight + 3; > DesignerBaseClassId_TForm = 0; > > > > On 21 August 2016 at 15:48, Donald Ziesig wrote: >> Hi Qll! >> >> >> I just got a band new laptop :-D witth a 1920x1080 display. I set it up >> with Linux Mint 18 Xfce and have been working on the display resolution for >> the past day or so. >> >> >> Almost everything is set up so I can see/read it. The big problem is with >> Lazarus IDE icons. The control buttons are so small that they are almost >> invisible which makes them extremely hard to use. I have changed the >> display resolution with xrandr. Most apps follow this. Those that don't do >> follow the system font setting. >> >> >> How can I rescale the IDE buttons (with or without changing the font size) >> so they are visible? >> >> >> Thanks, >> >> >> Don Ziesig >> >> >> -- >> _______________________________________________ >> Lazarus mailing list >> Lazarus at lists.lazarus-ide.org >> http://lists.lazarus-ide.org/listinfo/lazarus Hi Sandro, I tried your "patch" but it did not change anything in the appearance of the buttons. I am searching the bug tracker but have not found anything like this (It may be there but it is not obvious). After a little more searching, if I can't find an issue, I will submit one. Thanks, Don Ziesig From paco.mail.telepac.pt at gmail.com Wed Aug 24 02:58:41 2016 From: paco.mail.telepac.pt at gmail.com (Paulo Costa) Date: Wed, 24 Aug 2016 01:58:41 +0100 Subject: [Lazarus] ZeroMQ Bindings In-Reply-To: <3ee43af6-4e39-be6e-f93a-180f637e7af5@griensu.com> References: <3ee43af6-4e39-be6e-f93a-180f637e7af5@griensu.com> Message-ID: <55e95b66-03c3-9320-618a-2fed3854d503@gmail.com> On 23-Aug-16 01:56, Leonardo M. Ramé wrote: > Hi, I need to use ZeroMQ for inter process communication, but the > bindings at https://github.com/bvarga/delphizmq does not seems to work, > at least on Linux (XUbuntu 16.04 64bits) and zmq 4.2. The bindings from bvarga work well with the version 3.2.5 and 32 bits. The binding have some issues with 64bits. There are at least a few places where you must change integer to ptruint and there can be more subtle problems. Another problem with version 4.x.x is that at some point they changed the zmq_msg_t structure definition. The array inside grew from 32 bytes to 64 and they added an extra void pointer: typedef union zmq_msg_t {unsigned char _ [64]; void *p; } zmq_msg_t; in https://github.com/zeromq/libzmq/blob/master/include/zmq.h the bindings (https://github.com/bvarga/delphizmq/blob/master/zmq.pas) still have type zmq_msg_t = record _: Array[0..32-1] of Byte; end; which is the correct definition for version 3.2.5. Paulo Costa From sandro.cumerlato at gmail.com Wed Aug 24 10:13:32 2016 From: sandro.cumerlato at gmail.com (Sandro Cumerlato) Date: Wed, 24 Aug 2016 10:13:32 +0200 Subject: [Lazarus] HiRes for IDC icons In-Reply-To: <3fdb75ae-adeb-1c17-d59a-599267b6ab52@ziesig.org> References: <47cf144b-81f0-af4f-ddeb-e4bc824e04f5@ziesig.org> <3fdb75ae-adeb-1c17-d59a-599267b6ab52@ziesig.org> Message-ID: Hello Don, I just tested my workaround and it works as expected. Don't forget to *rebuild* the Lazarus IDE (Tools -> Build Lazarus with Profile: Normal IDE). Before patch: ​ After patch: ​ Component Palette Buttons are enlarged to 48x48 pixels. You can find a fresh new patch (against svn trunk revision 52865) attached to this message. Kind regards, Sandro Cumerlato On 23 August 2016 at 23:16, Donald Ziesig wrote: > > Hi Sandro, > > I tried your "patch" but it did not change anything in the appearance of the > buttons. > > I am searching the bug tracker but have not found anything like this (It may > be there but it is not obvious). > > After a little more searching, if I can't find an issue, I will submit one. > > > Thanks, > > Don Ziesig > -------------- next part -------------- An HTML attachment was scrubbed... URL: -------------- next part -------------- A non-text attachment was scrubbed... Name: Lazarus IDE - Standard.png Type: image/png Size: 16392 bytes Desc: not available URL: -------------- next part -------------- A non-text attachment was scrubbed... Name: Lazarus IDE - Patched.png Type: image/png Size: 15083 bytes Desc: not available URL: -------------- next part -------------- Index: components/ideintf/formeditingintf.pas =================================================================== --- components/ideintf/formeditingintf.pas (revisione 52865) +++ components/ideintf/formeditingintf.pas (copia locale) @@ -20,8 +20,8 @@ LCLClasses, ProjectIntf, ComponentEditors, ObjectInspector, UnitResources; const - ComponentPaletteImageWidth = 24; - ComponentPaletteImageHeight = 24; + ComponentPaletteImageWidth = 48; + ComponentPaletteImageHeight = 48; ComponentPaletteBtnWidth = ComponentPaletteImageWidth + 3; ComponentPaletteBtnHeight = ComponentPaletteImageHeight + 3; DesignerBaseClassId_TForm = 0; From juergen.hestermann at gmx.de Wed Aug 24 11:04:17 2016 From: juergen.hestermann at gmx.de (=?UTF-8?Q?J=c3=bcrgen_Hestermann?=) Date: Wed, 24 Aug 2016 11:04:17 +0200 Subject: [Lazarus] Collapse/Expand "bug" in VirtualTreeView "fixed". In-Reply-To: References: <76b19750-8c33-d25b-b518-5e9734505fe6@gmx.de> Message-ID: Am 2016-08-23 um 18:36 schrieb Luiz Americo Pereira Camara: > 2016-08-23 12:11 GMT-03:00 Jürgen Hestermann : > I have investigated a bit more into the "bug" in VirtualTreeView where clicking > on the plus or minus left to a node to collapse or expand it only works when > this (main) column is the most left column. > Do you know what is the behavior with Delphi? No, unfortunately I am not using Delphi. But if the same code is used with Delphi, why should it behave differently? > Can you open a issue with a sample project? What do you mean? Open a bug report? I am not sure how to do that... I have changed my VirtualTreeView.pas file now and the bug is gone. So if anybody encounters the same problem (and IMO it must be everybody who uses hierarchical nodes when the main column is *not* the most left one) can use the mentioned workaround or even modify his VirtualTreeView.pas file too. Of course, it would be better, if this can be fixed in the official sources too but I am not able to do that. Another question is, why GetHitTestInfoAt searches for a non-empty cell while VTV does not even know how such cells are defined. I don't see any rational behind it. And even if that makes sense it does not make sense to set the default Result in ColumnIsEmpty to true. IMO it has to be false. If the programmer adds an event routine OnGetCellsEmpty he can override this behaviour but the default should be false. It took me years to find out that I can circumvent this bug by adding an OnGetCellsEmpty event routine. From mailinglists at geldenhuys.co.uk Wed Aug 24 11:17:06 2016 From: mailinglists at geldenhuys.co.uk (Graeme Geldenhuys) Date: Wed, 24 Aug 2016 10:17:06 +0100 Subject: [Lazarus] HiRes for IDC icons In-Reply-To: References: <47cf144b-81f0-af4f-ddeb-e4bc824e04f5@ziesig.org> <20160823131434.2db5286d@limapholos.matflo.wg> <20160823135324.32ADA2BB@atlas.cz> <8ed79069-b539-6c6f-4353-50e83a3d588d@windstream.net> Message-ID: <9d042756-8994-78a1-e20d-666be8daf3f5@geldenhuys.co.uk> On 2016-08-23 14:10, Sandro Cumerlato wrote: > I'm quite sure that SVG visualization requires a > rendering engine Correct, at the moment LCL can't render or handle SVG images like it does BMP, PNG etc (for example: The ImageList doesn't support SVG format, Button.Glyph doesn't support SVG etc). As for rendering SVG images, you don't necessarily need an external library. AggPas (implemented in pure Object Pascal) can render SVG images quite well. The Lazarus install includes AggPas as standard. Regards, Graeme -- fpGUI Toolkit - a cross-platform GUI toolkit using Free Pascal http://fpgui.sourceforge.net/ My public PGP key: http://tinyurl.com/graeme-pgp From juergen.hestermann at gmx.de Wed Aug 24 12:33:53 2016 From: juergen.hestermann at gmx.de (=?UTF-8?Q?J=c3=bcrgen_Hestermann?=) Date: Wed, 24 Aug 2016 12:33:53 +0200 Subject: [Lazarus] Collapse/Expand "bug" in VirtualTreeView "fixed". In-Reply-To: References: <76b19750-8c33-d25b-b518-5e9734505fe6@gmx.de> Message-ID: <2685ed6c-6d12-d9c1-8221-c10236a4a7eb@gmx.de> Am 2016-08-24 um 11:04 schrieb Jürgen Hestermann: > I have changed my VirtualTreeView.pas file now and the bug is gone. > So if anybody encounters the same problem (and IMO it must be > everybody who uses hierarchical nodes when the main column > is *not* the most left one) ... {...] > Another question is, why GetHitTestInfoAt searches for a non-empty > cell while VTV does not even know how such cells are defined. > I don't see any rational behind it. It seems that I have overlooked that all my observations only apply if (toAutoSpanColumns in FOptions.FAutoOptions) is true. That may explain why this issue has not popped up earlier. I have set toAutoSpanColumns a long time ago but meanwhile do all the drawing myself so it does not matter to me whether it is set or not. Nevertheless, the searching for non-empty cells is only useful if the event routine OnGetCellIsEmpty has been defined by the programmer. If he did not do this, all cells are considered to be empty which makes no sense. Therefore IMO this if-request in GetHitTestInfoAt if toAutoSpanColumns in FOptions.FAutoOptions then needs to be enhanced by checking the OnGetCellIsEmpty routine: if (toAutoSpanColumns in FOptions.FAutoOptions) and assigned(FOnGetCellIsEmpty) then If FOnGetCellIsEmpty=nil, then the checking for empty cells should be skipped in the same way as if toAutoSpanColumns is not set. It makes no sense to check for empty cells when all cells are always considered to be empty. And IMO the bug still exists that *if* the code for searching non-empty cells is run, then it does not do this correctly when searching to the right as HitColumn is not changed in this case. And also I still think that the result of ColumnIsEmpty should default to false, not true. It would avoid confusion and unexpected results. From jmlandmesser at gmx.de Wed Aug 24 14:33:29 2016 From: jmlandmesser at gmx.de (Landmesser John) Date: Wed, 24 Aug 2016 14:33:29 +0200 Subject: [Lazarus] convert "Januar 2016" to TDateTime using StrToDate Message-ID: <57BD9419.5070305@gmx.de> just curious: should be possible? StrToDate('Januar 2016','mmmm yyyy', ' ') but i get ConvertError Tipps are welcome Found a german hint in DelphiPraxis: die Format-Strings derUnitSysUtils sind eher auf die Ausgabe gerichtet. Beim Parsen von Strings bist du abseits des unterstützten Normalfalls (nur Zahlen und Trennzeichen) auf deine eigene Findigkeit angewiesen. -------------- next part -------------- An HTML attachment was scrubbed... URL: From jmlandmesser at gmx.de Wed Aug 24 14:54:22 2016 From: jmlandmesser at gmx.de (Landmesser John) Date: Wed, 24 Aug 2016 14:54:22 +0200 Subject: [Lazarus] convert "Januar 2016" to TDateTime using StrToDate In-Reply-To: <57BD9419.5070305@gmx.de> References: <57BD9419.5070305@gmx.de> Message-ID: <57BD98FE.2000401@gmx.de> sorry, lhelp knows the answer: > StrToDate converts the string S to a TDateTime date value. The Date > must consist of 1 to three digits, separated by the DateSeparator > character. If two numbers are given, they are supposed to form the day > and month of the current year. If only one number is given, it is > supposed to represent the day of the current month. (This is not > supported in Delphi) Am 24.08.2016 um 14:33 schrieb Landmesser John: > just curious: should be possible? > > StrToDate('Januar 2016','mmmm yyyy', ' ') > > but i get ConvertError > > Tipps are welcome > > Found a german hint in DelphiPraxis: > > die Format-Strings derUnitSysUtils sind eher auf die Ausgabe > gerichtet. Beim Parsen von Strings bist du abseits des unterstützten > Normalfalls (nur Zahlen und Trennzeichen) auf deine eigene Findigkeit > angewiesen. > > > > -------------- next part -------------- An HTML attachment was scrubbed... URL: From michael at freepascal.org Wed Aug 24 15:20:16 2016 From: michael at freepascal.org (Michael Van Canneyt) Date: Wed, 24 Aug 2016 15:20:16 +0200 (CEST) Subject: [Lazarus] convert "Januar 2016" to TDateTime using StrToDate In-Reply-To: <57BD9419.5070305@gmx.de> References: <57BD9419.5070305@gmx.de> Message-ID: On Wed, 24 Aug 2016, Landmesser John wrote: > just curious: should be possible? > > StrToDate('Januar 2016','mmmm yyyy', ' ') > > but i get ConvertError > > Tipps are welcome > > Found a german hint in DelphiPraxis: > > die Format-Strings derUnitSysUtils sind eher auf die Ausgabe gerichtet. Beim > Parsen von Strings bist du abseits des unterstützten Normalfalls (nur Zahlen > und Trennzeichen) auf deine eigene Findigkeit angewiesen. Try scandatetime from the dateutils unit. Michael. From donald at ziesig.org Wed Aug 24 15:19:54 2016 From: donald at ziesig.org (Donald Ziesig) Date: Wed, 24 Aug 2016 09:19:54 -0400 Subject: [Lazarus] HiRes for IDC icons In-Reply-To: References: <47cf144b-81f0-af4f-ddeb-e4bc824e04f5@ziesig.org> <3fdb75ae-adeb-1c17-d59a-599267b6ab52@ziesig.org> Message-ID: On 08/24/2016 04:13 AM, Sandro Cumerlato wrote: > Hello Don, > I just tested my workaround and it works as expected. > > Don't forget to *rebuild* the Lazarus IDE (Tools -> Build Lazarus with > Profile: Normal IDE). > > > Before patch: > > ​ > > After patch: > > ​ > > Component Palette Buttons are enlarged to 48x48 pixels. > > > You can find a fresh new patch (against svn trunk revision 52865) > attached to this message. > > > Kind regards, > Sandro Cumerlato > > > > On 23 August 2016 at 23:16, Donald Ziesig > wrote: > > > > Hi Sandro, > > > > I tried your "patch" but it did not change anything in the > appearance of the > > buttons. > > > > I am searching the bug tracker but have not found anything like this > (It may > > be there but it is not obvious). > > > > After a little more searching, if I can't find an issue, I will > submit one. > > > > > > Thanks, > > > > Don Ziesig > > > > > Hi Sandro, I did rebuild the IDE and I checked the date on the executable fie. The date matched the rebuild time. Unfortunately, the button sizes did not change. Also, I just realized that your patch did not change the sizes of the other buttons (which suffer from the same problem). I will try your patch from SVN later today, Thanks, Don Ziesig -------------- next part -------------- An HTML attachment was scrubbed... URL: -------------- next part -------------- A non-text attachment was scrubbed... Name: not available Type: image/png Size: 16392 bytes Desc: not available URL: -------------- next part -------------- A non-text attachment was scrubbed... Name: not available Type: image/png Size: 15083 bytes Desc: not available URL: From luizamericop at gmail.com Wed Aug 24 15:43:48 2016 From: luizamericop at gmail.com (Luiz Americo Pereira Camara) Date: Wed, 24 Aug 2016 10:43:48 -0300 Subject: [Lazarus] Collapse/Expand "bug" in VirtualTreeView "fixed". In-Reply-To: References: <76b19750-8c33-d25b-b518-5e9734505fe6@gmx.de> Message-ID: 2016-08-24 6:04 GMT-03:00 Jürgen Hestermann : > Am 2016-08-23 um 18:36 schrieb Luiz Americo Pereira Camara: > > 2016-08-23 12:11 GMT-03:00 Jürgen Hestermann >: > > I have investigated a bit more into the "bug" in VirtualTreeView > where clicking > > on the plus or minus left to a node to collapse or expand it only > works when > > this (main) column is the most left column. > > Do you know what is the behavior with Delphi? > > No, unfortunately I am not using Delphi. > But if the same code is used with Delphi, why should it behave differently? > This can be already fixed in Delphi master repository and we could simply port the changes to 4,8 and 5.5 versions > > > Can you open a issue with a sample project? > > What do you mean? > Open a bug report? > Yes. With a sample project attached so it can be reproduced > I am not sure how to do that... > http://wiki.freepascal.org/How_do_I_create_a_bug_report Select Lazarus CCR project and VirtualTreeView category or https://github.com/blikblum/VirtualTreeView-Lazarus/issues Luiz -------------- next part -------------- An HTML attachment was scrubbed... URL: From l.rame at griensu.com Wed Aug 24 17:16:33 2016 From: l.rame at griensu.com (=?UTF-8?Q?Leonardo_M._Ram=c3=a9?=) Date: Wed, 24 Aug 2016 12:16:33 -0300 Subject: [Lazarus] TStringList selection follows mouse pointer Message-ID: Hi, I have a weird situation related to TStringList. After selecting a row, the selector keeps "hooked" to the mouse pointer. The grid has a handler for the onSelection that launches a query to populate a detail grid, this process is somewhat heavy (~500ms to process). Looks like the problem raises when I move the mouse while the onSelect hasn't finished yet. Do you have any workaround for this? is this a bug?. Regards, -- Leonardo M. Ramé Medical IT - Griensu S.A. Av. Colón 636 - Piso 8 Of. A X5000EPT -- Córdoba Tel.: +54(351)4246924 +54(351)4247788 +54(351)4247979 int. 19 Cel.: +54 9 (011) 40871877 From l.rame at griensu.com Wed Aug 24 17:17:48 2016 From: l.rame at griensu.com (=?UTF-8?Q?Leonardo_M._Ram=c3=a9?=) Date: Wed, 24 Aug 2016 12:17:48 -0300 Subject: [Lazarus] TStringList selection follows mouse pointer In-Reply-To: References: Message-ID: <5f7db8b1-5c6b-9f3c-46d6-04fecd074f9a@griensu.com> El 24/08/16 a las 12:16, Leonardo M. Ramé escribió: > Hi, I have a weird situation related to TStringList. After selecting a > row, the selector keeps "hooked" to the mouse pointer. Sorry I mean TStringGrid. -- Leonardo M. Ramé Medical IT - Griensu S.A. Av. Colón 636 - Piso 8 Of. A X5000EPT -- Córdoba Tel.: +54(351)4246924 +54(351)4247788 +54(351)4247979 int. 19 Cel.: +54 9 (011) 40871877 From sandro.cumerlato at gmail.com Wed Aug 24 18:49:36 2016 From: sandro.cumerlato at gmail.com (Sandro Cumerlato) Date: Wed, 24 Aug 2016 18:49:36 +0200 Subject: [Lazarus] HiRes for IDC icons In-Reply-To: References: <47cf144b-81f0-af4f-ddeb-e4bc824e04f5@ziesig.org> <3fdb75ae-adeb-1c17-d59a-599267b6ab52@ziesig.org> Message-ID: I can confirm only that my workaround works under Windows, I haven't tested other OSs. Maybe someone else can try it under Linux, etc.. My patch alter the Component Palette Buttons only, it is the GUI part that I suffered the most (in addition to the visual Form editor of course)... other commands can be easily accessed by keyboard shortcuts or menu items... Sandro On 24 August 2016 at 15:19, Donald Ziesig wrote: > > Hi Sandro, > > I did rebuild the IDE and I checked the date on the executable fie. The date matched the rebuild time. Unfortunately, the button sizes did not change. Also, I just realized that your patch did not change the sizes of the other buttons (which suffer from the same problem). I will try your patch from SVN later today, > > Thanks, > > Don Ziesig From andrea.mauri.75 at gmail.com Thu Aug 25 09:51:55 2016 From: andrea.mauri.75 at gmail.com (Andrea Mauri) Date: Thu, 25 Aug 2016 09:51:55 +0200 Subject: [Lazarus] openglcontext cygwin-x Message-ID: Dear all, I got a message from a user of an application developed with lazarus and using the TOpenGLContext. The user is running my app using cygwin-x from Windows 7 on a CentOS 6.7 computer, the user uses XWin Server for displaying GUI remotely. The application runs fine locally on the remote CentOS computer but using cygwin-x the application does not run with the following messages: libGL error: No matching fbConfigs or visuals found libGL error: failed to load driver: swrast Gdk-ERROR **: The program 'myappguiname' received an X Window System error. This probably reflects a bug in the program. The error was 'BadValue (integer parameter out of range for operation)'. (Details: serial 1656 error_code 2 request_code 149 minor_code 24) (Note to programmers: normally, X errors are reported asynchronously; that is, you will receive the error a while after causing it. To debug your program, run it with the --sync command line option to change this behavior. You can then get a meaningful backtrace from your debugger if you break on the gdk_x_error() function.) aborting... Aborted (core dumped) Any hint on how to solve the problem? Thank you, Andrea From tholmqui at hotmail.com Thu Aug 25 09:57:52 2016 From: tholmqui at hotmail.com (Ty Holmquist) Date: Thu, 25 Aug 2016 07:57:52 +0000 Subject: [Lazarus] Newby Question Message-ID: I REALLY did not want to bother you experts with this dumb question, but I have spent about 8 hours researching this question and I cannot find the answer. I was hoping to be able to search the archives for the answer, but I cannot figure out how to search the archives for the answer. I have been using Dev-Pas to run programs (.pas programs). 2 weeks ago, I switched over to the Lazarus IDE because it is using the new FPC 3.0.0. All I want to do is Run/Compile a .pas program. It just does not work for me. I bring it up in the Source Editor and I cannot get it to Run/Compile. The example that I was trying to Run/Compile is in the Examples Subdirectory called myidehelp.pas. This is just one .pas file that I tried to Run/Compile. Again, thank you for your time Ty Holmquist 831-524-1159 -------------- next part -------------- An HTML attachment was scrubbed... URL: From m-w-vogel at gmx.de Thu Aug 25 11:55:14 2016 From: m-w-vogel at gmx.de (Michael W. Vogel) Date: Thu, 25 Aug 2016 02:55:14 -0700 (MST) Subject: [Lazarus] Newby Question In-Reply-To: References: Message-ID: <1472118914842-4049403.post@n3.nabble.com> > All I want to do is Run/Compile a .pas program. If you want to run some simple examples, try these: Mainmenu -> Tools -> Example Projects ... ../examples/imgviewer/imgview.lpi ../examples/address_book/addrbook.lpi ../examples/cursors/project1.lpi ... > The example that I was trying to Run/Compile is in the Examples > Subdirectory called myidehelp.pas. This example is a example for a package. You can't run it, you have to install it (in the Lazarus IDE itself). See: http://wiki.freepascal.org/Lazarus_Packages Kind regards, Michl -- View this message in context: http://free-pascal-lazarus.989080.n3.nabble.com/Lazarus-Newby-Question-tp4049402p4049403.html Sent from the Free Pascal - Lazarus mailing list archive at Nabble.com. From listbox at martoks-place.de Thu Aug 25 12:52:27 2016 From: listbox at martoks-place.de (Martok) Date: Thu, 25 Aug 2016 12:52:27 +0200 Subject: [Lazarus] openglcontext cygwin-x In-Reply-To: References: Message-ID: Who is forwarding what where? I'm not familiar with cygwin-x. maj=149 is GLX, min=25 is X_GLXCreateNewContext. > libGL error: No matching fbConfigs or visuals found > libGL error: failed to load driver: swrast That sounds like there is no GL driver present wherever rendering happens. What does glxinfo say? Does it work with Xming? Regards, Martok From andrea.mauri.75 at gmail.com Thu Aug 25 13:04:09 2016 From: andrea.mauri.75 at gmail.com (Andrea Mauri) Date: Thu, 25 Aug 2016 13:04:09 +0200 Subject: [Lazarus] openglcontext cygwin-x In-Reply-To: References: Message-ID: <6abcd9c3-98d2-5600-3e4b-b63583d81100@gmail.com> Il 25/08/2016 12:52, Martok ha scritto: > Who is forwarding what where? I'm not familiar with cygwin-x. > > maj=149 is GLX, min=25 is X_GLXCreateNewContext. > What "maj=149 is GLX, min=25 is X_GLXCreateNewContext" means? >> libGL error: No matching fbConfigs or visuals found >> libGL error: failed to load driver: swrast > That sounds like there is no GL driver present wherever rendering happens. What > does glxinfo say? > > Does it work with Xming? > I cannot test my application directly, since this issue happens on a user that wrote me. I will ask them to try with Xming too. > > Regards, > Martok > > From listbox at martoks-place.de Thu Aug 25 13:15:12 2016 From: listbox at martoks-place.de (Martok) Date: Thu, 25 Aug 2016 13:15:12 +0200 Subject: [Lazarus] openglcontext cygwin-x In-Reply-To: <6abcd9c3-98d2-5600-3e4b-b63583d81100@gmail.com> References: <6abcd9c3-98d2-5600-3e4b-b63583d81100@gmail.com> Message-ID: > What "maj=149 is GLX, min=25 is X_GLXCreateNewContext" means? That's the magic unexplained numbers in your X error message. They're a bit of a hassle to look up unless you alread have the correct glproto.h. Mistyped 24 as 25, sorry. > I cannot test my application directly, since this issue happens on a > user that wrote me. I will ask them to try with Xming too. Ah, then you're at the same point I was when I learned to hate GLX :D Just found this one, maybe it helps? Regards, Martok From l.rame at griensu.com Thu Aug 25 14:32:30 2016 From: l.rame at griensu.com (=?UTF-8?Q?Leonardo_M._Ram=c3=a9?=) Date: Thu, 25 Aug 2016 09:32:30 -0300 Subject: [Lazarus] Writeln redirect not written to disk Message-ID: <2203e570-d26e-c557-564f-24ec1c0c1793@griensu.com> Hi, I have a simple console application that uses fpAsync and WriteLn to output its events. Now, when I redirect its output to stdout to log to a file it doesn't write anything. For example, I call my app this way: ./myapp >> myapp.log Also I tried ./myapp >> myapp.log 2>&1 Also using "tee" ./myapp | tee myapp.log But I can't make it write anything to the log file. Of course if I run it manually it writes everything to the console. Any hint? Regards, -- Leonardo M. Ramé Medical IT - Griensu S.A. Av. Colón 636 - Piso 8 Of. A X5000EPT -- Córdoba Tel.: +54(351)4246924 +54(351)4247788 +54(351)4247979 int. 19 Cel.: +54 9 (011) 40871877 From skalogryz.lists at gmail.com Thu Aug 25 15:01:09 2016 From: skalogryz.lists at gmail.com (Dmitry Boyarintsev) Date: Thu, 25 Aug 2016 09:01:09 -0400 Subject: [Lazarus] Writeln redirect not written to disk In-Reply-To: <2203e570-d26e-c557-564f-24ec1c0c1793@griensu.com> References: <2203e570-d26e-c557-564f-24ec1c0c1793@griensu.com> Message-ID: On Thu, Aug 25, 2016 at 8:32 AM, Leonardo M. Ramé wrote: > > Any hint? > > You need to flush output to see immediate results. http://www.freepascal.org/docs-html/rtl/system/flush.html thanks, Dmitry -------------- next part -------------- An HTML attachment was scrubbed... URL: From skalogryz.lists at gmail.com Thu Aug 25 15:01:09 2016 From: skalogryz.lists at gmail.com (Dmitry Boyarintsev) Date: Thu, 25 Aug 2016 09:01:09 -0400 Subject: [Lazarus] Writeln redirect not written to disk In-Reply-To: <2203e570-d26e-c557-564f-24ec1c0c1793@griensu.com> References: <2203e570-d26e-c557-564f-24ec1c0c1793@griensu.com> Message-ID: On Thu, Aug 25, 2016 at 8:32 AM, Leonardo M. Ramé wrote: > > Any hint? > > You need to flush output to see immediate results. http://www.freepascal.org/docs-html/rtl/system/flush.html thanks, Dmitry -------------- next part -------------- An HTML attachment was scrubbed... URL: From silvioprog at gmail.com Thu Aug 25 17:58:28 2016 From: silvioprog at gmail.com (silvioprog) Date: Thu, 25 Aug 2016 12:58:28 -0300 Subject: [Lazarus] Cosmetic issue about new empty project In-Reply-To: References: Message-ID: Hello, Some days ago we got the following empty form for a new created project: 1) TForm1 = class(TForm) private { Private declarations } public { Public declarations } end; However, in Lazarus from trunk: 2) TForm1 = class(TForm) private public end; WDYT about to declare this way?: 3) TForm1 = class(TForm) end; IMHO declared scopes like 2) without any comment or code doesn't sound good. Thank you! -- Silvio Clécio -------------- next part -------------- An HTML attachment was scrubbed... URL: From hdpc at talktalk.net Thu Aug 25 18:27:03 2016 From: hdpc at talktalk.net (Howard Page-Clark) Date: Thu, 25 Aug 2016 17:27:03 +0100 Subject: [Lazarus] Cosmetic issue about new empty project In-Reply-To: References: Message-ID: <6a0aec0a-3479-66e8-9f8e-f6eb5d1e1cfd@talktalk.net> On 25/08/16 16:58, silvioprog wrote: > Some days ago we got the following empty form for a new created project: > > 1) > > TForm1 = class(TForm) > private > { Private declarations } > public > { Public declarations } > end; > > However, in Lazarus from trunk: > > 2) > > TForm1 = class(TForm) > private > > public > > end; See the forum discussion: http://forum.lazarus.freepascal.org/index.php/topic,33730.msg219103.html#msg219103 From mailinglists at geldenhuys.co.uk Thu Aug 25 23:23:40 2016 From: mailinglists at geldenhuys.co.uk (Graeme Geldenhuys) Date: Thu, 25 Aug 2016 22:23:40 +0100 Subject: [Lazarus] Cosmetic issue about new empty project In-Reply-To: References: Message-ID: On 2016-08-25 16:58, silvioprog wrote: > IMHO declared scopes like 2) without any comment or code doesn't sound good. It was discussed in the Forums. Those code comments are absolutely useless (and I agree). The keywords "private" and "public" very clearly states what goes in there. Those code comments and no value. Personally I find them annoying and always delete them. So I'm happy a core member finally decided to remove them from the template. Regards, Graeme -- fpGUI Toolkit - a cross-platform GUI toolkit using Free Pascal http://fpgui.sourceforge.net/ My public PGP key: http://tinyurl.com/graeme-pgp From silvioprog at gmail.com Thu Aug 25 23:57:06 2016 From: silvioprog at gmail.com (silvioprog) Date: Thu, 25 Aug 2016 18:57:06 -0300 Subject: [Lazarus] Cosmetic issue about new empty project In-Reply-To: <6a0aec0a-3479-66e8-9f8e-f6eb5d1e1cfd@talktalk.net> References: <6a0aec0a-3479-66e8-9f8e-f6eb5d1e1cfd@talktalk.net> Message-ID: On Thu, Aug 25, 2016 at 1:27 PM, Howard Page-Clark wrote: [...] > See the forum discussion: > http://forum.lazarus.freepascal.org/index.php/topic,33730. > msg219103.html#msg219103 > Thanks for the link, I'm going to comment there ... -- Silvio Clécio -------------- next part -------------- An HTML attachment was scrubbed... URL: From jmlandmesser at gmx.de Fri Aug 26 12:21:28 2016 From: jmlandmesser at gmx.de (John Landmesser) Date: Fri, 26 Aug 2016 12:21:28 +0200 Subject: [Lazarus] How to know programs on Linux written in Pascal? Message-ID: <9fe4397c-a2ab-88c8-3e27-82188e263a30@gmx.de> Debian Linux: I did a search using kfind and searching in executables containing the String "TForm". The result seems ok, but are there better ways? ... all 62 executables in /usr/bin seems to be part of Lazarus. From markMLl.lazarus at telemetry.co.uk Fri Aug 26 12:45:09 2016 From: markMLl.lazarus at telemetry.co.uk (Mark Morgan Lloyd) Date: Fri, 26 Aug 2016 10:45:09 +0000 Subject: [Lazarus] How to know programs on Linux written in Pascal? In-Reply-To: <9fe4397c-a2ab-88c8-3e27-82188e263a30@gmx.de> References: <9fe4397c-a2ab-88c8-3e27-82188e263a30@gmx.de> Message-ID: John Landmesser wrote: > Debian Linux: > I did a search using kfind and searching in executables containing the > String "TForm". > The result seems ok, but are there better ways? > ... all 62 executables in /usr/bin seems to be part of Lazarus.-- > _______________________________________________Lazarus mailing > listLazarus at lists.lazarus-ide.orghttp://lists.lazarus-ide.org/listinfo/lazarus Something like egrep 'Lazarus LCL: .* FPC:' /usr/local/bin/* Once you've got the names you can use strings and pipe it through grep to get the versions used. The whole thing could be automated using find but for a small number of programs would be more trouble than it's worth. -- Mark Morgan Lloyd markMLl .AT. telemetry.co .DOT. uk [Opinions above are the author's, not those of his employers or colleagues] From mail at michael-ring.org Fri Aug 26 13:16:14 2016 From: mail at michael-ring.org (Michael Ring) Date: Fri, 26 Aug 2016 13:16:14 +0200 Subject: [Lazarus] How to know programs on Linux written in Pascal? In-Reply-To: References: <9fe4397c-a2ab-88c8-3e27-82188e263a30@gmx.de> Message-ID: This will also work, also detects non-lazarus binaries: grep "FPC " /usr/local/lib/fpc/3.1.1/fpc Binary file /usr/local/lib/fpc/3.1.1/fpc matches as a find command: find /usr/local/bin -type f -exec grep -H "FPC " {} \; 2>/dev/null Binary file /usr/local/bin/bin2obj matches ... Binary file /usr/local/bin/unitdiff matches or this to display the FPC version: strings /usr/local/lib/fpc/3.1.1/fpc | grep ^"FPC " FPC 3.1.1 [2016/08/24] for x86_64 - Darwin as find: find /usr/local/bin -type f | while read file ; do strings $file | grep "^FPC " && echo $file ; done FPC 3.0.0 [2015/11/14] for i386 - Darwin /usr/local/bin/bin2obj FPC 3.0.0 [2015/11/14] for i386 - Darwin /usr/local/bin/chmcmd FPC 3.0.0 [2015/11/14] for i386 - Darwin /usr/local/bin/chmls Am 26.08.16 um 12:45 schrieb Mark Morgan Lloyd: > John Landmesser wrote: >> Debian Linux: >> I did a search using kfind and searching in executables containing >> the String "TForm". >> The result seems ok, but are there better ways? >> ... all 62 executables in /usr/bin seems to be part of Lazarus.-- >> _______________________________________________Lazarus mailing >> listLazarus at lists.lazarus-ide.orghttp://lists.lazarus-ide.org/listinfo/lazarus > > > Something like > > egrep 'Lazarus LCL: .* FPC:' /usr/local/bin/* > > Once you've got the names you can use strings and pipe it through > grep to get the versions used. The whole thing could be automated > using find but for a small number of programs would be more trouble > than it's worth. > From mailinglists at geldenhuys.co.uk Fri Aug 26 14:55:04 2016 From: mailinglists at geldenhuys.co.uk (Graeme Geldenhuys) Date: Fri, 26 Aug 2016 13:55:04 +0100 Subject: [Lazarus] fpdebug: "List index out of bounds" errors Message-ID: Hi, I am on the latest Lazarus Trunk revision. Does anybody else see loads of "Index out of bounds" errors when using the native Free Pascal debugger, fpdebug? >From what I can see, if I use tooltip debugging over a variable that was defined outside the scope of the current procedure but is still valid, then the "Index out of bounds" error occurs. Here is an example that reproduces the error: Try and tooltip debug the i variable inside the NestedTwo() procedure. =================================================== program debug_test; {$mode objfpc}{$H+} type TTestApp = class(TObject) public procedure One; end; { TTestApp } procedure TTestApp.One; var i: integer; procedure NestedTwo; var j: integer; begin j := 333; j := j + i; // tooltip debug i gives an error writeln(j); end; begin i := 123; NestedTwo; writeln(i); end; var c: TTestApp; begin c := TTestApp.Create; try c.One; finally c.Free; end; end. ==================================================== Regards, Graeme -- fpGUI Toolkit - a cross-platform GUI toolkit using Free Pascal http://fpgui.sourceforge.net/ My public PGP key: http://tinyurl.com/graeme-pgp From frederic.crapez at wanadoo.fr Sat Aug 27 23:44:31 2016 From: frederic.crapez at wanadoo.fr (fred) Date: Sat, 27 Aug 2016 23:44:31 +0200 Subject: [Lazarus] Use Tdbf and self In-Reply-To: References: Message-ID: <1472334271.24022.2.camel@wanadoo.fr> Hy, i use this code : ... var tab : TDbf; repertoire: string; begin // ***** Creation de la table **** tab := TDbf.Create(self); // ***** paramètre de localisation **** -> the compiler return this message : ------------------------------ identifier no found "self" ------------------------------ Who is the error. Thanks From frederic.crapez at wanadoo.fr Sat Aug 27 23:44:31 2016 From: frederic.crapez at wanadoo.fr (fred) Date: Sat, 27 Aug 2016 23:44:31 +0200 Subject: [Lazarus] Use Tdbf and self In-Reply-To: References: Message-ID: <1472334271.24022.2.camel@wanadoo.fr> Hy, i use this code : ... var tab : TDbf; repertoire: string; begin // ***** Creation de la table **** tab := TDbf.Create(self); // ***** paramètre de localisation **** -> the compiler return this message : ------------------------------ identifier no found "self" ------------------------------ Who is the error. Thanks From frederic.crapez at wanadoo.fr Sun Aug 28 00:00:41 2016 From: frederic.crapez at wanadoo.fr (fred) Date: Sun, 28 Aug 2016 00:00:41 +0200 Subject: [Lazarus] Use Tdbf and self In-Reply-To: <1472334271.24022.2.camel@wanadoo.fr> References: <1472334271.24022.2.camel@wanadoo.fr> Message-ID: <1472335241.24022.4.camel@wanadoo.fr> uh, i forget the 'DataModule1' before the name of procedure who create table. Sorry. Thanks Le samedi 27 août 2016 à 23:44 +0200, fred a écrit : > Hy, > > i use this code : > > ... > var tab : TDbf; > repertoire: string; > begin > > // ***** Creation de la table **** > > tab := TDbf.Create(self); > > // ***** paramètre de localisation **** > > > -> the compiler return this message : > > ------------------------------ > identifier no found "self" > ------------------------------ > > Who is the error. > > Thanks > > > From frederic.crapez at wanadoo.fr Sun Aug 28 00:00:41 2016 From: frederic.crapez at wanadoo.fr (fred) Date: Sun, 28 Aug 2016 00:00:41 +0200 Subject: [Lazarus] Use Tdbf and self In-Reply-To: <1472334271.24022.2.camel@wanadoo.fr> References: <1472334271.24022.2.camel@wanadoo.fr> Message-ID: <1472335241.24022.4.camel@wanadoo.fr> uh, i forget the 'DataModule1' before the name of procedure who create table. Sorry. Thanks Le samedi 27 août 2016 à 23:44 +0200, fred a écrit : > Hy, > > i use this code : > > ... > var tab : TDbf; > repertoire: string; > begin > > // ***** Creation de la table **** > > tab := TDbf.Create(self); > > // ***** paramètre de localisation **** > > > -> the compiler return this message : > > ------------------------------ > identifier no found "self" > ------------------------------ > > Who is the error. > > Thanks > > > From bartjunk64 at gmail.com Sun Aug 28 00:25:20 2016 From: bartjunk64 at gmail.com (Bart) Date: Sun, 28 Aug 2016 00:25:20 +0200 Subject: [Lazarus] Use Tdbf and self In-Reply-To: <1472334271.24022.2.camel@wanadoo.fr> References: <1472334271.24022.2.camel@wanadoo.fr> Message-ID: On 8/27/16, fred wrote: > Who is the error. You is the error ;-) Bart From jmlandmesser at gmx.de Tue Aug 30 19:42:37 2016 From: jmlandmesser at gmx.de (John Landmesser) Date: Tue, 30 Aug 2016 19:42:37 +0200 Subject: [Lazarus] Linux lazarus gtk2 look Message-ID: Is it possible to adjust the look of Lazarus _IDE (gtk2): Same PC, Lazarus trunk but two different KDE linux Desktops. This one is ok: Debian (Sid) KDE That's bad: same PC but KDE on KaOS. Where are these grey colors defined? -------------- next part -------------- An HTML attachment was scrubbed... URL: -------------- next part -------------- A non-text attachment was scrubbed... Name: not available Type: image/png Size: 48950 bytes Desc: not available URL: -------------- next part -------------- A non-text attachment was scrubbed... Name: ckggeafadgaahfgn.png Type: image/png Size: 32804 bytes Desc: not available URL: From jmlandmesser at gmx.de Tue Aug 30 20:02:44 2016 From: jmlandmesser at gmx.de (John Landmesser) Date: Tue, 30 Aug 2016 20:02:44 +0200 Subject: [Lazarus] Linux lazarus gtk2 look Message-ID: <2cef3ace-dfb0-de45-7c74-2ea1ee77a049@gmx.de> Is it possible to adjust the look of Lazarus _IDE (gtk2): Same PC, Lazarus trunk but two different KDE linux Desktops. This one is ok: Debian (Sid) KDE https://drive.google.com/file/d/0BwR9__ABsiOFaXlLU0VOc2N2dzg/view?usp=sharing That's bad: same PC but KDE on KaOS. https://drive.google.com/file/d/0BwR9__ABsiOFeHpfcXhzTGR0dk0/view?usp=sharing Where are these grey colors defined? From badsectoracula at gmail.com Tue Aug 30 20:15:16 2016 From: badsectoracula at gmail.com (Kostas Michalopoulos) Date: Tue, 30 Aug 2016 21:15:16 +0300 Subject: [Lazarus] Linux lazarus gtk2 look In-Reply-To: <2cef3ace-dfb0-de45-7c74-2ea1ee77a049@gmx.de> References: <2cef3ace-dfb0-de45-7c74-2ea1ee77a049@gmx.de> Message-ID: This doesn't have to do with Lazarus, it is GTK's theme. The second screenshot shows the Raleigh theme which is the default GTK+ 2 theme. I don't know about KaOS to suggest packages and such, but the first screenshot uses a popular theme which AFAIK is installed by default on Debian when you choose to install the desktop. You can look in KaOS's packages for gtk2 themes (or look in gnome-looks.org and similar sites for other gtk2 themes) and use a tool like "GTK2 Change Theme" to enable it. If you are using a desktop environment like XFCE, it'll also have a bunch of themes preinstalled and provide means for switching between them. XFCE uses GTK2 for itself so you shouldn't need to mess much with it. On Tue, Aug 30, 2016 at 9:02 PM, John Landmesser wrote: > > Is it possible to adjust the look of Lazarus _IDE (gtk2): > > Same PC, Lazarus trunk but two different KDE linux Desktops. > > This one is ok: Debian (Sid) KDE > > https://drive.google.com/file/d/0BwR9__ABsiOFaXlLU0VOc2N2dzg > /view?usp=sharing > > > > That's bad: same PC but KDE on KaOS. > > https://drive.google.com/file/d/0BwR9__ABsiOFeHpfcXhzTGR0dk0 > /view?usp=sharing > > > Where are these grey colors defined? > -- > _______________________________________________ > Lazarus mailing list > Lazarus at lists.lazarus-ide.org > http://lists.lazarus-ide.org/listinfo/lazarus > -------------- next part -------------- An HTML attachment was scrubbed... URL: From jmlandmesser at gmx.de Tue Aug 30 21:14:42 2016 From: jmlandmesser at gmx.de (John Landmesser) Date: Tue, 30 Aug 2016 21:14:42 +0200 Subject: [Lazarus] Linux lazarus gtk2 look In-Reply-To: References: <2cef3ace-dfb0-de45-7c74-2ea1ee77a049@gmx.de> Message-ID: <4fdc97ea-398b-703a-30cb-6443f0030df8@gmx.de> Thanks a lot for that Info, I'll investigate it :-)) On 30.08.2016 20:15, Kostas Michalopoulos wrote: > This doesn't have to do with Lazarus, it is GTK's theme. The second > screenshot shows the Raleigh theme which is the default GTK+ 2 theme. > I don't know about KaOS to suggest packages and such, but the first > screenshot uses a popular theme which AFAIK is installed by default on > Debian when you choose to install the desktop. > > You can look in KaOS's packages for gtk2 themes (or look in > gnome-looks.org and similar sites for other > gtk2 themes) and use a tool like "GTK2 Change Theme" to enable it. > > If you are using a desktop environment like XFCE, it'll also have a > bunch of themes preinstalled and provide means for switching between > them. XFCE uses GTK2 for itself so you shouldn't need to mess much > with it. > > > On Tue, Aug 30, 2016 at 9:02 PM, John Landmesser > wrote: > > > Is it possible to adjust the look of Lazarus _IDE (gtk2): > > Same PC, Lazarus trunk but two different KDE linux Desktops. > > This one is ok: Debian (Sid) KDE > > https://drive.google.com/file/d/0BwR9__ABsiOFaXlLU0VOc2N2dzg/view?usp=sharing > > > > > That's bad: same PC but KDE on KaOS. > > https://drive.google.com/file/d/0BwR9__ABsiOFeHpfcXhzTGR0dk0/view?usp=sharing > > > > > Where are these grey colors defined? > -- > _______________________________________________ > Lazarus mailing list > Lazarus at lists.lazarus-ide.org > http://lists.lazarus-ide.org/listinfo/lazarus > > > > > -------------- next part -------------- An HTML attachment was scrubbed... URL: From flavio.etrusco at gmail.com Wed Aug 31 02:57:44 2016 From: flavio.etrusco at gmail.com (=?UTF-8?Q?Fl=C3=A1vio_Etrusco?=) Date: Tue, 30 Aug 2016 21:57:44 -0300 Subject: [Lazarus] TStringList selection follows mouse pointer In-Reply-To: <5f7db8b1-5c6b-9f3c-46d6-04fecd074f9a@griensu.com> References: <5f7db8b1-5c6b-9f3c-46d6-04fecd074f9a@griensu.com> Message-ID: Err, you shouldn't do have processing on UI event handlers. http://wiki.freepascal.org/Asynchronous_Calls []s On Wed, Aug 24, 2016 at 12:17 PM, Leonardo M. Ramé wrote: > > El 24/08/16 a las 12:16, Leonardo M. Ramé escribió: >> >> Hi, I have a weird situation related to TStringList. After selecting a >> row, the selector keeps "hooked" to the mouse pointer. > > > Sorry I mean TStringGrid. > > > > -- > Leonardo M. Ramé > Medical IT - Griensu S.A. > Av. Colón 636 - Piso 8 Of. A > X5000EPT -- Córdoba > Tel.: +54(351)4246924 +54(351)4247788 +54(351)4247979 int. 19 > Cel.: +54 9 (011) 40871877 > -- > _______________________________________________ > Lazarus mailing list > Lazarus at lists.lazarus-ide.org > http://lists.lazarus-ide.org/listinfo/lazarus From l.rame at griensu.com Wed Aug 31 14:00:13 2016 From: l.rame at griensu.com (=?UTF-8?Q?Leonardo_M._Ram=c3=a9?=) Date: Wed, 31 Aug 2016 09:00:13 -0300 Subject: [Lazarus] TStringList selection follows mouse pointer In-Reply-To: References: <5f7db8b1-5c6b-9f3c-46d6-04fecd074f9a@griensu.com> Message-ID: <34423cec-80ea-76e1-7ab1-548b5a4848f2@griensu.com> GREAT!!!, that fixed the issue. Thank you very much. El 30/08/16 a las 21:57, Flávio Etrusco escribió: > Err, you shouldn't do have processing on UI event handlers. > > http://wiki.freepascal.org/Asynchronous_Calls > > []s > > On Wed, Aug 24, 2016 at 12:17 PM, Leonardo M. Ramé wrote: >> El 24/08/16 a las 12:16, Leonardo M. Ramé escribió: >>> Hi, I have a weird situation related to TStringList. After selecting a >>> row, the selector keeps "hooked" to the mouse pointer. >> >> Sorry I mean TStringGrid. >> >> >> >> -- >> Leonardo M. Ramé >> Medical IT - Griensu S.A. >> Av. Colón 636 - Piso 8 Of. A >> X5000EPT -- Córdoba >> Tel.: +54(351)4246924 +54(351)4247788 +54(351)4247979 int. 19 >> Cel.: +54 9 (011) 40871877 >> -- >> _______________________________________________ >> Lazarus mailing list >> Lazarus at lists.lazarus-ide.org >> http://lists.lazarus-ide.org/listinfo/lazarus -- Leonardo M. Ramé Medical IT - Griensu S.A. Av. Colón 636 - Piso 8 Of. A X5000EPT -- Córdoba Tel.: +54(351)4246924 +54(351)4247788 +54(351)4247979 int. 19 Cel.: +54 9 (011) 40871877