Re: [lazarus] Lazarus programs with multiple languages?

2006-06-23 Thread dhkblaszyk
Adilson,

ResourceStrings are exactly meant for that purpose. Read more on them in
the FPC documentation. If you want a working example check the
idetranslations.pas file in lazarus/ide.
The nice thing is that lazarus reads it's translations directly from .PO,
so you don't need to compile to .MO.
In the lazarus directory there's a localize.bat file that converts the
.rst files (generated by the compiler) to .PO files.

Darius


 -BEGIN PGP SIGNED MESSAGE-
 Hash: SHA1

 Hi guys.

 I've been away from Lazarus and Pascal for a very long time and I want
 to return to my favorite language, even if just for fun :)
 I'm thinking about create a test application and I was wondering if
 there is internal support to have texts in multiple languages. For
 instance, can resource strings be used for that?

 []s

 Adilson.
 -BEGIN PGP SIGNATURE-
 Version: GnuPG v1.4.2.2 (GNU/Linux)
 Comment: Using GnuPG with Mozilla - http://enigmail.mozdev.org

 iD8DBQFEm3ir2cB5Bt7H7YARAvGIAJ4m0nFMcinZWOzlT1zQ0p4C63JfXwCguhyk
 QJTE8YLJh/rdpXFVm6ycXD0=
 =b237
 -END PGP SIGNATURE-

 _
  To unsubscribe: mail [EMAIL PROTECTED] with
 unsubscribe as the Subject
archives at http://www.lazarus.freepascal.org/mailarchives



_
 To unsubscribe: mail [EMAIL PROTECTED] with
unsubscribe as the Subject
   archives at http://www.lazarus.freepascal.org/mailarchives


[lazarus] lazarus licensing

2006-06-23 Thread dhkblaszyk
Hi,

I'm having some questions about the licensing of Lazarus. According to the
docs supplied lazarus sourcecode is GPLed. Does this mean that the IDE
binary is too? Is this automatically the case always?
In my company I got the question to provide a proof that Lazarus is
freeware. I cannot find it on the website. The only remark I found in the
about section is that you can create commercial apps with the ide.

I'm shure that other have similar issues, therefore I would like a  legal
issues section to be placed on the main site page?

The attachment represents possible contents.

What do you think?

Darius


This page answers most of the common queries relating to the Lazarus GPL 
license.

Q1. What does the GPL mean and where can I find it? 
Q2. What does the Lazarus GPL license mean? 
Q3. What are the requirements to use Lazarus for internal use? 
Q4. Does the Lazarus GPL license prohibit commercial use? 
Q5. Is it possible to include the Lazarus software in CD's accompanying books? 


Q1. What does the GPL mean and where can I find it?
GPL means General Public License and you can find it here:

Q2. What does the Lazarus GPL license mean?
Note: this answer gives you a short general explanation in common language of 
the meaning of Lazarus GPL license but keep in mind that only the license is 
legal.


Lazarus GPL license allows you to: 
use freely Lazarus for non commercial use 
use freely Lazarus for commercial use if you do not use it as a derived 
software (ie a modified Lazarus) or a composite software (ie Lazarus included 
in another software). 



Lazarus GPL license forbids you to:
use a composite or derived version of Lazarus for commercial uses without 
acknowledging Lazarus. 



Q3. What are the requirements to use Lazarus for internal use?
There is no requirements for the use of Lazarus for internal use and Lazarus 
GPL license makes no distinction between public scientific and research area 
and industrial environment.




Q4. Does the Lazarus GPL license prohibit commercial use?
No, the Lazarus GPL license does not prohibit commercial use as long as you do 
not modify Lazarus software or include it in another software.



Q5. Is it possible to include the Lazarus software in CD's accompanying books?  
  
Yes, it is. You can reproduce and distribute Lazarus software on any support as 
long as you do acknowledge the original Lazarus software.


Re: [lazarus] lazarus licensing

2006-06-23 Thread Michael Van Canneyt



On Fri, 23 Jun 2006, [EMAIL PROTECTED] wrote:


Hi,

I'm having some questions about the licensing of Lazarus. According to the
docs supplied lazarus sourcecode is GPLed. Does this mean that the IDE
binary is too? Is this automatically the case always?


Yes.


In my company I got the question to provide a proof that Lazarus is
freeware. I cannot find it on the website. The only remark I found in the
about section is that you can create commercial apps with the ide.


All source files refer to the COPYING file. No other proof is needed ?



I'm shure that other have similar issues, therefore I would like a  legal
issues section to be placed on the main site page?


I think it can be useful, but nor prioritary...

Maybe it exists in the wiki ?

Michael.

_
To unsubscribe: mail [EMAIL PROTECTED] with
   unsubscribe as the Subject
  archives at http://www.lazarus.freepascal.org/mailarchives


[lazarus] TStringGrid Question

2006-06-23 Thread Matt Henley
I am using a TStringGrid in a project that I am working on. I have a few questions about the use of this and all my delphi books seem to delve into DBGrids but not string grids. Here are my questions:1. My grid would allow the user to enter data in the first column while the other columns show result based on the data just entered. How do I selectively restrict data entry to a column/row/cell?
2. If the user presses enter while in a cell, the cell to the right of the previous one is selected. How do I change this so that the one below is active?3. What is the best event to use for updating a running total as the user enters data? In other words, the user has entered a number and gone to the next cell, I want to do a summation and present the new total.
Thanks!Matt Henley


Re: [lazarus] lazarus licensing

2006-06-23 Thread dhkblaszyk
 On Fri, 23 Jun 2006, [EMAIL PROTECTED] wrote:

 Hi,

 I'm having some questions about the licensing of Lazarus. According to
 the
 docs supplied lazarus sourcecode is GPLed. Does this mean that the IDE
 binary is too? Is this automatically the case always?

 Yes.

 In my company I got the question to provide a proof that Lazarus is
 freeware. I cannot find it on the website. The only remark I found in
 the
 about section is that you can create commercial apps with the ide.

 All source files refer to the COPYING file. No other proof is needed ?

When we speak of free software, we are referring to freedom, not
price. is mentioned in the GPL. This does not answer my question how to
prove that I didn't need to pay for lazarus.

 I'm shure that other have similar issues, therefore I would like a
 legal
 issues section to be placed on the main site page?

 I think it can be useful, but nor prioritary...

For me it is, if I cannot sort it out with my company I will need to
remove Lazarus from my PC.


 Maybe it exists in the wiki ?

Is that a legally sound place to put it in ;)

Darius


 Michael.

 _
  To unsubscribe: mail [EMAIL PROTECTED] with
 unsubscribe as the Subject
archives at http://www.lazarus.freepascal.org/mailarchives



