Re: [fpc-pascal] The secrets of FPMake

2012-12-02 Thread Michael Van Canneyt
On Mon, 3 Dec 2012, luciano de souza wrote: Hello all, Browsing in FPC directories, I found several occurances of FPMake.pp. It's a makefile for Freepascal programs. In the /bin directory, I found "pas2fm" that reads a unit and creates a fpmake prototype program. As an example, I compile fpmak

Re: [fpc-pascal] Dataset indexdefs.find: documentation wrong?

2012-12-02 Thread LacaK
Reinier Olislagers wrote / napĂ­sal(a): With this code: procedure SortBufDataSet(DataSet: TBufDataSet; const FieldName: string); var Index_Name: string; begin Index_Name := FieldName + '__IdxA'; if (DataSet.IndexDefs.Find(Index_Name)<>Nil) then ... the last line throws an exception if the i

Re: [fpc-pascal] Lazarus Release 1.0.4

2012-12-02 Thread Mattias Gaertner
On Sun, 2 Dec 2012 19:46:35 +0100 Rainer Stratmann wrote: > If I have Kubuntu Linux and then type apt-get install lazarus. > Would it be the newest version then? No. Ubuntu is usually some months behind. Sometimes a year. > If not what is the easiest way to get it on Kubuntu Linux? Download fr

Re: [fpc-pascal] Lazarus Release 1.0.4

2012-12-02 Thread Rainer Stratmann
If I have Kubuntu Linux and then type apt-get install lazarus. Would it be the newest version then? If not what is the easiest way to get it on Kubuntu Linux? Or would this help me? http://wiki.freepascal.org/Lazarus_release_version_for_Ubuntu Am Sunday 02 December 2012 10:14:18 schrieb Mattias G

Re: [fpc-pascal] Dataset indexdefs.find: documentation wrong?

2012-12-02 Thread Michael Van Canneyt
On Sun, 2 Dec 2012, Reinier Olislagers wrote: With this code: procedure SortBufDataSet(DataSet: TBufDataSet; const FieldName: string); var Index_Name: string; begin Index_Name := FieldName + '__IdxA'; if (DataSet.IndexDefs.Find(Index_Name)<>Nil) then ... the last line throws an exception if

[fpc-pascal] Dataset indexdefs.find: documentation wrong?

2012-12-02 Thread Reinier Olislagers
With this code: procedure SortBufDataSet(DataSet: TBufDataSet; const FieldName: string); var Index_Name: string; begin Index_Name := FieldName + '__IdxA'; if (DataSet.IndexDefs.Find(Index_Name)<>Nil) then ... the last line throws an exception if the index does not exist; corresponding db.pas

[fpc-pascal] Lazarus Release 1.0.4

2012-12-02 Thread Mattias Gaertner
The Lazarus team is glad to announce the release of Lazarus 1.0.4. This is a bug fix release. Here is the list of changes: http://wiki.lazarus.freepascal.org/Lazarus_1.0_fixes_branch#Fixes_for_1.0.4_.28Merged.29 The release is available for download at the SourceForge download page: http://source