Recent

Author Topic: Lazarus 1.0.14 Release  (Read 31862 times)

Martin_fr

  • Administrator
  • Hero Member
  • *
  • Posts: 9792
  • Debugger - SynEdit - and more
    • wiki
Lazarus 1.0.14 Release
« on: November 19, 2013, 10:33:48 pm »
The Lazarus team is glad to announce the release of Lazarus 1.0.14.

This is a bug fix release, built with fpc 2.6.2.
The previous releases from 1.0.8 to 1.0.12 were built with fpc 2.6.2 too, while release 1.0.6 was built with fpc 2.6.0.

Here is the list of changes for Lazarus and Free Pascal:
http://wiki.lazarus.freepascal.org/Lazarus_1.0_fixes_branch#Fixes_for_1.0.14_.28Merged.29
http://wiki.lazarus.freepascal.org/User_Changes_2.6.2

The release is available for download on SourceForge:
http://sourceforge.net/projects/lazarus/files/

Choose your CPU, OS, distro and then the "Lazarus 1.0.14" directory.

Minimum requirements:
Windows:       98
FreeBSD/Linux: gtk 2.8 or qt4.5
Mac OS X:      10.5, LCL only 32bit, non LCL apps can be 64bit

The svn tag is
http://svn.freepascal.org/svn/lazarus/tags/lazarus_1_0_14

For people who are blocked by SF, the Lazarus releases from SourceForge
are mirrored at:
ftp://freepascal.dfmk.hu/pub/lazarus/releases/
and later at (after some time for synchronization)
http://michael-ep3.physik.uni-halle.de/Lazarus/releases/
and
http://mirrors.iwi.me/lazarus/

motaz

  • Sr. Member
  • ****
  • Posts: 495
    • http://code.sd
Re: Lazarus 1.0.14 Release
« Reply #1 on: November 19, 2013, 11:34:52 pm »
Downloading Debian 64 version...

I was expecting 1.2, but I had no chance to test the release candidate, so that it is more safer to me to upgrade to 1.0.14

jwdietrich

  • Hero Member
  • *****
  • Posts: 1232
    • formatio reticularis
Re: Lazarus 1.0.14 Release
« Reply #2 on: November 19, 2013, 11:38:47 pm »
Thanks! Lazarus 1.0.14 runs smoothly on PPC-based and intel-based Macs.
function GetRandomNumber: integer; // xkcd.com
begin
  GetRandomNumber := 4; // chosen by fair dice roll. Guaranteed to be random.
end;

http://www.formatio-reticularis.de

Lazarus 2.2.6 | FPC 3.2.2 | PPC, Intel, ARM | macOS, Windows, Linux

Robot

  • Newbie
  • Posts: 6
Re: Lazarus 1.0.14 Release
« Reply #3 on: November 20, 2013, 02:42:54 am »
thank you
terima kasih
matur nuwun

Robert W.B.

  • Sr. Member
  • ****
  • Posts: 328
  • Love my Wife, My Kids and Lazarus/Freepascal.
Re: Lazarus 1.0.14 Release
« Reply #4 on: November 20, 2013, 05:18:30 am »
Thanks from Robbanux
Rob

bigeno

  • Sr. Member
  • ****
  • Posts: 266
Re: Lazarus 1.0.14 Release
« Reply #5 on: November 20, 2013, 08:06:03 am »
Thanks  :)

BTW Download links on main lazarus web page still points to 1.0.12

michaelcain

  • Newbie
  • Posts: 1
Re: Lazarus 1.0.14 Release
« Reply #6 on: November 20, 2013, 12:07:16 pm »
I just want to say Lazarus is a Great IDE for Free Pascal. I've just stumbled upon it. I used Pascal since 1998 using Turbo Pascal by Borland then in 2002 I switched to Delphi. I think Lazarus is Just as Good if Not Better then Delphi 7 and Delphi 7.2...

