Re: [Lazarus] Remote debugger looses connection to target on Windows 7
On 04/10/2014 07:33 PM, Martin Frb wrote: Look at the log, if you see the -exec-... and the work then all is ok. I have the ARM machine in question (a topless QNAP NAS) at home and will try to make sense of this during the weekend. BTW.: In fact the helpful person from Austria did start to write a documentation on how to install and use cross compiling and remote debugging towards an embedded ARM target. I promised to translate this to English. when one and verified. But he was only able to create the cross gdb / gdbserver pair after installing the complete multi Gigabyte partly propriety CodeSourcery cross environment (including Eclipse) and so we decided that documenting _this_ does not make sense. -Michael -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
Re: [Lazarus] Remote debugger looses connection to target on Windows 7
On 04/10/2014 05:30 PM, Martin Frb wrote: So I will not add those gdb/gdbserver myself. I do not know, if anyone else wants to work on that. I did try (see the other mail). Also which installer should they be added to? I suppose you mean installer for Lazarus ? The only installer which does arm, is the wince. (and that may also need some maintenance, not sure, if it comes with gdb out of the box) Why that ? ARM Linux is a very viable target today. Very famous hardware like Raspberry Pi and (IMHO more appropriate) BeagleBone (black) can run Lazarus native, as they do have rather decent video hardware. I suppose the same installer would be able to support both. (I don't know anything about how installers support different Linux distributions.) A friend of mine successfully runs Lazarus on Debian on BeagleBone. For headless devices it would be possible to do Lazarus native with a remote GUI tool (VNC / NoMachine / X via TCP/IP). I don't know if this is really appropriate. A cross distribution supposedly would need a dedicated installer (like that for WinCE). I could imagine that a Windows---ARM-Linux and a PC-Linux---ARM-Linux both could be viable. Same would need contain the cross fpc, the appropriate cross gdb and gdbserver pair (or just the standard gdb for ARM when using the dual SSH way). -Michael -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
Re: [Lazarus] Ann: TButtonEdit as replacement for TEditButton
Thank you Bart, All voids goes to Bart at this time :) I tested, kubuntu 13.10 x64. if different color is clDefault (TEditButton.ColorclDefault), write it in lfm, if its equal to clDefault, not in lfm, but property value is clDefault ( if some one looking for in lfm file, can not see Color = clDefault) Thank you very much 10-04-2014 20:57 tarihinde, Bart yazdı: On 4/10/14, Bart bartjun...@gmail.com wrote: I can confirm this. It does not store in LFM. That's a wrong conclusion it seems. It does store in LFM, see snippet: object EditButton1: TEditButton Left = 8 Height = 23 Top = 46 Width = 160 ButtonWidth = 23 Color = clYellow == MaxLength = 0 NumGlyphs = 1 OnButtonClick = EditButton1ButtonClick But upon loading it the color of FEdit gets reset to it's parent color. Fixed in r44669. Please test. Bart -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
[Lazarus] Funny bug
Hi, Just encountered this rather nice bug: Debugging a project in Lazarus, linux. I have in Run Parameters Command-line parameters: https://www.google.be/ out I copy all sources to windows, open the project start debugging. And get an error. Wondering what it is, I see that the command-line parameters setting was changed to Command-line parameters: https:\\www.google.be\ out Which is of course wrong... I understand where it comes from, but do suggest to leave the entry in this box alone... Michael. -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
Re: [Lazarus] Funny bug
On 04/11/2014 10:45 AM, Michael Van Canneyt wrote: Hi, Just encountered this rather nice bug: Debugging a project in Lazarus, linux. I have in Run Parameters Command-line parameters: https://www.google.be/ out I copy all sources to windows, open the project start debugging. And get an error. Wondering what it is, I see that the command-line parameters setting was changed to Command-line parameters: https:\\www.google.be\ out Which is of course wrong... I understand where it comes from, but do suggest to leave the entry in this box alone... Or at least recognize https: and don't touch. z. -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
Re: [Lazarus] Remote debugger looses connection to target on Windows 7
On 11/04/2014 08:08, Michael Schnell wrote: On 04/10/2014 05:30 PM, Martin Frb wrote: So I will not add those gdb/gdbserver myself. I do not know, if anyone else wants to work on that. I did try (see the other mail). Also which installer should they be added to? I suppose you mean installer for Lazarus ? The only installer which does arm, is the wince. (and that may also need some maintenance, not sure, if it comes with gdb out of the box) Why that ? ARM Linux is a very viable target today. Very famous hardware like Raspberry Pi and (IMHO more appropriate) BeagleBone (black) can run Lazarus native, as they do have rather decent video hardware. I suppose the same installer would be able to support both. (I don't know anything about how installers support different Linux distributions.) A friend of mine successfully runs Lazarus on Debian on BeagleBone. For headless devices it would be possible to do Lazarus native with a remote GUI tool (VNC / NoMachine / X via TCP/IP). I don't know if this is really appropriate. A cross distribution supposedly would need a dedicated installer (like that for WinCE). I could imagine that a Windows---ARM-Linux and a PC-Linux---ARM-Linux both could be viable. Same would need contain the cross fpc, the appropriate cross gdb and gdbserver pair (or just the standard gdb for ARM when using the dual SSH way). Actually I do not use the linux installers. So I dont know anything about them. Just form the look at Sourceforge I concluded they did not seem to have an arm target. -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
Re: [Lazarus] Funny bug
On Fri, 11 Apr 2014 10:45:12 +0200 (CEST) Michael Van Canneyt mich...@freepascal.org wrote: Hi, Just encountered this rather nice bug: Debugging a project in Lazarus, linux. I have in Run Parameters Command-line parameters: https://www.google.be/ out I copy all sources to windows, open the project start debugging. And get an error. Wondering what it is, I see that the command-line parameters setting was changed to Command-line parameters: https:\\www.google.be\ out Which is of course wrong... I understand where it comes from, but do suggest to leave the entry in this box alone... Under Linux '\' are converted when running with the gdb debugger. It does not happen when running with the 'none' debugger. Maybe this gives Martin an idea. Mattias -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
Re: [Lazarus] Funny bug
zeljko wrote: Command-line parameters: https:\\www.google.be\ out Which is of course wrong... I understand where it comes from, but do suggest to leave the entry in this box alone... Or at least recognize https: and don't touch. I think that might be a plausible rule for all places where slashes are munged, since most UIs now understand this type of protocol prefix. -- Mark Morgan Lloyd markMLl .AT. telemetry.co .DOT. uk [Opinions above are the author's, not those of his employers or colleagues] -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
[Lazarus] https support; call for testers
Hello, I've just committed support for SSL in the ssockets unit of FPC. I also made the OpenSSL unit more thread-safe. One consequence of this is that the fphttpclient unit now has support for the https:// protocol. I have tested on windows and unix, the support for client-side SSL support works. Server-side support (as could be done in the embedded httpserver) is not yet tested. I would like to invite people to test and report if they find problems or missing features. That this support is released around the same time as the heartbleed leak issue, is entirely coincidental and definitely not intended. Michael. -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
Re: [Lazarus] Funny bug
On Fri, 11 Apr 2014, zeljko wrote: On 04/11/2014 10:45 AM, Michael Van Canneyt wrote: Hi, Just encountered this rather nice bug: Debugging a project in Lazarus, linux. I have in Run Parameters Command-line parameters: https://www.google.be/ out I copy all sources to windows, open the project start debugging. And get an error. Wondering what it is, I see that the command-line parameters setting was changed to Command-line parameters: https:\\www.google.be\ out Which is of course wrong... I understand where it comes from, but do suggest to leave the entry in this box alone... Or at least recognize https: and don't touch. Indeed, some kind of protocol/URI recognition would be nice. Michael. -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
Re: [Lazarus] Remote debugger looses connection to target on Windows 7
Martin Frb wrote: There are several possibilities, that I can think off: 1) some setting the IDE uses. - Gather all the set foo= commands that the IDE sends, and see if applying them to your manual driven gdb session makes a different. - Run your manual gdb with gdb.exe -i mi to enable mi mode (I do not think that is it, but ) 2) Timing (again, and not unlikely) If you open gdb in a terminal, it prints to that terminal. In the IDE it prints to a pipe. That may take different amount off time. thank you, for pointing this out. Also, does your sniffer give the time, between the step over sent to the target, and the packet that comes pack, and is ignored? compared to when it works? In both cases, it shows nearly identically times. It takes about 1,9 ms until the breakpoint reply packet has reached the host. Nearly the same on Win2000. If I activate gdbservers debug log, then it takes about 5,2 ms. Regards, Bernd. -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
Re: [Lazarus] Funny bug
Better not tou On Fri, Apr 11, 2014 at 1:19 PM, zeljko zel...@holobit.net wrote: Or at least recognize https: and don't touch. Better not touch it at all. What if i use /blah for a parameter switch? -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
Re: [Lazarus] Remote debugger looses connection to target on Windows 7
On 11/04/2014 15:08, Bernd Mueller wrote: Martin Frb wrote: There are several possibilities, that I can think off: 1) some setting the IDE uses. - Gather all the set foo= commands that the IDE sends, and see if applying them to your manual driven gdb session makes a different. - Run your manual gdb with gdb.exe -i mi to enable mi mode (I do not think that is it, but ) 2) Timing (again, and not unlikely) If you open gdb in a terminal, it prints to that terminal. In the IDE it prints to a pipe. That may take different amount off time. thank you, for pointing this out. Also, does your sniffer give the time, between the step over sent to the target, and the packet that comes pack, and is ignored? compared to when it works? In both cases, it shows nearly identically times. It takes about 1,9 ms until the breakpoint reply packet has reached the host. Nearly the same on Win2000. If I activate gdbservers debug log, then it takes about 5,2 ms. Strange. But this goes beyond my gdb knowledge. It may be something to ask on the gdb list. -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
[Lazarus] Scroll Wheel
I have several TEdit objects in my form, and because they handle only integer data, I'd like to use my scroll wheel to edit their values. However, there is no OnScrollWheel event that I can see. Since scroll wheels are passed as mouse clicks, I thought to examine the OnMouseDown/OnMouseUp events, but nothing is passed to indicate /which/ button is being pressed. So either Google has failed me, or I have failed Google, but either way, I can't find the answer on the net after an hour of searching. Can anyone point me in the right direction? -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
Re: [Lazarus] Scroll Wheel
On Fri, 11 Apr 2014 13:45:41 -0400 Timothy Groves the.tail.kin...@gmail.com wrote: I have several TEdit objects in my form, and because they handle only integer data, I'd like to use my scroll wheel to edit their values. However, there is no OnScrollWheel event that I can see. Since scroll wheels are passed as mouse clicks, I thought to examine the OnMouseDown/OnMouseUp events, but nothing is passed to indicate /which/ button is being pressed. So either Google has failed me, or I have failed Google, but either way, I can't find the answer on the net after an hour of searching. Can anyone point me in the right direction? Have you tried to override procedure WMMouseWheel(var Message: TLMMouseEvent); message LM_MOUSEWHEEL; ? Mattias -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
Re: [Lazarus] Scroll Wheel
No; I am unsure as to how to do that. Would I need to create a descendant class, or does Lazarus support overriding without doing so? Chess is an exciting game, when played with shotguns. --MegaHAL On Apr 11, 2014 1:59 PM, Mattias Gaertner nc-gaert...@netcologne.de wrote: On Fri, 11 Apr 2014 13:45:41 -0400 Timothy Groves the.tail.kin...@gmail.com wrote: I have several TEdit objects in my form, and because they handle only integer data, I'd like to use my scroll wheel to edit their values. However, there is no OnScrollWheel event that I can see. Since scroll wheels are passed as mouse clicks, I thought to examine the OnMouseDown/OnMouseUp events, but nothing is passed to indicate /which/ button is being pressed. So either Google has failed me, or I have failed Google, but either way, I can't find the answer on the net after an hour of searching. Can anyone point me in the right direction? Have you tried to override procedure WMMouseWheel(var Message: TLMMouseEvent); message LM_MOUSEWHEEL; ? Mattias -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
Re: [Lazarus] Scroll Wheel
I did a search on mouse wheel event delphi - I came up with a lot of articles, most mentioning OnMessage event. Then there was this article, which I've not read all the way, but you may find useful. I'm not sure if this was ported to Lazarus, but I've found referencing Delphi does garner solutions most times. http://mc-computing.com/languages/Delphi/ScrollWheel.html -Chris Everything at or below the line is a signature, not to be confused with the body of the email above. Sorry about the last signature text that seemed to have some people questioning my sanity. We are what we repeatedly do. Excellence, then, is not an act, but a habit. -Aristotle On Apr 11, 2014, at 13:45, Timothy Groves the.tail.kin...@gmail.com wrote: I have several TEdit objects in my form, and because they handle only integer data, I'd like to use my scroll wheel to edit their values. However, there is no OnScrollWheel event that I can see. Since scroll wheels are passed as mouse clicks, I thought to examine the OnMouseDown/OnMouseUp events, but nothing is passed to indicate which button is being pressed. So either Google has failed me, or I have failed Google, but either way, I can't find the answer on the net after an hour of searching. Can anyone point me in the right direction? -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
Re: [Lazarus] Funny bug
On 11/04/2014 13:03, Mattias Gaertner wrote: Under Linux '\' are converted when running with the gdb debugger. It does not happen when running with the 'none' debugger. Maybe this gives Martin an idea. Confirmed, or rather, they are in most cases dropped. That is a different issue though. And they do not get changed from \ to / The problem is that gdb sees them as escape char. -exec-arguments -a /b \c \/d ^done (gdb) and the app will see -a /b c /b I will ave to test this across different versions of gdb, to make sure, that a fix will not break some versions. -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
Re: [Lazarus] Scroll Wheel
On 11/04/2014 19:33, Timothy Groves wrote:
No; I am unsure as to how to do that. Would I need to create a
descendant class, or does Lazarus support overriding without doing so?
The following should give you an idea how to develop the hint Mattias gave:
===code===
unit testIntWheelEdit;
{$mode objfpc}{$H+}
interface
uses
SysUtils, Forms, StdCtrls, LMessages, Spin, Classes;
type
{ TIntWheelEdit }
TIntWheelEdit=class(TCustomEdit)
private
function GetAsInteger: integer;
protected
procedure WMMouseWheel(var Message: TLMMouseEvent); message
LM_MOUSEWHEEL;
procedure KeyPress(var Key: char); override;
public
property AsInteger: integer read GetAsInteger;
end;
{ TForm1 }
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
private
intEdit: TIntWheelEdit;
spinEdit: TSpinEdit;
procedure IntEditChange(Sender: TObject);
end;
var
Form1: TForm1;
implementation
{$R *.lfm}
{ TForm1 }
procedure TForm1.FormCreate(Sender: TObject);
begin
intEdit:=TIntWheelEdit.Create(Self);
intEdit.Left:=10;
intEdit.Top:=10;
intEdit.OnChange:=@IntEditChange;
intEdit.TabOrder:=0;
intEdit.Parent:=Self;
spinEdit:=TSpinEdit.Create(Self);
spinEdit.Top:=10;
spinEdit.Left:=100;
spinEdit.MinValue:=-1000;
spinEdit.MaxValue:=1000;
spinEdit.ReadOnly:=True;
spinEdit.Parent:=Self;
end;
procedure TForm1.IntEditChange(Sender: TObject);
begin
if Sender is TIntWheelEdit then
spinEdit.Value:=TIntWheelEdit(Sender).AsInteger;
end;
{ TIntWheelEdit }
function TIntWheelEdit.GetAsInteger: integer;
begin
Result:=StrToIntDef(Text, 0);
end;
procedure TIntWheelEdit.WMMouseWheel(var Message: TLMMouseEvent);
var
i: integer;
begin
i:=StrToIntDef(Text, 0);
if Message.WheelDelta =0 then
Inc(i)
else Dec(i);
Text:=IntToStr(i);
Message.Result:=1;
end;
procedure TIntWheelEdit.KeyPress(var Key: char);
begin
case Length(Text)=0 of
False: if Key in [#8,'0'..'9'] then
inherited KeyPress(Key)
else Key:=#0;
True: if Key in [#8,'-','0'..'9'] then
inherited KeyPress(Key)
else Key := #0;
end;
end;
end.
===code end===
--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
Re: [Lazarus] https support; call for testers
On 2014-04-11 14:00, Michael Van Canneyt wrote: That this support is released around the same time as the heartbleed leak issue, is entirely coincidental and definitely not intended. :-) It's called perfect timing. Regards, - Graeme - -- fpGUI Toolkit - a cross-platform GUI toolkit using Free Pascal http://fpgui.sourceforge.net/ -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
