Free Pascal/Lazarus Bug Tracker - Issues

0024449: Interfaces in records are not initialized properly

Tue, 21 May 2013 00:59:38 +0200

If you have a record with an interface in a private section, it sometimes will not be properly initialized. Records of this type which are returned from functions or are local variables sometimes will reference a garbage interface pointer. Attempts to set the value of the interface can cause a segment fault as the compiler generates code to release a interface referencing garbage.

I marked the issue as major since I thought this kind of issue (managed types slipping through initialization) should never happen.

0022969: tpagecontol won't align client when embedded in another tpagecontrol

Mon, 20 May 2013 21:50:23 +0200

I am porting a delphi app where I have a tpagecontrol host another tpagecontrol in the first tabsheet, the tpagecontrol will not align to client, when I maximize the form the embedded tabsheet only goes half way.

This is on Kubuntu 12.04 using Lazarus 1.0 and QT widget set.

0015589: TOpenGLControl doesn't support QT

Mon, 20 May 2013 21:49:02 +0200

TOpenGLControl currently doesn't support the QT widgetset.
As far as I can see QT should already provide a QGLContext (which apparently isn't integrated into qt4pas yet).

0024456: Incorrect AsLongint processing in db.pas

Mon, 20 May 2013 21:45:20 +0200

Do not know why AsLongint (synonym of AsInteger) invoked. But if it exists, it should be supported.
In base class, we have
function TField.GetAsLongint: Longint;
begin
raise AccessError(SInteger);
end;
function TField.GetAsInteger: Integer;
begin
Result:=GetAsLongint;
end;

Obviously, in descendants GetAsLongint (only) should be overridden.
It is so in most cases. Bad exceptions - TBooleanField and TVariantField where only GetAsInteger overridden.

0024427: Memory leak in TFPCustomCanvas

Mon, 20 May 2013 18:20:08 +0200

When debugging the memory leak of TAChart reported in 0024296 I came across a memory leak in TFPCustomCanvas: In TFPCustomCanvas.SetClipRect (in fpcanvas.inc) a new clipping region is created and assigned to FClipRect. In the destructor of TFPCustomCanvas, however, FClipRect is not destroyed.

The attached patch calls FreeAndNil(FClipRect) in TFPCustomCanvas.Destroy.

0024438: [patch] add some missed constants for BSD from fcntl.h

Mon, 20 May 2013 17:31:44 +0200

added constants:
O_SHLOCK, O_EXLOCK, O_ASYNC, O_FSYNC, O_SYNC, O_FSYNC, O_NOFOLLOW, O_DIRECT
from fcntl.h for FreeBSD only (sorry, i do not check sources of other BSD OS)

0024452: Simple Application with one blank form, memory leak

Mon, 20 May 2013 16:13:13 +0200

1.new application(such as project1)
2.set projects options(WinCE ARM......), and enable -gh
3.build
4.copy to ARM-WinCE and run project1.exe
5.close form and quit the application
6.Heaptrc report 2unfree memory.

0023971: Height Component RX DBLookupComboBox nonstandard

Mon, 20 May 2013 16:08:46 +0200

All components have standard height 23 and RX Component DBLookupComboBox has the default value 27 and it is not possible to reduce this value is locked.
The coportamento this component is anyway?

0024341: TFPGMap.Find does not work correctly if not sorted

Mon, 20 May 2013 15:04:46 +0200

TFPGMap.Find miss some items if Sorted = False

See the attached example.

Only items with keys four and seven are found

0024455: [patch] [ide.lpk] : Allow use of ide.lpk package in IDE expert packages.

Mon, 20 May 2013 14:56:28 +0200

See summary.

0024454: [patch] [environmentopts.pp] : Prevent repopulating Recent project files menu with example projects if it was already cleared up

Mon, 20 May 2013 13:41:07 +0200

See summary and attached patch for more info.

0024443: Android example stopped working

Mon, 20 May 2013 11:12:55 +0200

Android example provided with Lazarus (examples\androidlcl) stopped working

0024453: problem with method arguments type syntax when nested generics type is in charge

Mon, 20 May 2013 11:03:05 +0200

When declare method arguments or result type and use inherited generic type, you have got compiler error. See comments in attached example.

0024036: It is not possible to rebuild Lazarus installed from deb package

Mon, 20 May 2013 02:54:33 +0200

When Lazarus is installed systemwide from the debs, its directory is by default unwritable by anybody but root. Therefore, it is not possible to rebuild it as a normal user, and since rebuilding Lazarus is an often needed operation this is problematic. Two most obvious workarounds are running Lazarus as root, or making its directory world writable, which both present bad practice from the security viewpoint. There is a third solution which is more correct, and could be implemented by the installscripts - make lazarus directory owned and writable by a group. The user which needs to rebuild Lazarus should then simply join that group and be able to do it. That option could be prompted for on install too.

0024436: ToolButtons are always highlighted

Mon, 20 May 2013 02:37:52 +0200

ToolButtons on TToolBar are always displayed highlighted. Property ToolBar.Flat is False.

Tested on GTK2 and Qt4.

0024174: [SynEdit] clean 5, remove some ifdef SYN_LAZARUS, FPC

Sun, 19 May 2013 20:03:58 +0200

SynEdit at line 4450 function WMDropFiles
I changed ifdef to comment
{TODO: DropFiles

SynEdit at line 7739, 7752
I removed {$IFDEF SYN_LAZARUS} but keep the hint to future
// ToDo DragAcceptFiles

SynEditTypes

0024451: ClientToScreen gives wrong result for Mirrored TWinControls

Sun, 19 May 2013 17:26:45 +0200

It looks like ClientToScreen gives wrong result for Mirrored TWinControls. I have attached a test file.

0024446: Custom images on TDBNavigator do not reflect disabled button states

Sun, 19 May 2013 16:19:23 +0200

NOTE: Issue in 1.1 but that's not available in Product Version dropdown

Now that we have an "almost offical" imagelist for the dbnavigator component:

The original glyphs change based on the active state of the navigator buttons - since there is no Disabled Images list (or some other mechanism) disabled glyphs do not seem to work with custom images.

0023954: FormatFloat bug or DefaultFormatSettings configuration?

Sun, 19 May 2013 03:03:25 +0200

Hello buddies,

On Delphi, I got:

WriteLn(FormatFloat(',0.00', 12345.55)); // Output: 12.345,55 - OK
WriteLn(FormatFloat(',0.00', 1234.55)); // Output: 1.234,55 - OK

But, on FPC (Windows):

WriteLn(FormatFloat(',0.00', 12345.55)); // Output: 12.345,55 - OK
WriteLn(FormatFloat(',0.00', 1234.55)); // Output: 1234,55 - Wrong

But on Linux, the FPC returns OK like Delphi.

So, this is a bug or I must configure DefaultFormatSettings?

My environment:

Lazarus 1.1 r40362 FPC 2.7.1 i386-win32-win32/win64

0014399: "Step Over" steps into method of an interface

Sun, 19 May 2013 02:59:23 +0200

When I debug an application that uses interfaces and I want to step over a call to a method of such an interface, the debugger always steps into them.

0024450: IDE freezes immediate after startup/opening project

Sun, 19 May 2013 00:35:40 +0200

When I start the IDE, it opens all(?) windows and then freezes. It doesn't happen with all projects though. When I kill Lazarus and restart, it asks me if I want to start with a new project. If I do so, the IDE freeze. (So it also happens with a new project)

When I start the IDE with a project which does not freeze the IDE, I can open a project that frezes the IDE at start.

When I attach gdb to Lazarus after a freeze and ask for a backtrace, the result is as follows:

(gdb) bt
#0 0x9cb73c22 in mach_msg_trap ()
0000001 0x9cb731f6 in mach_msg ()
0000002 0x9016d9da in __CFRunLoopServiceMachPort ()
0000003 0x90176b04 in __CFRunLoopRun ()
0000004 0x901761dc in CFRunLoopRunSpecific ()
0000005 0x90176088 in CFRunLoopRunInMode ()
0000006 0x910c8543 in RunCurrentEventLoopInMode ()
0000007 0x910cf8ab in ReceiveNextEventCommon ()
0000008 0x91265910 in ReceiveNextEventInMode ()
0000009 0x912659a8 in ReceiveNextEvent ()
0000010 0x001a6e49 in TCARBONWIDGETSET__APPWAITMESSAGE (this=0xc1201a0) at ./carbon/carbonobject.inc:671
0000011 0x0005cf8d in TAPPLICATION__IDLE (WAIT=true, this=0xb6bc310) at ./include/application.inc:411
0000012 0x00057ca4 in TCUSTOMFORM__SHOWMODAL (this=0x13b63350) at ./include/customform.inc:2916
0000013 0x002217e9 in TQUESTIONDLG__SHOWMODAL (this=0x13b63350) at ./include/promptdialog.inc:690
0000014 0x00221cf6 in SHOWQUESTIONDIALOG (ACAPTION=0xc078f0, AMSG=0x121f2bcc, DLGTYPE=256, BUTTONS=0x116b9160, HELPCTX=0)
at ./include/promptdialog.inc:808
0000015 0x000bc663 in TWIDGETSET__ASKUSER (DIALOGCAPTION=0xc078f0, DIALOGMESSAGE=0x121f2bcc, DIALOGTYPE=256, BUTTONS=0x116b9160, HELPCTX=0,
this=0xc1201a0) at ./include/intfbaselcl.inc:56
0000016 0x0022267b in QUESTIONDLG (ACAPTION=0xc078f0, AMSG=0x121f2bcc, DLGTYPE=MTWARNING, BUTTONS=0x116b9190, HELPCTX=0, highBUTTONS=3)
at ./include/promptdialog.inc:920
0000017 0x00222778 in QUESTIONDLG (ACAPTION=0xc078f0, AMSG=0x121f2bcc, DLGTYPE=MTWARNING, BUTTONS=0x116b8f50, HELPKEYWORD=0x0, highBUTTONS=3)
at ./include/promptdialog.inc:930
0000018 0x0007b4b7 in TMAINIDE__ONIDEQUESTIONDIALOG (ACAPTION=0xc078f0, AMSG=0x121f2bcc, DLGTYPE=MTWARNING, BUTTONS=0x116b8fb0,
HELPKEYWORD=0x0, highBUTTONS=3, this=0xc100260) at main.pp:3389
0000019 0x00075feb in ASKIFLOADLASTFAILINGPROJECT (parentfp=0xbffff7d8) at main.pp:2153
0000020 0x00075bc2 in TMAINIDE__SETUPSTARTPROJECT (this=0xc100260) at main.pp:2198
0000021 0x0007251b in TMAINIDE__STARTIDE (this=0xc100260) at main.pp:1466
0000022 0x00011aaf in PASCALMAIN () at lazarus.pp:109
0000023 0x0002f9b4 in SYSTEM_$$_FPC_SYSTEMMAIN$LONGINT$PPCHAR$PPCHAR ()
0000024 0x000118b9 in _start ()
0000025 0x000117d8 in start ()
(gdb)

0018929: [patch] Fixes to completion tool and FindContext for hidden methods

Sat, 18 May 2013 23:26:54 +0200

In case
TMyClass=class(TObject)
constructor Create(i: Integer);
end;
I hide TObject's parameter-less constructor and cannot write
TMyClass.Create; // will not compile
If I don't want to hide ancestor's constructor I must write
TMyClass=class(TObject)
constructor Create(i: Integer); overload;
end;
But codetools (IdentCompletion and FindContext) don't know about this.
So Ctrl+Space and Ctrl+Shift+Space show inaccessible methods (e.g. constructors)

0024192: Error with lazarus compiler.

Sat, 18 May 2013 14:28:22 +0200

FPC Version:

Working Copy Root Path: /home/jshand/fpc
URL: http://svn.freepascal.org/svn/fpc/trunk [^]
Repository Root: http://svn.freepascal.org/svn/fpc [^]
Repository UUID: 3ad0048d-3df7-0310-abae-a5850022a9f2
Revision: 24098
Node Kind: directory
Schedule: normal
Last Changed Author: sergei
Last Changed Rev: 24098
Last Changed Date: 2013-04-01 08:58:52 +1300 (Mon, 01 Apr 2013)

LAZARUS Version

Working Copy Root Path: /home/jshand/lazarus
URL: http://svn.freepascal.org/svn/lazarus/trunk [^]
Repository Root: http://svn.freepascal.org/svn/lazarus [^]
Repository UUID: 4005530d-fff6-0310-9dd1-cebe43e6787f
Revision: 40674
Node Kind: directory
Schedule: normal
Last Changed Author: mattias
Last Changed Rev: 40674
Last Changed Date: 2013-04-01 07:51:38 +1300 (Mon, 01 Apr 2013)

PROBLEM

After a restart of lazarus, you can run your project without any problems, however, when you try to run the project again you the error as displayed in the picture.

0022047: Feature request - TAnchorDockHeader.IsBeveled property

Sat, 18 May 2013 14:23:41 +0200

I feel that the bevel drawn around the docking header looks too "busy" in the IDE. Adding an option to enable / disable the drawing of this bevel would be nice. I have hacked a quick solution to do this, refer to attached diff.

I would appreciate it if this functionality could be added to the docking package.

0023896: Connot compile Lazarus

Sat, 18 May 2013 14:16:38 +0200

If I want compile the SVN Setup "Lazarus-1.1-40325-fpc-2.6.0-20130216-win32.exe" comes this error:

C:\lazarus\fpc\2.6.0\bin\i386-win32\make.exe: *** [cleanide] Error 255

With SVN 40217 was no error, with SVN 40312 comes the error.

Please, korrect the makefile and check the version from make.exe.