I want to thank the developer's of Lazarus as well as the Contributors for all of their hard work and Success with Lazarus. I am working on a Commercial Game Using Lazarus. I think it's great!!! Goodbye Delphi 7.2 and Hello Lazarus...

snorkel

  • Hero Member
  • *****
  • Posts: 817
Re: Lazarus 1.0.14 Release
« Reply #7 on: November 22, 2013, 07:45:19 pm »
Thanks to all the Lazarus Devs :-)  Just wanted to let you guys know Lazarus is my go to tool now, I don't even use Delphi anymore.
Long live Lazarus!!!!
***Snorkel***
If I forget, I always use the latest stable 32bit version of Lazarus and FPC. At the time of this signature that is Laz 3.0RC2 and FPC 3.2.2
OS: Windows 10 64 bit

sarok attila

  • Newbie
  • Posts: 3
Re: Lazarus 1.0.14 Release
« Reply #8 on: December 20, 2013, 02:54:55 pm »
Small program not run. Amd X2 64 win xp sp3 original registered.

unit Unit1;

{$mode objfpc}{$H+}

interface

uses
  Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls,
  ExtCtrls, Grids, Math;

type

  { TForm1 }

  TForm1 = class(TForm)
    StringGrid1: TStringGrid;
    Timer1: TTimer;
    procedure Timer1Timer(Sender: TObject);
  private
    { private declarations }
  public
    { public declarations }
    megosztas : array[1..100] of int64;
  end;

var
  Form1: TForm1;
  felhasznalo : integer;

implementation

{$R *.lfm}

{ TForm1 }

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  felhasznalo := felhasznalo + 1;
  megosztas[felhasznalo] := randomrange(1, 1000000000);
  stringgrid1.RowCount:= felhasznalo + 1;
  stringgrid1.Cells[1, felhasznalo] := inttostr(megosztas[felhasznalo]);
end;

end.

Run on my computer is very slow. Close run error sisegv sometimes sometimes close correctly.
Last Lazarus, 32 bit.

   
« Last Edit: December 20, 2013, 03:13:57 pm by sarok attila »

howardpc

  • Hero Member
  • *****
  • Posts: 4144
Re: Lazarus 1.0.14 Release
« Reply #9 on: December 20, 2013, 06:06:31 pm »
Small program not run. Amd X2 64 win xp sp3 original registered.
You must initialise your integer variable felhasznalo before using it, otherwise the program starts with a garbage value; and also check that it does not exceed the array index bounds.

Code: [Select]
unit Unit1;

{$mode objfpc}{$H+}

interface

uses
  SysUtils, Forms, Grids, ExtCtrls, math;

type

  { TForm1 }

  TForm1 = class(TForm)
    StringGrid1: TStringGrid;
    Timer1: TTimer;
    procedure Timer1Timer(Sender: TObject);
  public
   megosztas : array[1..100] of int64;
  end;

var
  Form1: TForm1;
  felhasznalo : integer=1;

implementation

{$R *.lfm}

{ TForm1 }

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  felhasznalo := felhasznalo + 1;
  if (felhasznalo<1) or (felhasznalo>100) then
    felhasznalo:=1;
  megosztas[felhasznalo] := randomrange(1, 1000000000);
  stringgrid1.RowCount:= felhasznalo + 1;
  stringgrid1.Cells[1, felhasznalo] := inttostr(megosztas[felhasznalo]);
end;

initialization
  Randomize;

end.

Quote
Run on my computer is very slow.

What value do you give to the timer interval?
Why, anyway, do you need to fill the grid at timed intervals rather than in a simple loop?
« Last Edit: December 21, 2013, 12:49:01 pm by howardpc »

sarok attila

  • Newbie
  • Posts: 3
Re: Lazarus 1.0.14 Release
« Reply #10 on: December 22, 2013, 10:07:13 am »
Okay !
But Lazaraus is very "strange" programming language. Because of your idea is correct. But my problem is that : why not say List index of bound or else run or debug error, else sisegv.
Second problem :