_
 To unsubscribe: mail [EMAIL PROTECTED] with
unsubscribe as the Subject
   archives at http://www.lazarus.freepascal.org/mailarchives


Re: [lazarus] lazarus licensing

2006-06-23 Thread Matt Henley
If you are looking for a legally sound place to find it.. from inside Lazarus click on the Help and then About. It states clearly (inside the IDE) that the program is licensed under GPL/LGPL. Then refer them to the website for the GPL ( 
http://www.gnu.org ), specifically http://www.gnu.org/licenses/gpl-faq.html#DoesTheGPLAllowRequireFee
and http://www.gnu.org/licenses/gpl-faq.html#DoesTheGPLRequireAvailabilityToPublicI don't really know what more *proof* they could want. I guess you could also download teh source code and show them that each file references the GPL.
Matt HenleyOn 6/23/06, [EMAIL PROTECTED] [EMAIL PROTECTED]
 wrote: On Fri, 23 Jun 2006, [EMAIL PROTECTED]
 wrote: Hi, I'm having some questions about the licensing of Lazarus. According to the docs supplied lazarus sourcecode is GPLed. Does this mean that the IDE
 binary is too? Is this automatically the case always? Yes. In my company I got the question to provide a proof that Lazarus is freeware. I cannot find it on the website. The only remark I found in
 the about section is that you can create commercial apps with the ide. All source files refer to the COPYING file. No other proof is needed ?When we speak of free software, we are referring to freedom, not
price. is mentioned in the GPL. This does not answer my question how toprove that I didn't need to pay for lazarus. I'm shure that other have similar issues, therefore I would like a legal
 issues section to be placed on the main site page? I think it can be useful, but nor prioritary...For me it is, if I cannot sort it out with my company I will need toremove Lazarus from my PC.
 Maybe it exists in the wiki ?Is that a legally sound place to put it in ;)Darius Michael. _
To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subjectarchives at 
http://www.lazarus.freepascal.org/mailarchives_ To unsubscribe: mail [EMAIL PROTECTED]
 withunsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives


Re: [lazarus] lazarus licensing

2006-06-23 Thread Carlo Kok
Michael Van Canneyt wrote:
 
 
 On Fri, 23 Jun 2006, [EMAIL PROTECTED] wrote:
 
 Hi,

 I'm having some questions about the licensing of Lazarus. According to
 the
 docs supplied lazarus sourcecode is GPLed. Does this mean that the IDE
 binary is too? Is this automatically the case always?
 
 Yes.
 

So that means that no commercial packages can be installed in the ide?

--
Carlo Kok

_
 To unsubscribe: mail [EMAIL PROTECTED] with
unsubscribe as the Subject
   archives at http://www.lazarus.freepascal.org/mailarchives


Re: [lazarus] lazarus licensing

2006-06-23 Thread Michael Van Canneyt


On Fri, 23 Jun 2006, Carlo Kok wrote:

 Michael Van Canneyt wrote:
 
 
  On Fri, 23 Jun 2006, [EMAIL PROTECTED] wrote:
 
  Hi,
 
  I'm having some questions about the licensing of Lazarus. According to
  the
  docs supplied lazarus sourcecode is GPLed. Does this mean that the IDE
  binary is too? Is this automatically the case always?
 
  Yes.
 

 So that means that no commercial packages can be installed in the ide?

They can be, why not ? Nothing is said about this...

Michael.

_
 To unsubscribe: mail [EMAIL PROTECTED] with
unsubscribe as the Subject
   archives at http://www.lazarus.freepascal.org/mailarchives


[lazarus] Lazarus on x86_64

2006-06-23 Thread Mattias Gaertner

Good news: Lazarus runs on x86_64 as 64bit native executable pretty well.

I added a workaround for the arithmetic exception bug. It seems to be a fpc
bug. I already reported it.


Mattias

_
 To unsubscribe: mail [EMAIL PROTECTED] with
unsubscribe as the Subject
   archives at http://www.lazarus.freepascal.org/mailarchives


Re: [lazarus] Lazarus on x86_64

2006-06-23 Thread Martin Waldenburg

Mattias Gaertner wrote:

Good news: Lazarus runs on x86_64 as 64bit native executable pretty well.


I've running a snapshot at SuSe 10.1 64bit and it compiled itself
without problems after I've included -Fl/opt/gnome/lib64 in the fpc.cfg


Martin

_
To unsubscribe: mail [EMAIL PROTECTED] with
   unsubscribe as the Subject
  archives at http://www.lazarus.freepascal.org/mailarchives


Re: [lazarus] Patch for fpcunit

2006-06-23 Thread Darius Blaszijk
- Original Message - 
From: Graeme Geldenhuys [EMAIL PROTECTED]

From my side, I use fpcUnit extensively and built a DUnit compatible
interface for our projects that use DUnit and fpcUnit.


Graeme,

I'm very interested in the interface. Could that be something included with 
FPCUnit?


Darius 


_
To unsubscribe: mail [EMAIL PROTECTED] with
   unsubscribe as the Subject
  archives at http://www.lazarus.freepascal.org/mailarchives


Re: [lazarus] Lazarus on x86_64

2006-06-23 Thread Vincent Snijders

2006/6/23, Mattias Gaertner [EMAIL PROTECTED]:


Good news: Lazarus runs on x86_64 as 64bit native executable pretty well.

I added a workaround for the arithmetic exception bug. It seems to be a fpc
bug. I already reported it.


In what fpc version? Florian reported that he fixed such a bug in fpc
2.0.3 last weekend, but I have not asked anyone to confirm it is fixed
indeed.

Vincent

_
To unsubscribe: mail [EMAIL PROTECTED] with
   unsubscribe as the Subject
  archives at http://www.lazarus.freepascal.org/mailarchives


Re: [lazarus] lazarus licensing

2006-06-23 Thread Felipe Monteiro de Carvalho

On 6/23/06, [EMAIL PROTECTED] [EMAIL PROTECTED] wrote:

When we speak of free software, we are referring to freedom, not
price. is mentioned in the GPL. This does not answer my question how to
prove that I didn't need to pay for lazarus.


You can prove that by going to the link where you can download Lazarus for free.

You can also sell Lazarus if you want to. Can you explain better why
do you want / need to prove with that?

--
Felipe Monteiro de Carvalho

_
To unsubscribe: mail [EMAIL PROTECTED] with
   unsubscribe as the Subject
  archives at http://www.lazarus.freepascal.org/mailarchives


Re: [lazarus] lazarus licensing

2006-06-23 Thread Darius Blaszijk


- Original Message - 
From: Felipe Monteiro de Carvalho [EMAIL PROTECTED]

