[Lazarus] Issues compiling lazarus trunk from svn with latest trunk of fpc
Hi guys. I have been having some issues where I can't get a copy of lazarus to compile with FPC 3.1.1 I have tried the most recent versions and it didn't make a change. The error I am getting is - Free Pascal Compiler version 3.1.1 [2016/02/17] for x86_64 Copyright (c) 1993-2015 by Florian Klaempfl and others (1002) Target OS: Win64 for x64 (3104) Compiling fcllaz.pas (3104) Compiling registerfcl.pas (3104) Compiling lazaruspackageintf.pas (10001) PPU Loading C:\LazarusExtras\fpc\3.1.1\units\x86_64-win64\fcl-extra\ServiceManager.ppu (10011) PPU Source: ServiceManager.pas not available (10028) Recompiling ServiceManager, checksum changed for Classes C:\lazarus\packager\registration\registerfcl.pas(43,3) Fatal: (10022) Can't find unit ServiceManager used by RegisterFCL Fatal: (1018) Compilation aborted make[1]: *** [fcllaz.ppu] Error 1 make[1]: Leaving directory `C:/lazarus/packager/registration' make: *** [registration] Error 2 Kind Regards Justin Smyth -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
[Lazarus] GDB Logging options
Hi All, With the recent changes I can now compile for my arm embedded target using lazarus and can get lazarus to use my EABI GDB to connect to openOCD V8 OK , is there a way I can see what commands are sent to GDB when lazarus starts it up ? I want to check to see if my changes in the class I've added are working and what is sent to gdb so I can check against what I would sent from a cmd prompt. At present I start up OpenOCD V8 in a cmd prompt and when lazarus starts the EABI GDB I can see the connection occur in OpenOCD , So I am getting some where now. Thanks to Sven for your help and Michael Ring who with out his help I would be up the creek with out a paddle. ( and also martin for his help in getting my own class working for gdb ) Kind Regards Justin Smyth -Original Message- From: Sven Barth [mailto:pascaldra...@googlemail.com] Sent: Thursday, 17 July 2014 6:24 AM To: lazarus@lists.lazarus.freepascal.org Subject: Re: [Lazarus] Compiler Options On 16.07.2014 22:00, Mattias Gaertner wrote: > On Wed, 16 Jul 2014 21:25:49 +0200 > Sven Barth wrote: > >> [...] >> It's likely better to rely on the system.ppu... :/ > > Some users installed fpc with system.ppu and no classes.ppu. That's > why the test was added years ago. How did they manage that?! O.o Regards, Sven -- ___ 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] Compiler Options
Whats required to change this behaviour ? If you can point me in the right direction it would be of great help. I’ve just gotta remember to switch from VB coding back to pascal I am so use to it , its not funny - I got a job doing VB programming here in Australia back in feb @ www.isis.co.uk Kind Regards Justin From: Sven Barth [mailto:pascaldra...@googlemail.com] Sent: Thursday, 17 July 2014 7:34 PM To: Lazarus mailing list Subject: Re: [Lazarus] Compiler Options Am 16.07.2014 22:01 schrieb "Mattias Gaertner" : > > On Wed, 16 Jul 2014 21:25:49 +0200 > Sven Barth wrote: > > >[...] > > It's likely better to rely on the system.ppu... :/ > > Some users installed fpc with system.ppu and no > classes.ppu. That's why the test was added years ago. Hmm... It might be that this was when Classes was not yet part of the RTL. This was changed some years back, so that unit should be available automatically now (except for selected targets). With the recent clean up of the RTL directory a few other units fall now under the category of "might be missing"... Regards, Sven -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
Re: [Lazarus] Compiler Options
No Classes for Embedded ARM. If I goto my source dir for Trunk FPC and do a search in RTL I can't find anything for classes.* Note I am using trunk FPC and not fixes_2_6 ( or what ever the lastest version is) as trunk FPC only supports my lpc board, it doesn't work in fixes_2_6 Kind Regards Justin -Original Message- From: Mattias Gaertner [mailto:nc-gaert...@netcologne.de] Sent: Wednesday, 16 July 2014 10:07 PM To: lazarus@lists.lazarus.freepascal.org Subject: Re: [Lazarus] Compiler Options On Wed, 16 Jul 2014 21:45:55 +1000 "Justin Smyth" wrote: > Thanks > > I am updating lazarus on my vm now. > > > I am using trunk FPC 2.6.4 which has the mods for LPC 1343. ( embedded > ) > > I've also made a custom version of GDBMiServerDebugger which adds > support for connecting to EABI version of gdb using OpenOCD V8 > > > Also another question , when I am targeting arm based arch , when I > start up it complains it cant find classes.ppu - but the program > compiles OK can this be supressed if a target is chosen that doesn't use it ? Is there really no classes.ppu for your arm target? 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] Compiler Options
Thanks I am updating lazarus on my vm now. I am using trunk FPC 2.6.4 which has the mods for LPC 1343. ( embedded ) I've also made a custom version of GDBMiServerDebugger which adds support for connecting to EABI version of gdb using OpenOCD V8 Also another question , when I am targeting arm based arch , when I start up it complains it cant find classes.ppu - but the program compiles OK can this be supressed if a target is chosen that doesn't use it ? -Original Message- From: Michael Schnell [mailto:mschn...@lumino.de] Sent: Wednesday, 16 July 2014 8:04 PM To: lazarus@lists.lazarus.freepascal.org Subject: Re: [Lazarus] Compiler Options On 07/16/2014 11:57 AM, Marco van de Voort wrote: > (and that results in only a barebone RTL) I do like the term "barebone" a lot more than "embedded" for this option :-) -Michael -- ___ 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] Compiler Options
If you compile using trunk fpc I need to use -Cparmv7m -Op is target cpu optimization And -cp is for choice of instruction set. The -Op seems wrong to be used in this case, project options are for defining the cpu type not if optimizations are needed. The two are listed from ppcrossarm.exe -h -Op Set target cpu for optimizing, see fpc -i for possible values -Cp Select instruction set, see fpc -i for possible values See what I mean, the -Op doesn't not make sense to be used from here, it should be -Cp Ideally I want to place a check box to allow the user (me) to change it from using -Op to -Cp , both are valid commands coming from using -h on the compiler. As for the arm based board , I am using a NXP LPC 1343 Risc Processor. http://www.wvshare.com/product/Open1343-Standard.htm that's the board in question Kind Regards Justin From: Michael Schnell [mailto:mschn...@lumino.de] Sent: Wednesday, 16 July 2014 6:43 PM To: lazarus@lists.lazarus.freepascal.org Subject: Re: [Lazarus] Compiler Options On 07/15/2014 05:26 AM, Justin Smyyth wrote: "Target selected as embedded" Is there an "official" description what this is supposed to mean ? Some years ago "embedded" in the Linux Kernel meant that the CPU does not feature a Memory management Unit. Nowadays, ARM CPUs without MMU seem rather outdated, while a lot of the newly designed "embedded boxes" (e.g. NAS devices) in fact do uses ARM CPUs with MMU. Hence IMHO the therm "embedded" to select a feature of an ARCH should be avoided. A -Michael -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
Re: [Lazarus] gdb debug server class
Thanks In the constructor I have if FDebugger_OpenOCD_Config = nil then FDebugger_OpenOCD_Config := TStringList.Create; Ive added a destroy destructor TGDBMIOpenOCDDebuggerProperties.Destroy; begin if FDebugger_OpenOCD_Config <> nil then begin FreeandNil(FDebugger_OpenOCD_Config); end; inherited Destroy; end; and Ive addeddestructor Destroy; override; into the class itself in the assign Ive added FDebugger_OpenOCD_Config := TGDBMIOpenOCDDebuggerProperties(Source).FDebugger_OpenOCD_Config; As for the setter Ive not added that , is that not the same as what Ive already done ? Kind Regards Justin PS Ill get it added once my project is up and working From: Martin Frb [mailto:laza...@mfriebe.de] Sent: Monday, 7 July 2014 8:24 PM To: delph...@smythconsulting.net; Lazarus mailing list Subject: Re: [Lazarus] gdb debug server class On 07/07/2014 11:08, Justin Smyth wrote: Hi folks , Im trying to make a copy of GDBMiServerDebugger, to allow some extra gdb commands to be saved and parsed. In the list of properties I want to add a list of strings to save, ie ( assuming i have changed the name of the class , I am just copying out of the original I want to store 3 or 4 extra commands I want gdb to run when It executes my arm file via open ocd gdb. TGDBMIServerDebuggerProperties = class(TGDBMIDebuggerPropertiesBase) private FDebugger_Remote_Hostname: string; FDebugger_Remote_Port: string; -à FDebugger_Custom_List:TStringList ß public is this possible ? if I do this I need to add FDebugger_Custom_List = TStringList.create; into the constructor listed below constructor TGDBMIServerDebuggerProperties.Create; Yes, the object needs to be present, so it can be used in the OI. You probably also need a setter for the propert procedure SetDebugger_Custom_List( New:TStringList ); FDebugger_Custom_List.assign(New); and a destructor to free it.Do not forget to add all of your fields to the ASSIGN method too. And last note, I have not looked at how this is stringified when saved. So I do not know if it works with TStrings (it should...) -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
[Lazarus] gdb debug server class
Hi folks , Im trying to make a copy of GDBMiServerDebugger, to allow some extra gdb commands to be saved and parsed. In the list of properties I want to add a list of strings to save, ie ( assuming i have changed the name of the class , I am just copying out of the original I want to store 3 or 4 extra commands I want gdb to run when It executes my arm file via open ocd gdb. TGDBMIServerDebuggerProperties = class(TGDBMIDebuggerPropertiesBase) private FDebugger_Remote_Hostname: string; FDebugger_Remote_Port: string; -à FDebugger_Custom_List:TStringList ß public is this possible ? if I do this I need to add FDebugger_Custom_List = TStringList.create; into the constructor listed below constructor TGDBMIServerDebuggerProperties.Create; Kind Regards Justin Smyth -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
Re: [Lazarus] Gdb and openocd via lazarus
I've updated lpc13xx.pp to add the Checksum under neath "UsageFault_interrupt" What I'm not sure is what is the linker script. Where do I find it ? Justin -Original Message- From: Michael Ring [mailto:m...@michael-ring.org] Sent: Tuesday, 17 June 2014 9:16 PM To: delph...@smythconsulting.net Subject: Re: [Lazarus] Gdb and openocd via lazarus About flashing: You can remove your flashing code from openocd, you have the load command in your gdb commandline and this does the flashing. Those lines: Loading section .text, size 0x7cc lma 0x0 Loading section .data, size 0x98 lma 0x7cc Start address 0x784, load size 2148 Transfer rate: 740 bytes/sec, 1074 bytes/write. tell me that flasing was done via gdb 'load' command. The openocd warning shows a still open issue in fpc. The binary you built will work fine if you run it in the debugger, it will however not work on a standalone chip not connected to a debugger because lpc chip rom first verifies a checksum and when it is correct the boot rom starts the app, if the checksum is wrong then the serial bootloader process is initiated. simple rule is that the sum of the data stored in the first 8 interrupt vectors must be 0 This link shows the details: http://www.lpcware.com/content/forum/lpc1788-flash-signature-generation the important line is this one: a) in the linker script: /* Calculate NXP Cortex-M3 valid user code checksum. This is 0-(sum of first 7 entries in vector table), * Note that we must add 1 to each code space vector (LSB = marker for thumb code). */ __valid_user_code_checksum = 0 - (__cs3_stack + __cs3_reset + 1 + NMI_Handler + 1 + HardFault_Handler + 1 + MemManage_Handler + 1 + BusFault_Handler + 1 + UsageFault_Handler + 1); Attention: these statements must be outside any output section, because linker variables inside output sections are relative to the start of the section. something like this must get added to the linker script for lpc-chips. code should be something like (but needs testing): __valid_user_code_checksum = 0 - (_stack_top + Startup + 1 + NonMaskableInt_interrupt + 1 + 1 + MemoryManagement_interrupt + 1 + BusFault_interrupt + 1 + UsageFault_interrupt + 1); This value must the be written into the 'Checksum' vector. I always wanted to do this a long time ago, but I never actually needed it because I still have plenty of stm32 chips to burn and those do not need to have this trick applied. .long _stack_top .long Startup .long NonMaskableInt_interrupt .long 0 .long MemoryManagement_interrupt .long BusFault_interrupt .long UsageFault_interrupt .long Checksum .long 0 Am 17.06.14 12:49, schrieb Justin Smyth: > Thanks > > > My status right now I about to move into getting it working when > lazarus calls GDB. I didn't know about GDB doing the flash instead > > > I just wanted to make sure both gdb and openocd were talking correctly > and I had that stage correct. ( it seems to work except openocd > bitches about the checksum of 0x not matching the calculated > value of the file) > > Heres the output in question - from when open up openocd with a > configuration file that I deleted the bit from Flash on wards > > Two questions LPC Vector can I ignore this , and the time out for gdb > ( I tried to add --eval-command="set remotetimeout 60" and it didn't > make any difference ) > > > C:\LazarusExtras\OpenOCD>openocd.exe -f ocd.cfg Open On-Chip Debugger > 0.8.0 (2014-04-28-08:42) Licensed under GNU GPL v2 For bug reports, > read > http://openocd.sourceforge.net/doc/doxygen/bugs.html > adapter speed: 10 kHz > adapter_nsrst_delay: 200 > Info : This adapter doesn't support configurable speed Info : STLINK > v2 JTAG v14 API v2 SWIM v3 VID 0x0483 PID 0x3748 Info : using stlink > api v2 Info : Target voltage: 3.191053 Info : lpc1343.cpu: hardware > has 6 breakpoints, 4 watchpoints target state: halted target halted > due to debug-request, current mode: Thread > xPSR: 0x0100 pc: 0x1fff0104 msp: 0x1ffc > > -> now I start gdb in a separate dos cmd > > > C:\LazarusExtras\gdb\bin>arm-none-eabi-gdb myprogram.elf > --eval-command="target extended :" --eval-command="monitor reset > halt" --eval-command="set mem in accessible-by-default off" > --eval-command="load" > GNU gdb (crosstool-NG linaro-1.13.1-4.9-2014.05 - Linaro GCC > 4.9-2014.05) > 7.6.1- > 2013.10 > Copyright (C) 2013 Free Software Foundation, Inc. > License GPLv3+: GNU GPL version 3 or later > <http://gnu.org/licenses/gpl.html> > This is free software: you are free to change and redistribute it. > There is NO WARRANTY, to the extent permitted by law. Type "show copying" > and "sho
Re: [Lazarus] Gdb and openocd via lazarus
Thanks My status right now I about to move into getting it working when lazarus calls GDB. I didn't know about GDB doing the flash instead I just wanted to make sure both gdb and openocd were talking correctly and I had that stage correct. ( it seems to work except openocd bitches about the checksum of 0x not matching the calculated value of the file) Heres the output in question - from when open up openocd with a configuration file that I deleted the bit from Flash on wards Two questions LPC Vector can I ignore this , and the time out for gdb ( I tried to add --eval-command="set remotetimeout 60" and it didn't make any difference ) C:\LazarusExtras\OpenOCD>openocd.exe -f ocd.cfg Open On-Chip Debugger 0.8.0 (2014-04-28-08:42) Licensed under GNU GPL v2 For bug reports, read http://openocd.sourceforge.net/doc/doxygen/bugs.html adapter speed: 10 kHz adapter_nsrst_delay: 200 Info : This adapter doesn't support configurable speed Info : STLINK v2 JTAG v14 API v2 SWIM v3 VID 0x0483 PID 0x3748 Info : using stlink api v2 Info : Target voltage: 3.191053 Info : lpc1343.cpu: hardware has 6 breakpoints, 4 watchpoints target state: halted target halted due to debug-request, current mode: Thread xPSR: 0x0100 pc: 0x1fff0104 msp: 0x1ffc -> now I start gdb in a separate dos cmd C:\LazarusExtras\gdb\bin>arm-none-eabi-gdb myprogram.elf --eval-command="target extended :" --eval-command="monitor reset halt" --eval-command="set mem in accessible-by-default off" --eval-command="load" GNU gdb (crosstool-NG linaro-1.13.1-4.9-2014.05 - Linaro GCC 4.9-2014.05) 7.6.1- 2013.10 Copyright (C) 2013 Free Software Foundation, Inc. License GPLv3+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html> This is free software: you are free to change and redistribute it. There is NO WARRANTY, to the extent permitted by law. Type "show copying" and "show warranty" for details. This GDB was configured as "--host=i586-host_pc-mingw32msvc --target=arm-none-ea bi". For bug reporting instructions, please see: <https://bugs.launchpad.net/gcc-linaro>... Reading symbols from C:\LazarusExtras\gdb\bin\myprogram.elf...done. Remote debugging using : 0x1fff0104 in ?? () target state: halted target halted due to debug-request, current mode: Thread xPSR: 0x0100 pc: 0x1fff0104 msp: 0x1ffc Loading section .text, size 0x7cc lma 0x0 Loading section .data, size 0x98 lma 0x7cc Start address 0x784, load size 2148 Transfer rate: 740 bytes/sec, 1074 bytes/write. (gdb) Now the openocd windows comes up with Info : accepting 'gdb' connection from target state: halted target halted due to debug-request, current mode: Thread xPSR: 0x0100 pc: 0x1fff0104 msp: 0x1ffc target state: halted target halted due to debug-request, current mode: Thread xPSR: 0x0100 pc: 0x1fff0104 msp: 0x1ffc target state: halted target halted due to breakpoint, current mode: Thread xPSR: 0x6100 pc: 0x1004 msp: 0x10b4 ---> Warn : Verification will fail since checksum in image (0x) to be written to flash is different from calculated vector checksum (0xefffba67). <--- > Warn : To remove this warning modify build tools on developer PC to inject correct LPC vector checksum. < *** Warn : keep_alive() was not invoked in the 1000ms timelimit. GDB alive packet not sent! (1785). Workaround: increase "set remotetimeout" in GDB *** target state: halted target halted due to debug-request, current mode: Thread xPSR: 0x0100 pc: 0x1fff0104 msp: 0x1ffc -Original Message- From: Michael Ring [mailto:m...@michael-ring.org] Sent: Tuesday, 17 June 2014 7:39 PM To: delph...@smythconsulting.net; Lazarus mailing list Subject: Re: [Lazarus] Gdb and openocd via lazarus TUI is a rather seldomly used option, I also saw that some linux distros do not support it. If you want it you will perhaps really need to build a version of gdb for yourself. Your openocd file looks fine on first glance, I would propably not do the flash command manually and instead use gdb's command to do the flashing, but in the end the result should be pretty much the same. Using gdb for flashing is perhaps a little better because you do not need to change your openocd config file when you binary file changes. If I find the time tonight I will see if this works, but I will not promise anything ;-) So what is your status right now, can you already single step through your code and does entering break main cont work ? Michael Am 16.06.14 16:03, schrieb Justin Smyth: > Thanks Michael > > > I got better results from using the GDB from the tool chain binaries > from linaro. > > Is it normal for TUI not to be supported in the arm eabi version ? > > I can now start openocd8 , and start gdb and I see both of them talk > to each other
Re: [Lazarus] Gdb and openocd via lazarus
Thanks Michael I got better results from using the GDB from the tool chain binaries from linaro. Is it normal for TUI not to be supported in the arm eabi version ? I can now start openocd8 , and start gdb and I see both of them talk to each other ( I want to see gdb connect correctly then I will move onto getting lazarus to connect once I have it working in two dos prompts on my windows vm ) My open ocd configuration file looks like this ( does this look right ? anything missing or do I need to change anything ? ) source [find interface/stlink-v2.cfg] set CHIPSERIES lpc1300 set TRANSPORT hla_swd set CPUROMSIZE 0x8000 set CPURAMSIZE 0x2000 source [find target/lpc1343.cfg] init reset init flash write_image erase unlock myprogram.elf 0 elf reset run reset init Kind Regards Justin -Original Message- From: Michael Ring [mailto:m...@michael-ring.org] Sent: Monday, 16 June 2014 6:33 PM To: Lazarus mailing list Subject: Re: [Lazarus] Gdb and openocd via lazarus There's an excellent Page on using gdb with freepascal on the wiki: http://wiki.lazarus.freepascal.org/GDB_Debugger_Tips, when you scroll down there's a list of recommended gdb versions. Rebuilding gdb from source is peace of cake on linux and mac, I never really tried it on a windows machine , but this link should help: http://dev.zhourenjian.com/blog/2009/03/11/compiling-gdb-debugger-in-windows .html or have a look at the linaro toolchain, they also have a lot of different precompiled versions for windows, their builds: https://releases.linaro.org/14.05/components/toolchain/binaries When you start at https://releases.linaro.org/ you can see all the different versions available. Michael Am 14.06.14 17:42, schrieb Justin Smyth: > Michael > > A few questions for you , I am back now able to proceeded with my arm > project using lazarus ( laptop has been dead 3 weeks needed a replacement > motherboard off ebay from the USA). > > > The arm GDB I am using I got from code sorcery ( arm-none-eabi ) > > > C:\LazarusExtras\gdb\bin>arm-none-eabi-gdb.exe > GNU gdb (Sourcery G++ Lite 2010.09-51) 7.2.50.20100908-cvs > Copyright (C) 2010 Free Software Foundation, Inc. > License GPLv3+: GNU GPL version 3 or later > <http://gnu.org/licenses/gpl.html> > This is free software: you are free to change and redistribute it. > There is NO WARRANTY, to the extent permitted by law. Type "show copying" > and "show warranty" for details. > This GDB was configured as "--host=i686-mingw32 --target=arm-none-eabi". > For bug reporting instructions, please see: > <https://support.codesourcery.com/GNUToolchain/>. > > > > Is this the best version to use ? > > Could I compile the latest version of gdb from there svn ? would that work > out of the box - I've been able to compile fpc ok for arm from svn. > > > I just want to make sure the copy of gdb for arm I using can stop on > breakpoints etc. > > > Justin Smyth > > > > -Original Message- > From: Koenraad Lelong [mailto:lazar...@de-brouwerij.be] > Sent: Friday, 30 May 2014 6:06 AM > To: lazarus@lists.lazarus.freepascal.org > Subject: Re: [Lazarus] Gdb and openocd via lazarus > > op 28-05-14 13:57, Michael Ring schreef: >> Here's how I call gdb: >> >> arm-none-eabi-gdb hello.elf --tui --eval-command="target extended :" >> --eval-command="monitor reset halt" --eval-command="set mem >> inaccessible-by-default off" --eval-command="load" >> >> >> This loads the binary, you should end up with the debugger showing you >> your source code. >> >> Now try stepping through the code, if all is fine then great, problem >> is in the integration of gdb. >> >> Stept I use: >> break main >> cont >> >> step >> > This all works. Tomorrow I will try to send those commands with mseide. > > Many thanks. > > Koenraad > > > -- > ___ > 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 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] Gdb and openocd via lazarus
Michael A few questions for you , I am back now able to proceeded with my arm project using lazarus ( laptop has been dead 3 weeks needed a replacement motherboard off ebay from the USA). The arm GDB I am using I got from code sorcery ( arm-none-eabi ) C:\LazarusExtras\gdb\bin>arm-none-eabi-gdb.exe GNU gdb (Sourcery G++ Lite 2010.09-51) 7.2.50.20100908-cvs Copyright (C) 2010 Free Software Foundation, Inc. License GPLv3+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html> This is free software: you are free to change and redistribute it. There is NO WARRANTY, to the extent permitted by law. Type "show copying" and "show warranty" for details. This GDB was configured as "--host=i686-mingw32 --target=arm-none-eabi". For bug reporting instructions, please see: <https://support.codesourcery.com/GNUToolchain/>. Is this the best version to use ? Could I compile the latest version of gdb from there svn ? would that work out of the box - I've been able to compile fpc ok for arm from svn. I just want to make sure the copy of gdb for arm I using can stop on breakpoints etc. Justin Smyth -Original Message- From: Koenraad Lelong [mailto:lazar...@de-brouwerij.be] Sent: Friday, 30 May 2014 6:06 AM To: lazarus@lists.lazarus.freepascal.org Subject: Re: [Lazarus] Gdb and openocd via lazarus op 28-05-14 13:57, Michael Ring schreef: > > Here's how I call gdb: > > arm-none-eabi-gdb hello.elf --tui --eval-command="target extended :" > --eval-command="monitor reset halt" --eval-command="set mem > inaccessible-by-default off" --eval-command="load" > > > This loads the binary, you should end up with the debugger showing you > your source code. > > Now try stepping through the code, if all is fine then great, problem > is in the integration of gdb. > > Stept I use: > break main > cont > > step > This all works. Tomorrow I will try to send those commands with mseide. Many thanks. Koenraad -- ___ 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] Gdb and openocd via lazarus
Hi folks I can get lazarus to compile my project ok then I can openocd to flash my board , I can gdb connecting on port OK but I can't get it stop on any break points.. Also should I see once it connects with gdb something change in openocd ? With the LPC1343 chipset do I need to do anything special before running my own code ? I am just doing a loop with some break points in it to see I can see it working. Kind Regards Justin From: Justin Smyth [mailto:delph...@smythconsulting.net] Sent: Saturday, 17 May 2014 10:02 AM To: Lazarus@lists.lazarus.freepascal.org Subject: [Lazarus] Gdb and openocd via lazarus Hi folks I remember a while ago Michael ring had someway of modified version of Lazarus to connect to gdb spawned from a openocd session , is this still possible? I am using fpc 2.6.5 and latest Lazarus from the svn ( fpc is from svn fixes2_6 branch) -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
Re: [Lazarus] How to tell debugger what executable to use ?
I can now compile in lazarus , I have openocd working it detects my board. I need to flash the elf file to my board , I have read open ocd can do , and I read somewhere GBD can do it too Whats the best way to do this ? Also do I need to have openocd running first then compile my program ? ( then flash ??) Kind Regards Justin -Original Message- From: Michael Ring [mailto:m...@michael-ring.org] Sent: Wednesday, 21 May 2014 9:56 PM To: delph...@smythconsulting.net; Lazarus mailing list Subject: Re: [Lazarus] How to tell debugger what executable to use ? I only use trunk lazarus, I cannot tell you if this is also available in the release versions. MiR Am 21.05.14 13:48, schrieb Justin Smyth: > Do I need lazarus 1.2.2 or will latest trunk work ? > > I am using this on a vm on my server which is connected to the > microprocessor board. , so it will only be used for this ,, my own > dev machine is on my laptop > > -Original Message- > From: Michael Ring [mailto:m...@michael-ring.org] > Sent: Wednesday, 21 May 2014 9:35 PM > To: Lazarus mailing list > Subject: Re: [Lazarus] How to tell debugger what executable to use ? > > Project->Compiler Options->other > > You can add those settings in Custom options control > > Target Os (embedded) and Target CPU family can be set in > Project->Compiler Options->Config and Target > > The compiler can be set in > > Project->Compiler Options->Compiler Commands, in Compiler Command edit > Project->field > > Use the Test button to see if all is complete. > > Unfortunaltely the debugger cannot be set on project level, you need > to set it in > > Tools->Options->Debugger > > and set it back when you want to debug a windows project. > > > Am 21.05.14 13:12, schrieb Justin Smyth: >> I'd like to know more , I am doing the same thing but from windows >> for a NXP LPC 1343 board. >> >> >> I have recently got FPC 2.6.4 svn -27804 running on Lazarus 1.3 win32 >> i386 Trunk ( SVN 45035 ) >> >> >> I don't see this version having much debugging for embedded arm plus >> for my chipset I am missing the -w switch I need to pass to >> ppcrossarm.exe ( I have to tell lazarus on win32) >> >> The chipset I am using is - LPC1343FBD48 >> >> I have to pass this to fpc / ppcrossarm >> >> -Parm -Tembedded -WpLPC1343FBD48 -Cparmv7m >> >> Do you have any clues on how to set up lazarus to pass in the -w >> command to the compiler ? >> >> >> Kind Regards >> >> >> Justin >> >> -Original Message- >> From: Koenraad Lelong [mailto:lazar...@de-brouwerij.be] >> Sent: Wednesday, 21 May 2014 8:22 PM >> To: Lazarus mailing >> Subject: [Lazarus] How to tell debugger what executable to use ? >> >> Hi, >> >> I'm trying to use lazarus as a debugging-frontend for arm-embedded. >> I managed to configure lazarus to compile my source into >> arm-embedded-code for the STM32F103-processor. >> My next step is to configure lazarus to debug the code. >> When I do nothing, the debugger complains that project1 does not >> exist (used path is OK), which is true because that file really does >> not exist and should not exist. It's an *elf-file* (extension : .elf) >> that > should be used. >> If I use gdb-cli I also have to use the elf-file. So how do I tell >> lazarus to use that elf-file ? >> I configured lazarus to use arm-none-eabi-gdb as debugger, connect to >> localhost, port . Which is the port openocd uses to let the >> debugger have control. >> >> I'm using lazarus 1.2.2, and fpc svn 27738 as arm-embedded-compiler. >> On a linux-machine. >> >> P.S. is there a way to send "monitor" commands to the debugger ? That >> way I could program my chip. >> >> Thanks, >> >> Koenraad.. >> >> -- >> ___ >> 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 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 mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
Re: [Lazarus] How to tell debugger what executable to use ?
Do I need lazarus 1.2.2 or will latest trunk work ? I am using this on a vm on my server which is connected to the microprocessor board. , so it will only be used for this ,, my own dev machine is on my laptop -Original Message- From: Michael Ring [mailto:m...@michael-ring.org] Sent: Wednesday, 21 May 2014 9:35 PM To: Lazarus mailing list Subject: Re: [Lazarus] How to tell debugger what executable to use ? Project->Compiler Options->other You can add those settings in Custom options control Target Os (embedded) and Target CPU family can be set in Project->Compiler Options->Config and Target The compiler can be set in Project->Compiler Options->Compiler Commands, in Compiler Command edit Project->field Use the Test button to see if all is complete. Unfortunaltely the debugger cannot be set on project level, you need to set it in Tools->Options->Debugger and set it back when you want to debug a windows project. Am 21.05.14 13:12, schrieb Justin Smyth: > I'd like to know more , I am doing the same thing but from windows > for a NXP LPC 1343 board. > > > I have recently got FPC 2.6.4 svn -27804 running on Lazarus 1.3 win32 > i386 Trunk ( SVN 45035 ) > > > I don't see this version having much debugging for embedded arm plus > for my chipset I am missing the -w switch I need to pass to > ppcrossarm.exe ( I have to tell lazarus on win32) > > The chipset I am using is - LPC1343FBD48 > > I have to pass this to fpc / ppcrossarm > > -Parm -Tembedded -WpLPC1343FBD48 -Cparmv7m > > Do you have any clues on how to set up lazarus to pass in the -w > command to the compiler ? > > > Kind Regards > > > Justin > > -Original Message- > From: Koenraad Lelong [mailto:lazar...@de-brouwerij.be] > Sent: Wednesday, 21 May 2014 8:22 PM > To: Lazarus mailing > Subject: [Lazarus] How to tell debugger what executable to use ? > > Hi, > > I'm trying to use lazarus as a debugging-frontend for arm-embedded. > I managed to configure lazarus to compile my source into > arm-embedded-code for the STM32F103-processor. > My next step is to configure lazarus to debug the code. > When I do nothing, the debugger complains that project1 does not exist > (used path is OK), which is true because that file really does not > exist and should not exist. It's an *elf-file* (extension : .elf) that should be used. > If I use gdb-cli I also have to use the elf-file. So how do I tell > lazarus to use that elf-file ? > I configured lazarus to use arm-none-eabi-gdb as debugger, connect to > localhost, port . Which is the port openocd uses to let the > debugger have control. > > I'm using lazarus 1.2.2, and fpc svn 27738 as arm-embedded-compiler. > On a linux-machine. > > P.S. is there a way to send "monitor" commands to the debugger ? That > way I could program my chip. > > Thanks, > > Koenraad.. > > -- > ___ > 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 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] How to tell debugger what executable to use ?
I'd like to know more , I am doing the same thing but from windows for a NXP LPC 1343 board. I have recently got FPC 2.6.4 svn -27804 running on Lazarus 1.3 win32 i386 Trunk ( SVN 45035 ) I don't see this version having much debugging for embedded arm plus for my chipset I am missing the -w switch I need to pass to ppcrossarm.exe ( I have to tell lazarus on win32) The chipset I am using is - LPC1343FBD48 I have to pass this to fpc / ppcrossarm -Parm -Tembedded -WpLPC1343FBD48 -Cparmv7m Do you have any clues on how to set up lazarus to pass in the -w command to the compiler ? Kind Regards Justin -Original Message- From: Koenraad Lelong [mailto:lazar...@de-brouwerij.be] Sent: Wednesday, 21 May 2014 8:22 PM To: Lazarus mailing Subject: [Lazarus] How to tell debugger what executable to use ? Hi, I'm trying to use lazarus as a debugging-frontend for arm-embedded. I managed to configure lazarus to compile my source into arm-embedded-code for the STM32F103-processor. My next step is to configure lazarus to debug the code. When I do nothing, the debugger complains that project1 does not exist (used path is OK), which is true because that file really does not exist and should not exist. It's an *elf-file* (extension : .elf) that should be used. If I use gdb-cli I also have to use the elf-file. So how do I tell lazarus to use that elf-file ? I configured lazarus to use arm-none-eabi-gdb as debugger, connect to localhost, port . Which is the port openocd uses to let the debugger have control. I'm using lazarus 1.2.2, and fpc svn 27738 as arm-embedded-compiler. On a linux-machine. P.S. is there a way to send "monitor" commands to the debugger ? That way I could program my chip. Thanks, Koenraad.. -- ___ 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] Gdb and openocd via lazarus
Hi folks I remember a while ago Michael ring had someway of modified version of Lazarus to connect to gdb spawned from a openocd session , is this still possible? I am using fpc 2.6.5 and latest Lazarus from the svn ( fpc is from svn fixes2_6 branch) -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
[Lazarus] FPC / Lazarus ARM Embedded Debuging
Sorry of this cross posts but i wasn't sure where to send this question to. I am currently using a LPC 1343 Microprocessor board and i have recently purchased a ULINK2 debugging kit from china. i am aware that there are plans to allow debugging these boards using the UNLINK2, but it wasnt something that is currently available could i get some help so i can use the UNLINK2 device to debug my board , i want to be able to write some code in lazarus , upload it to the board and debug it I do believe micheal ring was talking bout this Kind Regards Justin ps if you get this and email me back you prob wont get any replies for 8 or so hours as its after 11pm here in Melbourne AU , i'm off to bed need some sleep. -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
Re: [Lazarus] Lazarus and Arm Embedded.( see FPC Bug report 23844)
when you have something regarding embedded arm ( Target embedded ) in german let me know , i dont need to speak or under stand german , i just use google translator which works great for me. -Original Message- From: Michael Schnell Sent: Friday, February 15, 2013 8:15 PM To: Lazarus mailing list Subject: Re: [Lazarus] Lazarus and Arm Embedded.( see FPC Bug report 23844) On 02/14/2013 08:05 PM, Koenraad Lelong wrote: I don't mind the German version. I have no problems reading German. Writing is a bit more difficult for me ;-). So please see here: http://www.lazarusforum.de/viewtopic.php?f=4&t=6645&start=60 and http://www.lazarusforum.de/viewtopic.php?f=9&t=6664&start=45 and maybe http://www.lazarusforum.de/viewtopic.php?f=10&t=6654 What I mean with an executable is the result of a crosscompiled source, a binary you run on your embedded-arm-processor. Yep. That does work for Andy (on a 32 Bit Linux). (I don't know if he already tried to use Lazarus to call the compiler on that behalf or if he only did in on the command line. But Lazarus should not be a great problem.) I am still trying to make it work on a 64 Bit Debian. -Michael -- ___ 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] Lazarus and Arm Embedded.( see FPC Bug report 23844)
Dont worry i will let you know , i want to be able to write some code and debug it right away in lazarus. You’ll prob laugh at what my end point is – controlling my pc at home , its got 3.8Tb in Raid 5 , with a noctua D14 fan on it and i’m going to measure the heat from the drives in the array and use the board to calculate the speed of the fan that i’ve got in front of the array (and also take note of the time of the day , as fan noise @ night here is a no no.) ... my rig might be old but it still got heaps of grunt – Intel Q6600 @ 3Ghz , 5 * 1Tb Black in Raid5 , 1 * Sata 3 2Tb HDD , blue ray burner etc tec From: Michael Ring Sent: Friday, February 15, 2013 8:42 AM To: Lazarus mailing list Subject: Re: [Lazarus] Lazarus and Arm Embedded.( see FPC Bug report 23844) Great, and also a big thaks for providing the unit for the NXP LPC 1343, I just saw it materializing in svn ;-) Please contact me when you ulink2 kit has arrived... Michael Am 14.02.13 22:30, schrieb Justin Smyth: Thanks All , I'm happy to test the openocd modification to lazarus , I'm running both x64 Lazarus and x86 lazarus on my copy of win8 Pro x64 & a copy of both on a win7 x64 pc. i should have my ulink2 kit soon , ordered recently , so once i have it i would be able to help test the changes needed for lazarus for openocd . Kind Regards Justin -Original Message- From: Michael Ring Sent: Friday, February 15, 2013 6:15 AM To: lazarus@lists.lazarus.freepascal.org Subject: Re: [Lazarus] Lazarus and Arm Embedded.( see FPC Bug report 23844) Koenraad, I have played with the crosscompiler under linux and I (hopefully) found a hack to workarround your problem, please see me answer to your original mail from a few minutes ago in fpc-pascal. I am now compiling a small howto on how to build & use lazarus with openocd support, this could, once it is done perhaps be added to the (very instructive) wiki article on http://wiki.freepascal.org/TARGET_Embedded Michael Am 14.02.13 16:46, schrieb Koenraad Lelong: On 14-02-13 14:51, Michael Ring wrote: Hi Justin, as Michael already wrote we are currently integrating openocd into lazarus, the integration is already working but needs some testing. I would love to see that somebody else besides me gives the implementation a try. If Unlink2 is supported by openocd you should be fine, same is true if unlink2 brings it's own gdbserver. What OS are you working on, MacOS, Windows or linux? Michael Hi Micheal, I would like to test this. Could you give a link to the wiki-page ? P.S. can you make executables with your compiler ? How did you make your compiler ? I always get an error about not being able to link (see my post of jan 30, 18:26 in the fpc-pascal list). FWIW, I made a virtual machine : x386 with fpc 2.7.1, arm-none-eabi- toolchain, available on susestudio.com. Is there a way to make big files available, without being forced to have an account on the service (like dropbox or susestudio) ? Thanks, Koenraad Lelong. -- ___ 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 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 mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
Re: [Lazarus] Lazarus and Arm Embedded.( see FPC Bug report 23844)
Thanks All , I'm happy to test the openocd modification to lazarus , I'm running both x64 Lazarus and x86 lazarus on my copy of win8 Pro x64 & a copy of both on a win7 x64 pc. i should have my ulink2 kit soon , ordered recently , so once i have it i would be able to help test the changes needed for lazarus for openocd . Kind Regards Justin -Original Message- From: Michael Ring Sent: Friday, February 15, 2013 6:15 AM To: lazarus@lists.lazarus.freepascal.org Subject: Re: [Lazarus] Lazarus and Arm Embedded.( see FPC Bug report 23844) Koenraad, I have played with the crosscompiler under linux and I (hopefully) found a hack to workarround your problem, please see me answer to your original mail from a few minutes ago in fpc-pascal. I am now compiling a small howto on how to build & use lazarus with openocd support, this could, once it is done perhaps be added to the (very instructive) wiki article on http://wiki.freepascal.org/TARGET_Embedded Michael Am 14.02.13 16:46, schrieb Koenraad Lelong: On 14-02-13 14:51, Michael Ring wrote: Hi Justin, as Michael already wrote we are currently integrating openocd into lazarus, the integration is already working but needs some testing. I would love to see that somebody else besides me gives the implementation a try. If Unlink2 is supported by openocd you should be fine, same is true if unlink2 brings it's own gdbserver. What OS are you working on, MacOS, Windows or linux? Michael Hi Micheal, I would like to test this. Could you give a link to the wiki-page ? P.S. can you make executables with your compiler ? How did you make your compiler ? I always get an error about not being able to link (see my post of jan 30, 18:26 in the fpc-pascal list). FWIW, I made a virtual machine : x386 with fpc 2.7.1, arm-none-eabi- toolchain, available on susestudio.com. Is there a way to make big files available, without being forced to have an account on the service (like dropbox or susestudio) ? Thanks, Koenraad Lelong. -- ___ 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 mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
[Lazarus] Lazarus and Arm Embedded.( see FPC Bug report 23844)
I’ve been working on a patch for FPC to add support for the NXP LPC 1343 ( smaller cousin to the NXP LPC 1768 ) , i’ve successfully added in all the correct units , can get FPC to recompile with my changes but i am wondering how i would recompile lazarus so i could debug any application i create. ( ie write the smalll nongui app in lazarus , compile it , Update the board using flashmagic ( or the command prompt utility ) and debug via gdb using a UNLINK2 usb debugging kit. ).. Does Lazarus currently support this , i know i can write my own application save the file and compile using a command like this fpc -Parm -Tembedded -Wplpc1343 -Cparmv7m myprogram.pp Can we extend lazarus so we can create embedded arm applications ? ( if it allready does this i would love to know what type of project to select when selecting NEW.. & how to set the subarch setting for the ARM Family.)I only ask as i want to be able to write my own app in lazarus and debug it there too.. i am not sure how i would debug otherwiseKind RegardsJustin -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
[Lazarus] Fw: Mantis bugid 0015390 - showmodal closing when hide called.
- Original Message -
From: Justin Smyth
To: zel...@holobit.net
Sent: Wednesday, April 18, 2012 8:39 AM
Subject: Re: [Lazarus] Mantis bugid 0015390 - showmodal closing when hide
called.
You have it wrong.
as per other comments showmodal SHOULD NOT exit till the form is closed
an example of live code in one of my products
main form of my media player , it gets hidden to show a trayicon, when the user
clicks show it unhides , if i had to create the form again i would have to re
init all the components on the main form .. thats crazy. where as hide and show
just changes the visible component of the form. if you exit the showmodal it is
wrong .. only when the form is close should show modal finish.
do i make my point clear ? you are completely wrong assuming hiding the form
should close the form. you are breaking compabity with programs ported from
delphi. sorry if i seem rude but this has caused great issues in a product used
in the work place
please fix this or remove this peace of code.
Justin
- Original Message -
From: zeljko
To: Justin Smyth
Sent: Wednesday, April 18, 2012 12:29 AM
Subject: Re: [Lazarus] Mantis bugid 0015390 - showmodal closing when hide
called.
On Tuesday 17 of April 2012 16:01:30 Justin Smyth wrote:
> sample code uploaded to mantis.
>
> i'm not doing anything fancy
>
> The Main form has a button which creates a new form , does a show modal and
> free's it when its finished ( Closed ) i've put in a messagedlg to show
> when its been finished.
>
> the Second form on formactivate ( and tested in formshow) i turn on a timer
> and that time when the timer event is run it does
>
> timer1.enabled:=false;
> hide;
>
> soon as the hide happens is when the showmodal exits.
And your example shows same mistake.
1.you create modal form
2.called showmodal (inside show modal you called Hide; via timer) - of course
modal loop is finished when an modal form is hidden, and then your dialog is
shown, and after that you are freeing that form .. so what do you expect ?
Here is code which works 100% (frmShowModal is already created inside lpr -
so autocreated form, and no need to create another one).
Change code in ShowModalMain.pas of your example like this:
procedure TForm1.Button1Click(Sender: TObject);
begin
// frmShowModal := TfrmShowModal.Create(self);
frmShowModal.ShowModal;
Messagedlg('frmShowModal Exited',mtwarning,[mbok],0);
// frmShowModal.free;
end;
You should not Free modal form after showModal if you want it to be "live"
for hiding and showmodal or show again later.
When you call Hide; on modal form, it hides it self and modal loops
stops.When modal loop stops in such case your previously modal form is just
like any other hidden form.
zeljko
>
> Justin
> - Original Message -
> From: zeljko
> To: Justin Smyth
> Cc: lazarus@lists.lazarus.freepascal.org
> Sent: Tuesday, April 17, 2012 7:12 PM
> Subject: Re: [Lazarus] Mantis bugid 0015390 - showmodal closing when hide
> called.
>
> On Tuesday 17 of April 2012 11:05:08 Justin Smyth wrote:
> > Yeah i will bring post a example over the next few days
> >
> >
> >
> >
> >
> > what plat forms was it tested on ?
>
> I've tested qt, gtk2 (linux) , win32 and qt (windows) and qt under
> macosx.
>
>
>
>
> zeljko
>
> > - Original Message -
> >
> > From: zeljko
> >
> > To: lazarus@lists.lazarus.freepascal.org ; Justin Smyth
> >
> > Sent: Tuesday, April 17, 2012 4:27 AM
> >
> > Subject: Re: [Lazarus] Mantis bugid 0015390 - showmodal closing when
> > hide
> >
> > called.
> >
> > On Monday 16 of April 2012 16:28:09 Justin Smyth wrote:
> > > I've noted this but was fixed on the 21-2 this year but i've just
> > >
> > > upgraded
> > >
> > >
> > >
> > > Lazarus from 35368 to 36784 and have found this issue still exists.
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > > Basically i Create and ShowModal my applications main form , once it
> > >
> > > hits
> > >
> > >
> > >
> > > formshow it starts a thread to monitor another application and once a
> > >
> > >
> > >
> > > trig
Re: [Lazarus] Mantis bugid 0015390 - showmodal closing when hide called.
Yeah i will bring post a example over the next few days what plat forms was it tested on ? - Original Message - From: zeljko To: lazarus@lists.lazarus.freepascal.org ; Justin Smyth Sent: Tuesday, April 17, 2012 4:27 AM Subject: Re: [Lazarus] Mantis bugid 0015390 - showmodal closing when hide called. On Monday 16 of April 2012 16:28:09 Justin Smyth wrote: > I've noted this but was fixed on the 21-2 this year but i've just upgraded > Lazarus from 35368 to 36784 and have found this issue still exists. > > > Basically i Create and ShowModal my applications main form , once it hits > formshow it starts a thread to monitor another application and once a > trigger condition is met this form is hidden ( to prevent the user from > entering data until other applications have finished there data look up) > and i show the form again once its been populated with new data . but with > the hide the showmodal exits ( which i dont want to happen, the form hasnt > closed it just hidden while i wait for some data to come back from another > application). > > I almost think a variable of IsHidden might be needed so that block of code > assoated with bugid 15390 doesnt get called ( or the break in that section > doesnt get called). > > I can provide code if needed , i'd have to bring it home from work but > thats ok ( From Telstra) Thanks. You must provide example. It works for me, also example which is added by Stephano today is wrong. zeljko -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
[Lazarus] Mantis bugid 0015390 - showmodal closing when hide called.
I've noted this but was fixed on the 21-2 this year but i've just upgraded Lazarus from 35368 to 36784 and have found this issue still exists. Basically i Create and ShowModal my applications main form , once it hits formshow it starts a thread to monitor another application and once a trigger condition is met this form is hidden ( to prevent the user from entering data until other applications have finished there data look up) and i show the form again once its been populated with new data . but with the hide the showmodal exits ( which i dont want to happen, the form hasnt closed it just hidden while i wait for some data to come back from another application). I almost think a variable of IsHidden might be needed so that block of code assoated with bugid 15390 doesnt get called ( or the break in that section doesnt get called). I can provide code if needed , i'd have to bring it home from work but thats ok ( From Telstra) Thanks. Justin-- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
Re: [Lazarus] Release schedule and policy
sent from my Telstra NEXTG handset -Original Message- From: Graeme Geldenhuys Sent: Monday, 25 October 2010 9:08 PM To: Lazarus mailing list Subject: Re: [Lazarus] Release schedule and policy Op 2010-10-25 11:37, Michael Van Canneyt het geskryf: > > I just said 'it takes a lot of work', and you respond by making it > even more work ? :-) Again, the person applying the patch simply need to do just that. Glance over the patch to spot if the author of the patch was relatively sane, apply the patch, run the test suite. If fine, commit. The 'commiter' doesn't write the test cases, that's the job of the 'patch author'. The patch author is the one doing most of the leg work: making sure he/she has a test case to prove the patch, make sure it can be applied without conflicts etc. > To me, these statements sound contradictory, since LCL is a GUI framework ? Not at all. Many of the LCL behaviour can indeed be tested for. Order of firing events, making sure events actual do fire, the various UTF8 and file wrapper functions etc, etc. There is even a Delphi + DUnit project on SourceForge which is dedicated to testing of GUI applications (events firing, tab order, button order etc.) Regards, [The entire original message is not included] -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
Re: [Lazarus] Release schedule and policy
sent from my Telstra NEXTG handset -Original Message- From: Vincent Snijders Sent: Monday, 25 October 2010 8:29 PM To: Lazarus mailing list Subject: Re: [Lazarus] Release schedule and policy 2010/10/25 Florian Klaempfl : > Am 25.10.2010 11:10, schrieb Alexander Klenin: >> On Mon, Oct 25, 2010 at 19:52, Marco van de Voort wrote: >>> What I haven't seen: >>> - the problem >> >> Lazarus project is unable to do releases in a timely manner. >> >>> - the solution >> >> Make a releases time-based, as suggested at the start of the thread. > > I guess you prepared also a list of people who volounteer to do the > boring job of release building? I volunteer for actual building. Vincent -- ___ 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] TListView compatibility Delphi <=> Lazarus?
sent from my Telstra NEXTG handset -Original Message- From: Vincent Snijders Sent: Tuesday, 12 October 2010 4:56 PM To: bo.bergl...@gmail.com; Lazarus mailing list Subject: Re: [Lazarus] TListView compatibility Delphi <=> Lazarus? 2010/10/12 Bo Berglund : > I also noted via Google that there was some discussion on > implementation incompleteness of TListView back in Jan 2008, so surely > this should have been fixed by now? Not surely, some feature request, even if reported in the bug tracker, remain open for years, until somebody provides a patch. So a mere discussion in Jan 2008, not even two years ago and only 10 months before the release you are using, is surely no reason why it should have been fixed by now. Vincent -- ___ 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] Build scripts for Freepascal and Lazarus compilation from source
sent from my Telstra NEXTG handset -Original Message- From: Juha Manninen (gmail) Sent: Tuesday, 5 October 2010 8:02 AM To: Lazarus mailing list Subject: Re: [Lazarus] Build scripts for Freepascal and Lazarus compilation from source On Monday 04 October 2010 15:26:47 Marcos Douglas wrote: > You talk about installer to FPC and Lazarus from SVN? > The installer to Windows works very well (but I do not use it)... > > Or you talk about the "universal installer" multiplataform? But it > will use the sources from SVN? It would be a multiplatform universal installer, yes. FPC can't be installed only from source, there must be the initial binary version installed first. After that both FPC and Lazarus could be installed from source. The windows installation package works well but only for the released version which is soon a year old. I different release policy in the future would improve that situation of course. Juha -- ___ 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] SendMessage / PostMessage Verses Using NamedPipes with MessageMode.
Guys now that under win32 the issues with SendMessage & PostMessage have been fixed under win64 i have a question to ask I have an application that i will need to send messages with payloads between the application and other applications ( some Located on the same pc and the other being located on another pc on the network ). I was tinkering with the idea to use a named pipe to send data between my application and the remote end ( sometimes on the local pc , sometimes on another pc ) and also to send information between my application and a deskband object dll ( toolbar application thats run from a explorer thread that hosts things like the start button ). Basically i would be sending a message between my application and another instance of my application ( could be local or remote ) to tell the Application to do something like stop , shutdown or process a new file ( and that filename would be part of the message - hence maybe with a namedpipe i might end up with different message sizes ) Would this be an issue on a namedpipe ? ie when in messagemode can one send different size messages into the pipe ? or would this not work ? i only am considering this since if i dont use a named pipe i would need to write the code twice and have one set to use the sendmessage/postmessage for a local connection and another section of code to get to a remote pc ( using tcpip ). I've allready code some code that uses a namedpipe working to comunicate between the application and another instance on the same pc but havent got around to doing so for the something like a deskband object yet. Any ideas welcome , as i am just asking to clarify which would be the better one to use. Delphian -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
Re: [Lazarus] Anyone done any work with SMS (text messaging)?
Can we get a snapshot built with mantis bug 16361 & 16321 fixed ? - both are RTL bugs on x64 16321 fixes sendmessage with payload between applications on x64( it fails under x64) 16361 fixes process32Next & process32First which fail under x64. Cheers Justin Smyth -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
[Lazarus] RTL Bug - TCopyDataStruct - needs TCopyDataStruct64 to be added.
Marco Can you please take a look at mantis bug id 16321 We need this addessed ASAP its breaking SendMessage under x64. Summary when CopyDataStruct is used on win64 with sendmessage/postmessage the dest wont get the messages. if we provide CopyDataStruct64 like this - CopyDataStruct64 = record dwData : ULONG_PTR; cbData : DWORD; lpData : PVOID; end; then this showstopper will be fixed. Kind Regards Justin Smyth -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
Re: [Lazarus] SendMessage Fix.
SendMessage on win64 bug is caused by TCopyDataStruct struct being wrong, i've just proven it with the help of dmitry boyarintsev - changing the first part of the data structure to a PtrUInt and it works. it was a dword. for me i just use my own stuct but i suggest we get a TCopyDataStruct64 added in. this would solve the issue. - Original Message - From: "John vd Waeter" To: "Lazarus mailing list" Sent: Friday, April 23, 2010 7:58 PM Subject: Re: [Lazarus] SendMessage Bug Work Around. AFAIK: In Windows PostMessage puts a message in the queue and returns immediately. SendMessage puts the message in the queue and returns with a result after the message has been handled. But I might be wrong... John Michael Schnell wrote: I now found that SendMessage provides a Result, while PostMessage only returns a success flag. So they are less similar than I thought (and the Windows API definition is still more cryptic :( ) -Michael -- ___ 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] SendMessage Bug Work Around.
I've attached my pipe i use
on the server i do
fPipeCreated:=false;
try
fMplayerPipe := TPipeServer.CreatePipeServer('','MPLAYER64',true);
except
on E: Exception do
begin
ShowMessage(E.Message);
end;
else
begin
fMplayerPipe.Destroy;
Result := false;
exit;
end;
end;
fMplayerPipe.PipeMesgage:=fEventHandle;
fEventHandle is where my pipe does sendmessage to .
on the client side
MplayerClientPipe:=TPipeClient.Create('','MPLAYER64');
MplayerClientPipe.SendString();
MplayerClientPipe.free;
the pipe itself converts the data you send in to a message using sendmessage
- Original Message -
From: "Wildfire"
To: "Lazarus mailing list"
Sent: Thursday, April 22, 2010 11:22 PM
Subject: Re: [Lazarus] SendMessage Bug Work Around.
- Original Message -
From: "Justin Smyth"
To: "Lazarus mailing list"
Sent: Thursday, April 22, 2010 1:43 PM
Subject: [Lazarus] SendMessage Bug Work Around.
if any one is interest in the code for this issue feel free to ask , i''m
happy to share it.
Hi Justin,
I'd certainly be interested in a small example (just getting back to
pascal after a long time and any source examples are appreciated).
Perhaps you can attach it to the list? Failing that a private email would
be welcome.
--
Paddy
--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
mplayerpipe.pas
Description: Binary data
--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
[Lazarus] SendMessage Bug Work Around.
I dont know if many of you guys who use win32 are aware of a bug / limitation of sendmessage in windows , when you are trying to send a message to another application , when the message gets there both lparam and wparam are invalid ( or pointing to rubish ) ( i also got the same issue on SimpleIPC on win32 to the same result when you try to send data with the message - as it uses sendmessage to do the low level work - i think !! ) with in the same application it seems to work , but when you use more than one application together or one application sending a message to a prev instance of the application ( ie you run it for the second time , the second copy is sending a message to the first copy ). the best work around i've found is to use a NamedPipe which i know is win32 only ( not sure about other os's ) , i basically created a "ServerPipe" and a "ClientPipe" and use this pipe to send info from the second application back to my main application to get around the sendmessage issue. I know alot of you guys are not using win32 but other variants of linux but for the people who are using win32 this maybe of interest if you have got issues with SendMessage on win32. My Os is Win7 RTM on one pc and Win7 Retail on the other - both ultimate 64 bit. & i am using pritty much the lastest SVN i also suspect this method may help anyone using a DLL who needs to pass objects back and forth ( i think havent tested but i think it should be feasable.. ) if any one is interest in the code for this issue feel free to ask , i''m happy to share it. A big thanks to Paul Ishenin , for all your help , your hardwork has help me in getting the last bit of my application over from delphi 2010 to Lazarus x64. Cheers Justin Smyth AKA Delphian -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
[Lazarus] Win32 CreateParented issue
I've been playing with CreateParented and i have come across some issues where i am getting a A/V I have got 2 forms , the first form has a panel on it and a button on it and the second form has just a button with close event attached to it. The First for does this behind the button Form2 := TForm2.CreateParented(Panel1.Handle); Form2.Show; SendMessage(Form2.Handle, WM_NCACTIVATE, Ord(True), 0); soon as i call the createParented it falls over . the form lfm object Form2: TForm2 Left = 420 Height = 240 Top = 214 Width = 320 BorderIcons = [] BorderStyle = bsNone Caption = 'Form2' ClientHeight = 240 ClientWidth = 320 LCLVersion = '0.9.29' object Button1: TButton Left = 120 Height = 25 Top = 104 Width = 75 Caption = 'Button1' OnClick = Button1Click TabOrder = 0 end end Anyone reproduce this or have i done something wrong Justin Smyth-- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
Re: [Lazarus] Lazarus FPC 2.5.1
Flávio I'll continue to look & search , i've been successfull in rebuilding the FPC ( we i assume so , the source file in the source directory of the FPC has been changed and i can see that the new fpc.exe has been build so one would assume that part is done ) Its on a windows box i'm doing this not Linux ( theres no linux counterpart for ipersist as this is microsoft com object for windows). I'm only asking on this thread since i'm sure the update for executable for fpc is ok ( i move it into my lazarus fpc directory where it exists - only the executable ) Its the rebuilding of using make for lazarus i'm not sure about , i'm following some directions i've been given but lazarus acts like the change in the RTL hasnt been done. Maybe i'm doing something wrong , in getting the updated fpc ? thats why i am asking ... Delphian - Original Message - From: "Flávio Etrusco" To: "Justin Smyth" ; "Lazarus mailing list" Sent: Friday, April 09, 2010 8:42 PM Subject: Re: [Lazarus] Lazarus FPC 2.5.1 This has been asked (and answered) on the list a few times. If you're using Linux I have a sample script ;) Otherwise, you may look at the FPC build FAQ (manual?) or google for the previous messages. Also, you may have better luck asking in the FPC-devel list about the GetClassID bug. Best regards, Flávio On Fri, Apr 9, 2010 at 6:33 AM, Justin Smyth wrote: Guys I need to make a few small changes to the RTL in FPC 2.5.1 and recompile lazarus with these updates , i've been able to re complile FPC 2.5.1 ok but lazarus acts like it doesnt know about the changes. the unit i am changing is activex.pp - i've found a bug and its a show stopper for one of my apps.( the bug is GetClassID in Ipersist , it should be defined with out in the param list ) Delphian - Original Message - From: "Kjow" To: "Lazarus mailing list" Sent: Friday, April 09, 2010 7:14 PM Subject: Re: [Lazarus] FPC 2.4.0 vs 2.5.1 2010/4/9 Michael Van Canneyt : There are too many to say. 2.5.1 is a development version, and can in theory be very unstable. Umm.. what I mean is that FPC 2.5.1 has only more functions or if it generates code more speeder, etc... so something in general :) I would recommend 2.4.0 If you want to develop for arm, maybe you can request merging of some arm-related fixes from 2.5.1 to 2.4.0. Ok, at moment I'm using 2.5.1 only, so I can make two different config: a general purpose with 2.4.0 (major project/pc) and an arm specific platform with 2.5.1 (arm device only). Thank you very much, Michael! Best Regards, Kjow -- ___ 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 mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
[Lazarus] Lazarus FPC 2.5.1
Guys I need to make a few small changes to the RTL in FPC 2.5.1 and recompile lazarus with these updates , i've been able to re complile FPC 2.5.1 ok but lazarus acts like it doesnt know about the changes. the unit i am changing is activex.pp - i've found a bug and its a show stopper for one of my apps.( the bug is GetClassID in Ipersist , it should be defined with out in the param list ) Delphian - Original Message - From: "Kjow" To: "Lazarus mailing list" Sent: Friday, April 09, 2010 7:14 PM Subject: Re: [Lazarus] FPC 2.4.0 vs 2.5.1 2010/4/9 Michael Van Canneyt : There are too many to say. 2.5.1 is a development version, and can in theory be very unstable. Umm.. what I mean is that FPC 2.5.1 has only more functions or if it generates code more speeder, etc... so something in general :) I would recommend 2.4.0 If you want to develop for arm, maybe you can request merging of some arm-related fixes from 2.5.1 to 2.4.0. Ok, at moment I'm using 2.5.1 only, so I can make two different config: a general purpose with 2.4.0 (major project/pc) and an arm specific platform with 2.5.1 (arm device only). Thank you very much, Michael! Best Regards, Kjow -- ___ 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] Lazarus and windows messages - how to hook into them ?
for all those who didnt reply i found the simple answer was to do this put the following in front of my calls to AllocateHWND and DeAllocateHWND TWin32WidgetSet(WidgetSet). Now it works !!! - Original Message - From: Justin Smyth To: Lazarus mailing list Sent: Sunday, March 21, 2010 1:12 PM Subject: [Lazarus] Lazarus and windows messages - how to hook into them ? Hi guys got a issue where i need to be able to hook into the windows message que so i can trap messages like WM_GRAPHCHANGED etc as i have ported a media player writen around directshow in delphi over to lazarus 64 bit , i would normally use something like Allocatehwnd(procname) to do this bit i can see that for AllocateHWND & DeallocHWND have stubs and are not supported. I have tried the CreateWindowEX and it doesnt work i get an exception when i try to use it ( this has a callback function to pass messages to your procedure...) any one got a simple idea how to get this working I have noticed that on interfaces for win32 the widget seems to have it there but i cant call it from my unit. Justin Smyth -- -- ___ 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] Lazarus and windows messages - how to hook into them ?
Hi guys got a issue where i need to be able to hook into the windows message que so i can trap messages like WM_GRAPHCHANGED etc as i have ported a media player writen around directshow in delphi over to lazarus 64 bit , i would normally use something like Allocatehwnd(procname) to do this bit i can see that for AllocateHWND & DeallocHWND have stubs and are not supported. I have tried the CreateWindowEX and it doesnt work i get an exception when i try to use it ( this has a callback function to pass messages to your procedure...) any one got a simple idea how to get this working I have noticed that on interfaces for win32 the widget seems to have it there but i cant call it from my unit. Justin Smyth-- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
[Lazarus] Lazarus and DirectShow Not Working Properly...
Ok guys i have a really hairy one for you , i'm working on directshow player
that i'm porting from Delphi to Lazarus x64 , in Lazarus in DirectShow when
i call the RenderFile Function out of DirectShow it gives me a nasty
exception error - Run Error 58632 ( is this a stub to say not supported yet
? )
Yet if i manually create the direct show filter and add them to the filter
graph and conect them together the graph works
The RenderFile Function in DirectShow is defined as
RenderFile(lpcwstrFile, lpcwstrPlayList: pWideChar): HResult; stdcall;
I'm using this function to change my ansistring into a pWideChar -
MultiByteToWideChar(CP_ACP, 0, PChar(FileName), -1, wstrFileName, MAX_PATH);
and i use RenderFile like this -> fGraphBuilder.RenderFile(wstrFileName,nil)
And the Interface for IGraphBuilder from MS is
IGraphBuilder = interface(IFilterGraph)
['{56A868A9-0AD4-11CE-B03A-0020AF0BA770}']
(*** IGraphBuilder methods ***)
function Connect(ppinOut, ppinIn: IPin): HResult; stdcall;
function Render(ppinOut: IPin): HResult; stdcall;
function RenderFile(lpcwstrFile, lpcwstrPlayList: pWideChar): HResult;
stdcall;
function AddSourceFilter(lpcwstrFileName, lpcwstrFilterName: LPCWSTR;
out ppFilter: IBaseFilter): HResult; stdcall;
function SetLogFile(hFile: THandle): HResult; stdcall;
function Abort: HResult; stdcall;
function ShouldOperationContinue: HResult; stdcall;
end;
and i filtergraph is
IFilterGraph = interface(IUnknown)
['{56A8689F-0AD4-11CE-B03A-0020AF0BA770}']
(*** IFilterGraph methods ***)
function AddFilter(pFilter: IBaseFilter; pName: PWideChar): HResult;
stdcall;
function RemoveFilter(pFilter: IBaseFilter): HResult; stdcall;
function EnumFilters(out ppEnum: IEnumFilters): HResult; stdcall;
function FindFilterByName(pName: PWideChar; out ppFilter: IBaseFilter):
HResult; stdcall;
function ConnectDirect(ppinOut, ppinIn: IPin; pmt: PAMMediaType):
HResult; stdcall;
function Reconnect(ppin: IPin): HResult; stdcall;
function Disconnect(ppin: IPin): HResult; stdcall;
function SetDefaultSyncSource: HResult; stdcall;
end;
Any help would be great , otherwise i'll have to do some messy hacking to
get this working
--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
Re: [Lazarus] Windows message WM_NCHitTest not working...
Thanks Guys i have found a way around this in my form i get it to call the windows message itself when it detects Mouse Down & MouseMove ( on mousedown set a variable to say move = true and in mousemove send off a windows message something like this SendMessage (Handle, WM_NCHITTEST, 2, 0); ) Seems to work compaired it to the code i used in D12 , same effect ... Justin Smyth - Original Message - From: "Luca Olivetti" To: "Lazarus mailing list" Sent: Friday, March 12, 2010 7:26 PM Subject: Re: [Lazarus] Windows message WM_NCHitTest not working... En/na Paul Ishenin ha escrit: 12.03.2010 11:11, Justin Smyth wrote: When i create forms that dont have the title bar i typically use the windows message WM_NCHITTEST to capture the mouse movements but i cant get it to work anyone got any ideas - my form has no titlebar and all i want to do is be able to click on it and move it. WM_NCHITTEST is not possible to implement cross-platform. Better if you will think about another solution than try to reuse a windows only feature in LCL application. Under linux there's no need to do anything: just alt+drag anywhere on the window and it will move. Under window there's a recipe on how to hook messages in the wiki, but I cannot access the wiki right now so I cannot give a link. Bye -- Luca Olivetti Wetron Automatización S.A. http://www.wetron.es/ Tel. +34 93 5883004 (Ext.133) Fax +34 93 5883007 -- ___ 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] Windows message WM_NCHitTest not working...
When i create forms that dont have the title bar i typically use the windows message WM_NCHITTEST to capture the mouse movements but i cant get it to work anyone got any ideas - my form has no titlebar and all i want to do is be able to click on it and move it. Justin Smyth -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
Re: [Lazarus] Lazarus Debugging under Win64...
I checked the debug output notice where it was saving it to noticed it was saving the project in my docs directory and i'm on Win7 .. thats the prob,i've solved it by saving it to a fresh directory in c:\apps\build ( my test dir) Justin Smyth -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
[Lazarus] Lazarus Debugging under Win64...
If someone could help me here it would be really usefull., Currently i have problems that i cant run debug any applications in Lazarus using Lazarus 0.9.29-23934-fpc-2.5.1 I am aware that for X64 i need to replace gdb.exe with v7 or higher and to add this option to the compliler options -WB0040 ( which i have used before and it worked ) i am stuffed as to why i cant get it to work , i have tried to install on a different pc which hasnt been used for lazarus before and did the same replace gdb.exe and add the complier option . to no avai. can someone please help , am i missing something here , is there some debug switches that need to be turned on that arent the default ones ? ) Justin Smyth -- ___ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