unit Unit1;

{$mode objfpc}{$H+}

interface

uses
  Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls,
  ExtCtrls, Grids, Math;

type

  { TForm1 }

  TForm1 = class(TForm)
    StringGrid1: TStringGrid;
    Timer1: TTimer;
    procedure Timer1Timer(Sender: TObject);
  private
    { private declarations }
  public
    { public declarations }
    megosztas : array[1..1000000] of int64;
  end;

var
  Form1: TForm1;
  felhasznalo : integer = 1;

implementation

{$R *.lfm}

{ TForm1 }

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  if felhasznalo >= 1000000 then exit;
  felhasznalo := felhasznalo + 1;
  megosztas[felhasznalo] := randomrange(1, 1000000000);
  stringgrid1.RowCount:= felhasznalo + 1;
  stringgrid1.Cells[1, felhasznalo] := inttostr(megosztas[felhasznalo]);
end;

end.

Timer1.interval = 1000;
Work, but very slow in 32 bit.

howardpc

  • Hero Member
  • *****
  • Posts: 4144
Re: Lazarus 1.0.14 Release
« Reply #11 on: December 22, 2013, 11:31:17 am »
why not say List index of bound or else run or debug error?

If you enable range checks you would get such an error if you try to access an out-of-range array index (Projects->Project Options->Code Generation page)

Quote
Work, but very slow in 32 bit.
What is the point of a timer at all? It merely adds time-consuming baggage, and an unwanted timed interval of 1s before each cell value assignment.
Also you are setting the grid RowCount property repeatedly in each timer event.
Set the property once. The following code is almost instantaneous on my average-power computer
Code: [Select]
unit Unit1;

{$mode objfpc}{$H+}

interface

uses
  SysUtils, Forms, Grids, math;

const UpperLimit=1000000;

type

  { TForm1 }

  TForm1 = class(TForm)
    StringGrid1: TStringGrid;
    procedure FormCreate(Sender: TObject);
  private
    megosztas : array[0..UpperLimit] of int64;
    felhasznalo : integer;
  end;

var
  Form1: TForm1;

implementation

{$R *.lfm}

{ TForm1 }

procedure TForm1.FormCreate(Sender: TObject);
begin
  StringGrid1.ColCount:=1;
  stringgrid1.RowCount:= UpperLimit;
  felhasznalo:=0;
  while felhasznalo<UpperLimit do begin
    megosztas[felhasznalo]:=RandomRange(1, 1000000000);
    stringgrid1.Cells[0, felhasznalo] := inttostr(megosztas[felhasznalo]);
    Inc(felhasznalo);
  end;
end;

initialization
 Randomize;

end. 

sarok attila

  • Newbie
  • Posts: 3
Re: Lazarus 1.0.14 Release
« Reply #12 on: December 23, 2013, 04:30:13 pm »
I found a problem with free pascal.
Environment-> Editor -> Tab size 3.
And stand 8.
Next problem.
Begin
  Asm
    mov ax, 12;
    mov eax, 12;
  end;
end.

Unknown indentifier.
« Last Edit: December 23, 2013, 04:41:19 pm by sarok attila »

Leledumbo

  • Hero Member
  • *****
  • Posts: 8746
  • Programming + Glam Metal + Tae Kwon Do = Me
Re: Lazarus 1.0.14 Release
« Reply #13 on: December 23, 2013, 06:45:05 pm »
Quote
Environment-> Editor -> Tab size 3.
And stand 8.
Other settings like smart tab could affect this, please check other tab/space/indent related settings.
Quote
Next problem.
Begin
  Asm
    mov ax, 12;
    mov eax, 12;
  end;
end.

Unknown indentifier.
The default assembler reader is AT&T, not Intel which I believe you assume in your code. Add {$asmmode intel} before the asm code or activate respective switch in compiler options.

 

TinyPortal © 2005-2018