To: lazarus@miraclec.com
Sent: Friday, June 23, 2006 7:34 PM
Subject: Re: [lazarus] lazarus licensing



On 6/23/06, [EMAIL PROTECTED] [EMAIL PROTECTED] wrote:

When we speak of free software, we are referring to freedom, not
price. is mentioned in the GPL. This does not answer my question how to
prove that I didn't need to pay for lazarus.


You can prove that by going to the link where you can download Lazarus for 
free.
Sorry but that is no proof in itself. Lots of non-free software is 
downloadable too.



You can also sell Lazarus if you want to. Can you explain better why
do you want / need to prove with that?
Well, in my company currently there is a huge effort being done to make an 
inventory of all software and licenses. They need to know of each and every 
byte wether or not it's legal to have a copy. You can imagine that there is 
no proper time to extensivley investigate each software and therefore it 
needs to be clear from the website for instance the software is free.


Darius



--
Felipe Monteiro de Carvalho

_
To unsubscribe: mail [EMAIL PROTECTED] with
   unsubscribe as the Subject
  archives at http://www.lazarus.freepascal.org/mailarchives 


_
To unsubscribe: mail [EMAIL PROTECTED] with
   unsubscribe as the Subject
  archives at http://www.lazarus.freepascal.org/mailarchives


Re: [lazarus] lazarus licensing

2006-06-23 Thread Darius Blaszijk



So what you mean that implicitly the GPL is a 
statement that the software is free. Thanks that should convince some I think 
...

  - Original Message - 
  From: 
  Matt Henley 

  To: lazarus@miraclec.com 
  Sent: Friday, June 23, 2006 5:10 PM
  Subject: Re: [lazarus] lazarus 
  licensing
  If you are looking for a legally sound place to find it.. from 
  inside Lazarus click on the Help and then About. It states clearly 
  (inside the IDE) that the program is licensed under GPL/LGPL. Then refer 
  them to the website for the GPL ( http://www.gnu.org ), specifically http://www.gnu.org/licenses/gpl-faq.html#DoesTheGPLAllowRequireFee 
  and http://www.gnu.org/licenses/gpl-faq.html#DoesTheGPLRequireAvailabilityToPublicI 
  don't really know what more *proof* they could want. I guess you could also 
  download teh source code and show them that each file references the GPL. 
  Matt Henley
  On 6/23/06, [EMAIL PROTECTED] [EMAIL PROTECTED]  
  wrote:
   
On Fri, 23 Jun 2006, [EMAIL PROTECTED] 
wrote: Hi, I'm having some 
questions about the licensing of Lazarus. According to 
the docs supplied lazarus sourcecode is GPLed. Does this mean 
that the IDE  binary is too? Is this automatically the case 
always? Yes. In my company I got the 
question to provide a proof that Lazarus is freeware. I cannot 
find it on the website. The only remark I found in  
the about section is that you can create commercial apps with 
the ide. All source files refer to the COPYING file. No 
other proof is needed ?"When we speak of free software, we are 
referring to freedom, not price." is mentioned in the GPL. This does not 
answer my question how toprove that I didn't need to pay for 
lazarus. I'm shure that other have similar issues, therefore 
I would like a "legal  issues" section to be placed 
on the main site page? I think it can be useful, but nor 
prioritary...For me it is, if I cannot sort it out with my company I 
will need toremove Lazarus from my PC.  Maybe it 
exists in the wiki ?Is that a "legally" sound place to put it in 
;)Darius Michael. 
_ 
To unsubscribe: mail [EMAIL PROTECTED] 
with 
"unsubscribe" as the Subjectarchives at http://www.lazarus.freepascal.org/mailarchives_ 
To unsubscribe: mail [EMAIL PROTECTED] 
with"unsubscribe" 
as the Subject archives at http://www.lazarus.freepascal.org/mailarchives


Re: [lazarus] lazarus licensing

2006-06-23 Thread Michael Van Canneyt


On Fri, 23 Jun 2006, Darius Blaszijk wrote:


 - Original Message -
 From: Felipe Monteiro de Carvalho [EMAIL PROTECTED]
 To: lazarus@miraclec.com
 Sent: Friday, June 23, 2006 7:34 PM
 Subject: Re: [lazarus] lazarus licensing


  On 6/23/06, [EMAIL PROTECTED] [EMAIL PROTECTED] wrote:
  When we speak of free software, we are referring to freedom, not
  price. is mentioned in the GPL. This does not answer my question how to
  prove that I didn't need to pay for lazarus.
 
  You can prove that by going to the link where you can download Lazarus for
  free.
 Sorry but that is no proof in itself. Lots of non-free software is
 downloadable too.

  You can also sell Lazarus if you want to. Can you explain better why
  do you want / need to prove with that?
 Well, in my company currently there is a huge effort being done to make an
 inventory of all software and licenses. They need to know of each and every
 byte wether or not it's legal to have a copy. You can imagine that there is
 no proper time to extensivley investigate each software and therefore it
 needs to be clear from the website for instance the software is free.

Well, what else does the 'Free' in 'Free Pascal' stand for ?

The name of the website itself spells it out for you:
www.lazarus.freepascal.org !

Michael.

_
 To unsubscribe: mail [EMAIL PROTECTED] with
unsubscribe as the Subject
   archives at http://www.lazarus.freepascal.org/mailarchives


Re: [lazarus] lazarus licensing

2006-06-23 Thread Florian Klaempfl
Darius Blaszijk wrote:

 Well, what else does the 'Free' in 'Free Pascal' stand for ?

 The name of the website itself spells it out for you:
 www.lazarus.freepascal.org !

 I understand how you feel. :(

If they don't believe, they have to read the GPL and no interpretations
by us help.

_
 To unsubscribe: mail [EMAIL PROTECTED] with
unsubscribe as the Subject
   archives at http://www.lazarus.freepascal.org/mailarchives


Re: [lazarus] lazarus licensing

2006-06-23 Thread Darius Blaszijk


- Original Message - 
From: Michael Van Canneyt [EMAIL PROTECTED]

To: lazarus@miraclec.com
Sent: Friday, June 23, 2006 8:35 PM
Subject: Re: [lazarus] lazarus licensing





On Fri, 23 Jun 2006, Darius Blaszijk wrote:



- Original Message -
From: Felipe Monteiro de Carvalho [EMAIL PROTECTED]
To: lazarus@miraclec.com
Sent: Friday, June 23, 2006 7:34 PM
Subject: Re: [lazarus] lazarus licensing


 On 6/23/06, [EMAIL PROTECTED] [EMAIL PROTECTED] wrote:
 When we speak of free software, we are referring to freedom, not
 price. is mentioned in the GPL. This does not answer my question how 
 to

 prove that I didn't need to pay for lazarus.

 You can prove that by going to the link where you can download Lazarus 
 for

 free.
Sorry but that is no proof in itself. Lots of non-free software is
downloadable too.

 You can also sell Lazarus if you want to. Can you explain better why
 do you want / need to prove with that?
Well, in my company currently there is a huge effort being done to make 
an
inventory of all software and licenses. They need to know of each and 
every
byte wether or not it's legal to have a copy. You can imagine that there 
is

no proper time to extensivley investigate each software and therefore it
needs to be clear from the website for instance the software is free.


Well, what else does the 'Free' in 'Free Pascal' stand for ?

The name of the website itself spells it out for you:
www.lazarus.freepascal.org !


I understand how you feel. :(



Michael.

_
To unsubscribe: mail [EMAIL PROTECTED] with
   unsubscribe as the Subject
  archives at http://www.lazarus.freepascal.org/mailarchives 


_
To unsubscribe: mail [EMAIL PROTECTED] with
   unsubscribe as the Subject
  archives at http://www.lazarus.freepascal.org/mailarchives


Re: [lazarus] lazarus licensing

2006-06-23 Thread Michael A. Hess
On Fri, 23 Jun 2006, Darius Blaszijk wrote:

  You can prove that by going to the link where you can download Lazarus for
  free.
 Sorry but that is no proof in itself. Lots of non-free software is
 downloadable too.

 Well, in my company currently there is a huge effort being done to make an
 inventory of all software and licenses. They need to know of each and every
 byte wether or not it's legal to have a copy. You can imagine that there is
 no proper time to extensivley investigate each software and therefore it
 needs to be clear from the website for instance the software is free.

You seem or your company seems to mixing and confusing license with cost.
If you read any of the license that come with Microsoft they don't say
anything about what it did or did not cost. They only refer to your
rights as to how you can use it.

That is all the GPL is. It indicates your rights as a user. It doesn't
imply or indicate if the product cost your anything or not. As mentioned
neither does any other license from any company.

All you need to inform your company is that the product is licensed as GPL
with portions LGPL which means you and they have full rights to use the
product.

Free as in cost shouldn't be any concern in their audit. You have a legal
right to have it on your machine. Period.

-- 
 Programming my first best destiny! 

Michael A. Hess  Miracle Concepts, Inc.
[EMAIL PROTECTED]   http://www.miraclec.com
Phone: 570-388-2211  Fax: 570-388-6101

_
 To unsubscribe: mail [EMAIL PROTECTED] with
unsubscribe as the Subject
   archives at http://www.lazarus.freepascal.org/mailarchives


Re: [lazarus] lazarus licensing

2006-06-23 Thread Darius Blaszijk

Thanks to all,

I have given all information to the auditor. After reviewing all your 
comments I now have a better understanding too and I will be able to explain 
exactly how it works.


Darius


- Original Message - 
From: Florian Klaempfl [EMAIL PROTECTED]

To: lazarus@miraclec.com
Sent: Friday, June 23, 2006 8:52 PM
Subject: Re: [lazarus] lazarus licensing



Darius Blaszijk wrote:


Well, what else does the 'Free' in 'Free Pascal' stand for ?

The name of the website itself spells it out for you:
www.lazarus.freepascal.org !


I understand how you feel. :(


If they don't believe, they have to read the GPL and no interpretations
by us help.

_
To unsubscribe: mail [EMAIL PROTECTED] with
   unsubscribe as the Subject
  archives at http://www.lazarus.freepascal.org/mailarchives 


_
To unsubscribe: mail [EMAIL PROTECTED] with
   unsubscribe as the Subject
  archives at http://www.lazarus.freepascal.org/mailarchives


RE: FreeAndNil (was: RE: [lazarus] procedure TObject.Free)

2006-06-23 Thread George Birbilis
  Couldn't they have used a var Obj:TObject instead? Would
 there be a
  problem with passing nil objects to that proc then? I wonder why

 No, because the compiler requires an the 'var' parameter is
 of exact same type, it can't even be a descendant :-(

It does indeed. Hadn't ever needed such a thing so didn't notice it.

One could use a PObject param instead of a var instead, but then they'll
have to use @ to pass an object to SafeFreeAndNil. Another interesting thing
also, is that both x^.Free and x.Free work (the button disappears when
SafeFreeAndNil gets called at the button's event handler), seems the Delphi
compiler treats pointers to objects as the objects themselves or something
like that. Of course x:=nil wouldn't also do the same as x^:=nil at the next
line.

type PObject=^TObject;

procedure SafeFreeAndNil(x:PObject);
begin
 x^.Free; //seems x.Free also works!
 x^:=nil;
end;

procedure TForm1.Button1Click(Sender: TObject);
var x:TButton;
begin
 x:=button1;
 SafeFreeAndNil(@x);
 x.Caption:='A';
end;

The x.Caption:='A' doesn't throw a runtime error at Delphi7, which made me
wonder why. So I added

 if x=nil then
  x.caption:='nil';

right after
 SafeFreeAndNil(@x)

And it even hit the breakpoint and I stepped and executed the line
x.caption:='nil' even though x was nil (cause of the if statement).
Changing x^:=nil to x:=nil of course made it not hit that breakpoint

I even noticed that with x^:=nil (which is the correct thing to have) for
SafeFreeAndNil to do its job, if one adds a Label on the form, they get an
EAbstractError with no more details after SafeFreeAndNil is called. Not sure
why, most probably cause the event handler of Button1 kills Button1 and
there's some problem with the stack then when the event handler returns or
with message passing. This seems to bite only if there are more than one
controls on the form.

The following seems to work fine


type PObject=^TObject;

procedure SafeFreeAndNil(x:PObject);
begin
 x^.Free; //seems x.Free also works!
 x^:=nil;
end;

procedure TForm1.Button1Click(Sender: TObject);
var x:TLabel;
begin
 x:=label1;
 SafeFreeAndNil(@x);
 button1.Caption:='A';
end;

Although if I use x.Caption:='A' it doesn't throw an error (even though x is
nil). Have to use the /cpu view I suppose to see what Delphi7 compiler
generates there (it's not the first strange behaviour with borland's pascal
compilers that I've seen over the years [using them since arround 1990])

  As it is now it does very bad crash if you pass by accident say an
  interface reference to it instead of an object reference
 (can easily
  do this mistake if one reengineers their code to use
 interfaces - they
  may forget to remove the FreeAndNil stuff, thus getting bad runtime
  crashes instead of a compiler message that a TObject descendent is
  needed as param to FreeAndNil)
 
  Is FreePascal using TObject there or a var Obj param too?

 I've just checked (version 2.0.2) and it indeed is
 implemented like Delphi :-( But as a matter of fact it could
 have been implemented the right way, because FPC does the
 sane thing and allow descendants as 'var'
 parameters.

Since object references are just pointers, I suppose FPC does correctly, so
Lazarus could use the var:TObject version of FreeAndNil

procedure FreeAndNil(var x:TObject);
begin
 if xnil then x.Free;
 x:=nil;
end;

One might say you don't need to check for nil, Free must be checking it too,
but not sure which is worse, an extra nil check or one unneeded call to
Free (I suppose the 2nd is worse, although with Delphi passing params using
registers by default instead of using the stack I'm not sure)

 Yerder yet there's a 'FreeThenNil' function in LCLProc which
 calls obj.Free before setting the pointer to null :-/

Why is there a FreeThenNil too apart from FreeAndNil. Is it supposed to
do something different?. Not sure if the order there plays any role. I
suppose it should be the Borland order so that possibly some very
play-it-clever static code analysis tools doesn't complain


George Birbilis ([EMAIL PROTECTED])
Microsoft MVP J# for 2004-2006
Borland Spirit of Delphi
* QuickTime, QTVR, ActiveX, VCL, .NET
http://www.kagi.com/birbilis
* Robotics
http://www.mech.upatras.gr/~Robotics
http://www.mech.upatras.gr/~robgroup




  _  

avast! Antivirus http://www.avast.com : Outbound message clean. 


Virus Database (VPS): 0625-7, 23/06/2006
Tested on: 23/6/2006 11:25:06 ??
avast! - copyright (c) 1988-2006 ALWIL Software.



_
 To unsubscribe: mail [EMAIL PROTECTED] with
unsubscribe as the Subject
   archives at http://www.lazarus.freepascal.org/mailarchives


Re: [lazarus] Lazarus on x86_64

2006-06-23 Thread Andrew Haines

Mattias Gaertner wrote:


Good news: Lazarus runs on x86_64 as 64bit native executable pretty well.

I added a workaround for the arithmetic exception bug. It seems to be a fpc
bug. I already reported it.

 

Hi that's great! I tested svn laz and svn fpc 2.0.3 right now and the 
arithmetic bug is gone!


Now I get this error when trying to compile a program I've been working 
on. here is a backtrace:


(gdb) c
Continuing.
[TMainIDE.DoRunProject] A
TMainIDE.DoInitProjectRun A True 0
TMainIDE.DoInitProjectRun B
TMainIDE.DoSaveAll
TMainIDE.DoSaveProject End
TPkgManager.DoCompilePackage A DBFLaz 0.1.1 
Flags=[pcfDoNotCompileDependencies,pcfOnlyIfNeeded,pcfDoNotSaveEditorFiles]


Breakpoint 1, 0x0041c59c in fpc_raiseexception ()
(gdb) bt
#0  0x0041c59c in fpc_raiseexception ()
#1  0x0049ad1c in CLASSES_TFPLIST_$__ERROR$ANSISTRING$INT64 ()
#2  0x0049a81f in CLASSES_TFPLIST_$__RAISEINDEXERROR$LONGINT ()
#3  0x0049a862 in CLASSES_TFPLIST_$__GET$LONGINT$$POINTER ()
#4  0x0049b576 in CLASSES_TLIST_$__GET$LONGINT$$POINTER ()
#5  0x00926526 in TLAZPACKAGE__GETFILES (INDEX=Cannot access 
memory at address 0x8000ffeee91c

) at packagedefs.pas:2024
#6  0x0073dc83 in TPKGMANAGER__CHECKIFPACKAGENEEDSCOMPILATION 
(APACKAGE=Cannot access memory at address 0x8000ffeee9f8

) at pkgmanager.pas:1766
#7  0x00743358 in TPKGMANAGER__DOCOMPILEPACKAGE (APACKAGE=Cannot 
access memory at address 0x8000ffeeed08

) at pkgmanager.pas:2956
#8  0x0073bd7b in TPKGMANAGER__COMPILEREQUIREDPACKAGES 
(APACKAGE=Cannot access memory at address 0x8000ffeeedd8

) at pkgmanager.pas:1423
#9  0x00742f18 in TPKGMANAGER__DOCOMPILEPROJECTDEPENDENCIES 
(APROJECT=Cannot access memory at address 0x8000ff78

) at pkgmanager.pas:2888
#10 0x0046b1e2 in TMAINIDE__DOBUILDPROJECT (AREASON=Cannot 
access memory at address 0x8000ffeef09c

) at main.pp:7475
#11 0x0046bb14 in TMAINIDE__DOINITPROJECTRUN (this=Cannot access 
memory at address 0x8000ffeef198

) at main.pp:7603
#12 0x0046bcfd in TMAINIDE__DORUNPROJECT (this=Cannot access 
memory at address 0x8000ffeef1b8

) at main.pp:7664
#13 0x00456a69 in TMAINIDE__MNURUNPROJECTCLICKED (SENDER=Cannot 
access memory at address 0x8000ffeef1d8

) at main.pp:3119
#14 0x00541ffa in TCONTROL__CLICK (this=Cannot access memory at 
address 0x8000ffeef1f8

) at control.inc:1865
#15 0x005aca85 in TCUSTOMSPEEDBUTTON__CLICK (this=Cannot access 
memory at address 0x8000ffeef218

) at speedbutton.inc:77
#16 0x00541e89 in TCONTROL__WMLBUTTONUP (MESSAGE=Cannot access 
memory at address 0x8000ffeef288

) at control.inc:1820
#17 0x0041b83b in SYSTEM_TOBJECT_$__DISPATCH$formal ()
#18 0x005417cd in TCONTROL__WNDPROC (THEMESSAGE=Cannot access 
memory at address 0x8000ffeef318

) at control.inc:1542
#19 0x0054038c in TCONTROL__PERFORM (MSG=Cannot access memory at 
address 0x8000ffeef37c

) at control.inc:1014
#20 0x00536290 in TWINCONTROL__ISCONTROLMOUSEMSG 
(THEMESSAGE=Cannot access memory at address 0x8000ffeef408

) at wincontrol.inc:2875
#21 0x00537606 in TWINCONTROL__WNDPROC (MESSAGE=Cannot access 
memory at address 0x8000ffeef468

) at wincontrol.inc:3380
#22 0x0055a8a6 in DELIVERMESSAGE (TARGET=Cannot access memory at 
address 0x8000ffeef578

) at gtkproc.inc:3465
#23 0x0056553c in DELIVERMOUSEUPMESSAGE (WIDGET=Cannot access 
memory at address 0x8000ffeef608

) at gtkcallback.inc:1481
#24 0x0056562d in GTKMOUSEBTNRELEASE (WIDGET=Cannot access 
memory at address 0x8000ffeef638

) at gtkcallback.inc:1530
#25 0x2b0b39de in gtk_marshal_BOOL__POINTER () from 
/usr/lib64/libgtk-1.2.so.0
#26 0x2b0e4753 in gtk_handlers_run () from 
/usr/lib64/libgtk-1.2.so.0
#27 0x2b0e53e7 in gtk_signal_real_emit () from 
/usr/lib64/libgtk-1.2.so.0

#28 0x2b0e63db in gtk_signal_emit () from /usr/lib64/libgtk-1.2.so.0
#29 0x2b11fd8c in gtk_widget_event () from 
/usr/lib64/libgtk-1.2.so.0
#30 0x2b0b33a3 in gtk_propagate_event () from 
/usr/lib64/libgtk-1.2.so.0
#31 0x2b0b369f in gtk_main_do_event () from 
/usr/lib64/libgtk-1.2.so.0
#32 0x2ad08322 in gdk_event_dispatch () from 
/usr/lib64/libgdk-1.2.so.0
#33 0x2abd5a22 in g_main_dispatch () from 
/usr/lib64/libglib-1.2.so.0

#34 0x2abd6636 in g_main_iterate () from /usr/lib64/libglib-1.2.so.0
#35 0x2b0b2538 in gtk_main_iteration_do () from 
/usr/lib64/libgtk-1.2.so.0
#36 0x004f34be in TGTKWIDGETSET__APPWAITMESSAGE (this=Cannot 
access memory at address 0x8000ffeefea8

) at gtkobject.inc:1813
#37 0x0043667a in TAPPLICATION__IDLE (WAIT=Cannot access memory 
at address 0x8000ffeefedc

) at application.inc:282
#38 0x00437fa1 in TAPPLICATION__HANDLEMESSAGE (this=Cannot 
access memory at address 0x8000ffeefef8

) at application.inc:920
#39 0x00438441 in RUNMESSAGE (parentfp=Cannot access 

Re: [lazarus] Lazarus on x86_64

2006-06-23 Thread Andrew Haines
also here is another backtrace with the same message ListIndex out of 
bounds (3)


(gdb) c
Continuing.
TApplication.HandleException List index (3) out of bounds
 Stack trace:
 $0049A81F
Mapped!
UNMAPPED
TMainIDE.DoLoadLFM there is no LFM file for 
/home/andrew/programming/fpc/fcl/db/sdf/sdfdata.pp


Breakpoint 1, 0x0041c59c in fpc_raiseexception ()
(gdb) bt
#0  0x0041c59c in fpc_raiseexception ()
#1  0x00867d61 in TCUSTOMCODETOOL__RAISEEXCEPTIONINSTANCE 
(THEEXCEPTION=Cannot access memory at address 0x8000ffeef128

) at customcodetool.pas:1921
#2  0x00867dbb in TCUSTOMCODETOOL__RAISEEXCEPTIONCLASS 
(AMESSAGE=Cannot access memory at address 0x8000ffeef158

) at customcodetool.pas:1929
#3  0x0086242f in TCUSTOMCODETOOL__RAISEEXCEPTION 
(AMESSAGE=Cannot access memory at address 0x8000ffeef178

) at customcodetool.pas:357
#4  0x008624ca in TCUSTOMCODETOOL__RAISEEXCEPTIONFMT 
(AMESSAGE=Cannot access memory at address 0x8000ffeef218

) at customcodetool.pas:363
#5  0x008701a0 in RAISENOTFOUND (parentfp=Cannot access memory 
at address 0x8000ffeef2c8

) at finddeclarationtool.pas:2072
#6  0x0086fffa in CHECKRESULT (NEWRESULT=Cannot access memory at 
address 0x8000ffeef2fc

) at finddeclarationtool.pas:2139
#7  0x0086f49a in TFINDDECLARATIONTOOL__FINDIDENTIFIERINCONTEXT 
(PARAMS=Cannot access memory at address 0x8000ffeef378

) at finddeclarationtool.pas:2581
#8  0x00878b1d in RESOLVEIDENTIFIER (parentfp=Cannot access 
memory at address 0x8000ffeef3e8

) at finddeclarationtool.pas:5053
#9  0x0087762b in 
TFINDDECLARATIONTOOL__FINDEXPRESSIONTYPEOFVARIABLE (STARTPOS=Cannot 
access memory at address 0x8000ffeef4dc

) at finddeclarationtool.pas:5411
#10 0x0086ef49 in 
TFINDDECLARATIONTOOL__FINDDECLARATIONOFIDENTATPARAM (PARAMS=Cannot 
access memory at address 0x8000ffeef548

) at finddeclarationtool.pas:1906
#11 0x0086be1e in TFINDDECLARATIONTOOL__FINDDECLARATION 
(CURSORPOS=Cannot access memory at address 0x8000ffeef758

) at finddeclarationtool.pas:1272
#12 0x0086e0ad in TFINDDECLARATIONTOOL__FINDSMARTHINT 
(CURSORPOS=Cannot access memory at address 0x8000ffeef8a8

) at finddeclarationtool.pas:1685
#13 0x00663627 in TCODETOOLMANAGER__FINDSMARTHINT (CODE=Cannot 
access memory at address 0x8000ffeefa48

) at codetoolmanager.pas:1552
#14 0x0047e7b8 in TMAINIDE__ONSRCNOTEBOOKSHOWHINTFORSOURCE 
(SRCEDIT=Cannot access memory at address 0x8000ffeefb38

) at main.pp:11652
#15 0x00760ad5 in TSOURCENOTEBOOK__SHOWSYNEDITHINT (MOUSEPOS={X 
= 364, Y = 271}, this=Cannot access memory at address 0x8000ffeefcd8

) at uniteditor.pp:5550
#16 0x00760683 in TSOURCENOTEBOOK__HINTTIMER (SENDER=Cannot 
access memory at address 0x8000ffeefd28

) at uniteditor.pp:5477
#17 0x005e6bf2 in TCUSTOMTIMER__DOONTIMER (this=Cannot access 
memory at address 0x8000ffeefd48

) at customtimer.pas:176
#18 0x005e6b56 in TCUSTOMTIMER__TIMER (this=Cannot access memory 
at address 0x8000ffeefd68

) at customtimer.pas:152
#19 0x00567a5c in GTKTIMERCB (DATA=Cannot access memory at 
address 0x8000ffeefd98

) at gtkcallback.inc:2522
#20 0x2abd6b0a in g_timeout_dispatch () from 
/usr/lib64/libglib-1.2.so.0
#21 0x2abd5a22 in g_main_dispatch () from 
/usr/lib64/libglib-1.2.so.0

#22 0x2abd6636 in g_main_iterate () from /usr/lib64/libglib-1.2.so.0
#23 0x2b0b2538 in gtk_main_iteration_do () from 
/usr/lib64/libgtk-1.2.so.0
#24 0x004f34be in TGTKWIDGETSET__APPWAITMESSAGE (this=Cannot 
access memory at address 0x8000ffeefea8

) at gtkobject.inc:1813
#25 0x0043667a in TAPPLICATION__IDLE (WAIT=Cannot access memory 
at address 0x8000ffeefedc

) at application.inc:282
#26 0x00437fa1 in TAPPLICATION__HANDLEMESSAGE (this=Cannot 
access memory at address 0x8000ffeefef8

) at application.inc:920
#27 0x00438441 in RUNMESSAGE (parentfp=Cannot access memory at 
address 0x8000ffeeff18

) at application.inc:1034
#28 0x0043835c in TAPPLICATION__RUNLOOP (this=Cannot access 
memory at address 0x8000ffef0018

) at application.inc:1044
#29 0x0048e2a5 in TWIDGETSET__APPRUN (ALOOP=Cannot access memory 
at address 0x8000ffef0038

) at interfacebase.inc:42
#30 0x004382ff in TAPPLICATION__RUN (this=Cannot access memory 
at address 0x8000ffef0078

) at application.inc:1023
#31 0x00410055 in main () at lazarus.pp:99
(gdb) c
Continuing.
### TCodeToolManager.HandleException: identifier not found: Name at 
Line=7 Col=8 in /home/andrew/programming/fpc/fcl/db/sdf/sdfdata.pp


_
To unsubscribe: mail [EMAIL PROTECTED] with
   unsubscribe as the Subject
  archives at http://www.lazarus.freepascal.org/mailarchives


Re: [lazarus] Lazarus on x86_64

2006-06-23 Thread Andrew Haines

Andrew Haines wrote:



Now I get this error when trying to compile a program I've been 
working on. here is a backtrace:


(gdb) c
Continuing.
[TMainIDE.DoRunProject] A
TMainIDE.DoInitProjectRun A True 0
TMainIDE.DoInitProjectRun B
TMainIDE.DoSaveAll
TMainIDE.DoSaveProject End
TPkgManager.DoCompilePackage A DBFLaz 0.1.1 
Flags=[pcfDoNotCompileDependencies,pcfOnlyIfNeeded,pcfDoNotSaveEditorFiles] 



Breakpoint 1, 0x0041c59c in fpc_raiseexception ()
(gdb) bt
#0  0x0041c59c in fpc_raiseexception ()
#1  0x0049ad1c in CLASSES_TFPLIST_$__ERROR$ANSISTRING$INT64 ()
#2  0x0049a81f in CLASSES_TFPLIST_$__RAISEINDEXERROR$LONGINT ()
#3  0x0049a862 in CLASSES_TFPLIST_$__GET$LONGINT$$POINTER ()
#4  0x0049b576 in CLASSES_TLIST_$__GET$LONGINT$$POINTER ()
#5  0x00926526 in TLAZPACKAGE__GETFILES (INDEX=Cannot access 
memory at address 0x8000ffeee91c

) at packagedefs.pas:2024
#6  0x0073dc83 in TPKGMANAGER__CHECKIFPACKAGENEEDSCOMPILATION 
(APACKAGE=Cannot access memory at address 0x8000ffeee9f8

) at pkgmanager.pas:1766
#7  0x00743358 in TPKGMANAGER__DOCOMPILEPACKAGE 
(APACKAGE=Cannot access memory at address 0x8000ffeeed08

) at pkgmanager.pas:2956
#8  0x0073bd7b in TPKGMANAGER__COMPILEREQUIREDPACKAGES 
(APACKAGE=Cannot access memory at address 0x8000ffeeedd8

) at pkgmanager.pas:1423
#9  0x00742f18 in TPKGMANAGER__DOCOMPILEPROJECTDEPENDENCIES 
(APROJECT=Cannot access memory at address 0x8000ff78

) at pkgmanager.pas:2888
#10 0x0046b1e2 in TMAINIDE__DOBUILDPROJECT (AREASON=Cannot 
access memory at address 0x8000ffeef09c

) at main.pp:7475
#11 0x0046bb14 in TMAINIDE__DOINITPROJECTRUN (this=Cannot 
access memory at address 0x8000ffeef198

) at main.pp:7603
#12 0x0046bcfd in TMAINIDE__DORUNPROJECT (this=Cannot access 
memory at address 0x8000ffeef1b8

) at main.pp:7664
#13 0x00456a69 in TMAINIDE__MNURUNPROJECTCLICKED 
(SENDER=Cannot access memory at address 0x8000ffeef1d8

) at main.pp:3119
#14 0x00541ffa in TCONTROL__CLICK (this=Cannot access memory 
at address 0x8000ffeef1f8

) at control.inc:1865
#15 0x005aca85 in TCUSTOMSPEEDBUTTON__CLICK (this=Cannot 
access memory at address 0x8000ffeef218

) at speedbutton.inc:77
#16 0x00541e89 in TCONTROL__WMLBUTTONUP (MESSAGE=Cannot access 
memory at address 0x8000ffeef288

) at control.inc:1820
#17 0x0041b83b in SYSTEM_TOBJECT_$__DISPATCH$formal ()
#18 0x005417cd in TCONTROL__WNDPROC (THEMESSAGE=Cannot access 
memory at address 0x8000ffeef318

) at control.inc:1542
#19 0x0054038c in TCONTROL__PERFORM (MSG=Cannot access memory 
at address 0x8000ffeef37c

) at control.inc:1014
#20 0x00536290 in TWINCONTROL__ISCONTROLMOUSEMSG 
(THEMESSAGE=Cannot access memory at address 0x8000ffeef408

) at wincontrol.inc:2875
#21 0x00537606 in TWINCONTROL__WNDPROC (MESSAGE=Cannot access 
memory at address 0x8000ffeef468

) at wincontrol.inc:3380
#22 0x0055a8a6 in DELIVERMESSAGE (TARGET=Cannot access memory 
at address 0x8000ffeef578

) at gtkproc.inc:3465
#23 0x0056553c in DELIVERMOUSEUPMESSAGE (WIDGET=Cannot access 
memory at address 0x8000ffeef608

) at gtkcallback.inc:1481
#24 0x0056562d in GTKMOUSEBTNRELEASE (WIDGET=Cannot access 
memory at address 0x8000ffeef638

) at gtkcallback.inc:1530
#25 0x2b0b39de in gtk_marshal_BOOL__POINTER () from 
/usr/lib64/libgtk-1.2.so.0
#26 0x2b0e4753 in gtk_handlers_run () from 
/usr/lib64/libgtk-1.2.so.0
#27 0x2b0e53e7 in gtk_signal_real_emit () from 
/usr/lib64/libgtk-1.2.so.0
#28 0x2b0e63db in gtk_signal_emit () from 
/usr/lib64/libgtk-1.2.so.0
#29 0x2b11fd8c in gtk_widget_event () from 
/usr/lib64/libgtk-1.2.so.0
#30 0x2b0b33a3 in gtk_propagate_event () from 
/usr/lib64/libgtk-1.2.so.0
#31 0x2b0b369f in gtk_main_do_event () from 
/usr/lib64/libgtk-1.2.so.0
#32 0x2ad08322 in gdk_event_dispatch () from 
/usr/lib64/libgdk-1.2.so.0
#33 0x2abd5a22 in g_main_dispatch () from 
/usr/lib64/libglib-1.2.so.0
#34 0x2abd6636 in g_main_iterate () from 
/usr/lib64/libglib-1.2.so.0
#35 0x2b0b2538 in gtk_main_iteration_do () from 
/usr/lib64/libgtk-1.2.so.0
#36 0x004f34be in TGTKWIDGETSET__APPWAITMESSAGE (this=Cannot 
access memory at address 0x8000ffeefea8

) at gtkobject.inc:1813
#37 0x0043667a in TAPPLICATION__IDLE (WAIT=Cannot access 
memory at address 0x8000ffeefedc

) at application.inc:282
#38 0x00437fa1 in TAPPLICATION__HANDLEMESSAGE (this=Cannot 
access memory at address 0x8000ffeefef8

) at application.inc:920
#39 0x00438441 in RUNMESSAGE (parentfp=Cannot access memory at 
address 0x8000ffeeff18

) at application.inc:1034
#40 0x0043835c in TAPPLICATION__RUNLOOP (this=Cannot access 
memory at address 0x8000ffef0018

) at application.inc:1044
#41 0x0048e2a5 in TWIDGETSET__APPRUN (ALOOP=Cannot access 
memory at address 

Re: [lazarus] lazarus licensing

2006-06-23 Thread Carlo Kok
Michael Van Canneyt wrote:
 
 On Fri, 23 Jun 2006, Carlo Kok wrote:
 
 Michael Van Canneyt wrote:

 On Fri, 23 Jun 2006, [EMAIL PROTECTED] wrote:

 Hi,

 I'm having some questions about the licensing of Lazarus. According to
 the
 docs supplied lazarus sourcecode is GPLed. Does this mean that the IDE
 binary is too? Is this automatically the case always?
 Yes.

 So that means that no commercial packages can be installed in the ide?
 
 They can be, why not ? Nothing is said about this...

I'm asking, I'm curious. Though I guess a commercial package wouldn't
actually be linking to the ide (gpl) but to the visual controls (gpl +
exception?) it wouldn't be required to be gpl?

--
Carlo Kok

_
 To unsubscribe: mail [EMAIL PROTECTED] with
unsubscribe as the Subject
   archives at http://www.lazarus.freepascal.org/mailarchives


Re: [lazarus] lazarus licensing

2006-06-23 Thread Micha Nelissen
Carlo Kok wrote:
 Michael Van Canneyt wrote:
 They can be, why not ? Nothing is said about this...
 
 I'm asking, I'm curious. Though I guess a commercial package wouldn't
 actually be linking to the ide (gpl) but to the visual controls (gpl +
 exception?) it wouldn't be required to be gpl?

Indeed, they are derived from, and using, the visual controls which are
LGPL+exception, and as such they do not need to be licensed under the GPL.

Micha

_
 To unsubscribe: mail [EMAIL PROTECTED] with
unsubscribe as the Subject
   archives at http://www.lazarus.freepascal.org/mailarchives


Re: [lazarus] lazarus licensing

2006-06-23 Thread Gustavo Enrique Jimenez

Hi !



 In my company I got the question to provide a proof that Lazarus is
 freeware. I cannot find it on the website. The only remark I found in the
 about section is that you can create commercial apps with the ide.

All source files refer to the COPYING file. No other proof is needed ?


.
.
.


 I'm shure that other have similar issues, therefore I would like a  legal
 issues section to be placed on the main site page?

I think it can be useful, but nor prioritary...



Legal issues are a very important issues.

Copyright on the source code could be faked, so ours employers can't trust them.

An explicit License page in the Lazarus's site can't be faked. That
way you can provide a very useful way to prove the legality of using
Lazarus as a tool for software development.


Gustavo Jiménez

ps: How much will cost a paper with an explicit License agreement,
signed by the Lazarus developers ?

_
To unsubscribe: mail [EMAIL PROTECTED] with
   unsubscribe as the Subject
  archives at http://www.lazarus.freepascal.org/mailarchives


Re: [lazarus] lazarus licensing

2006-06-23 Thread Matt Henley
Are some employers that paranoid? I mean.. go to the http://lazarus.freepascal.org website and click on About Lazarus... that page explains it pretty well... including the Can I develop commercial products with this? section. Just a little up the page, it says that the IDE is gpl.
But copright in source pulled from the development site by your
employer from cvs/svn is about as trustworthy as you are going to get.
If needed they can pull up the development history.Copyright on the source code could be faked, so ours employers can't trust them.Our IT department loves GPL software.. they dont push it as a panacea but we have Dia, Gimp, Scribus and Firefox(gpl?) floating around.
Matt


Re: [lazarus] TStringGrid Question

2006-06-23 Thread Jesús Reyes A.





  - Original Message - 
  From: 
  Matt Henley 

  To: lazarus@miraclec.com 
  Sent: Friday, June 23, 2006 9:28 AM
  Subject: [lazarus] TStringGrid 
  Question
  
  I am using a TStringGrid in a project that I am working on. I have 
  a few questions about the use of this and all my delphi books seem to delve 
  into DBGrids but not string grids. Here are my 
  questions:1. My grid would allow the user to enter data in the 
  first column while the other columns show result based on the data just 
  entered. How do I selectively restrict data entry to a 
  column/row/cell? 2. If the user presses enter while in a cell, the 
  cell to the right of the previous one is selected. How do I change this 
  so that the one below is active?3. What is the best event to use for 
  updating a running total as the user enters data? In other words, the 
  user has entered a number and gone to the next cell, I want to do a summation 
  and present the new total. Thanks!Matt Henley

1. Create a 
OnSelectEditor event and set there: if Col1 then 
Editor:=nil;

2. in Object inspector set 
AutoAdvance:=aaDown

3. Create a OnEditingDone event there you can 
recalc the total.

 Note: OnEditingDone may be triggered 
some times at the grid setup after that
 is triggered 
when user ends editing.

Jesus Reyes A.