Re: [Lazarus] HEADS UP: FPC 3.0.1 stable branched off.

2015-01-10 Thread Mark Morgan Lloyd

Mark Morgan Lloyd wrote:

Lazarus trunk at about 47318 is OK with FPC 2.7.1 29398 on SPARC using 
Debian Lenny,


Same combination on a PPC Mac raises an exception as below when the IDE 
is told to Tools - Options.


TApplication.HandleException Error reading 
ComponentsListView.Items.LazData: Stream read error

  Stack trace:
  $10118410  TREADER__READPROPERTY,  line 1279 of 
/usr/local/src/fpc/fpc-trunk/rtl/objpas/classes/reader.inc


Apart from that and the blank toolbar issue it appears OK. Does anybody 
want me to get a backtrace and raise a bug?


--
Mark Morgan Lloyd
markMLl .AT. telemetry.co .DOT. uk

[Opinions above are the author's, not those of his employers or colleagues]

--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus


Re: [Lazarus] HEADS UP: FPC 3.0.1 stable branched off.

2015-01-10 Thread Sergei Gorelkin

10.01.2015 16:39, Mattias Gaertner пишет:

On Sat, 10 Jan 2015 12:49:04 +
Mark Morgan Lloyd markmll.laza...@telemetry.co.uk wrote:


Mark Morgan Lloyd wrote:


Lazarus trunk at about 47318 is OK with FPC 2.7.1 29398 on SPARC using
Debian Lenny,


Same combination on a PPC Mac raises an exception as below when the IDE
is told to Tools - Options.

TApplication.HandleException Error reading
ComponentsListView.Items.LazData: Stream read error
Stack trace:
$10118410  TREADER__READPROPERTY,  line 1279 of
/usr/local/src/fpc/fpc-trunk/rtl/objpas/classes/reader.inc

Apart from that and the blank toolbar issue it appears OK. Does anybody
want me to get a backtrace and raise a bug?


TListItems.ReadLazData reads a TLazItemInfo, which is a record:

   TLazItemInfo = record // packing is not needed and not wanted
 ImageIndex: Integer;
 StateIndex: Integer;
 OverlayIndex: Integer;
 SubItemCount: Integer;
   end;

Without packed the layout depends on the platform. But the stream
should be streamed the same on all platforms. So it needs packed.
OTOH someone added a comment that it is not wanted.

Has someone an idea why packed is is not needed and not wanted?


AFAIK such record has the same layout on 32 and 64 bit targets, at least when
{$packrecords c} is in effect. But writing it directly to stream is incorrect anyway because you'll 
get different data on big and little-endian targets.


Regards,
Sergei


--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus


Re: [Lazarus] HEADS UP: FPC 3.0.1 stable branched off.

2015-01-10 Thread zeljko

On 01/10/2015 02:39 PM, Mattias Gaertner wrote:

On Sat, 10 Jan 2015 12:49:04 +
Mark Morgan Lloyd markmll.laza...@telemetry.co.uk wrote:


Mark Morgan Lloyd wrote:


Lazarus trunk at about 47318 is OK with FPC 2.7.1 29398 on SPARC using
Debian Lenny,


Same combination on a PPC Mac raises an exception as below when the IDE
is told to Tools - Options.

TApplication.HandleException Error reading
ComponentsListView.Items.LazData: Stream read error
Stack trace:
$10118410  TREADER__READPROPERTY,  line 1279 of
/usr/local/src/fpc/fpc-trunk/rtl/objpas/classes/reader.inc

Apart from that and the blank toolbar issue it appears OK. Does anybody
want me to get a backtrace and raise a bug?


TListItems.ReadLazData reads a TLazItemInfo, which is a record:

   TLazItemInfo = record // packing is not needed and not wanted
 ImageIndex: Integer;
 StateIndex: Integer;
 OverlayIndex: Integer;
 SubItemCount: Integer;
   end;

Without packed the layout depends on the platform. But the stream
should be streamed the same on all platforms. So it needs packed.
OTOH someone added a comment that it is not wanted.

Has someone an idea why packed is is not needed and not wanted?


Annotate that unit and see who wrote that ?

z.


--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus


Re: [Lazarus] HEADS UP: FPC 3.0.1 stable branched off.

2015-01-10 Thread Mattias Gaertner
On Sat, 10 Jan 2015 12:49:04 +
Mark Morgan Lloyd markmll.laza...@telemetry.co.uk wrote:

 Mark Morgan Lloyd wrote:
 
  Lazarus trunk at about 47318 is OK with FPC 2.7.1 29398 on SPARC using 
  Debian Lenny,
 
 Same combination on a PPC Mac raises an exception as below when the IDE 
 is told to Tools - Options.
 
 TApplication.HandleException Error reading 
 ComponentsListView.Items.LazData: Stream read error
Stack trace:
$10118410  TREADER__READPROPERTY,  line 1279 of 
 /usr/local/src/fpc/fpc-trunk/rtl/objpas/classes/reader.inc
 
 Apart from that and the blank toolbar issue it appears OK. Does anybody 
 want me to get a backtrace and raise a bug?

TListItems.ReadLazData reads a TLazItemInfo, which is a record:

  TLazItemInfo = record // packing is not needed and not wanted
ImageIndex: Integer;
StateIndex: Integer;
OverlayIndex: Integer;
SubItemCount: Integer;
  end;

Without packed the layout depends on the platform. But the stream
should be streamed the same on all platforms. So it needs packed.
OTOH someone added a comment that it is not wanted.

Has someone an idea why packed is is not needed and not wanted?

Mattias
 

--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus


Re: [Lazarus] fpspreadsheet 1.4 released

2015-01-10 Thread Михайло Падалка


I am glad to announce that a new version of fpspreadsheet, version 1.4,  
has been uploaded to  
https://sourceforge.net/projects/lazarus-ccr/files/FPSpreadsheet/. Here  
is a list of the main additions of the new release:  ..


This release is devoted to the late Reinier Olislagers (bigchimp,  
http://forum.lazarus.freepascal.org/index.php/topic,26726), one of the  
former maintainers of the package.


Wow, big thanks for a nice release!
Will test new features when time allows...

--
За використання клієнта електронної пошти Opera: http://www.opera.com/mail/--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus


Re: [Lazarus] TMPlayerControl

2015-01-10 Thread Andrew Haines

On 01/06/2015 08:35 AM, Michael Thompson wrote:
On 6 January 2015 at 17:48, Philippe phili...@quarta.com.br 
mailto:phili...@quarta.com.br wrote:


 fs does not appear in http://wiki.freepascal.org/TMPlayerControl

Correct.  -fs is an input parameter to mplayer.  These aren't 
explicitly covered in the wiki as mplayer documentation covers them 
elsewhere.


 And my question is still about TMPlayerControl, not with MPlayer ...

Well, TMPlayerControl is only a thin wrapper over mplayer, so there's 
significant overlap.


However, to be clear TMPlayerControl does not support fullscreen.  
I've now confirmed your results, and simply adding -fs to StartParam 
is not sufficient.


If you're interested, it looks like the issue is down to the -wid 
parameter (which sets the display window handle).  If I comment out 
the two -wid lines in MPlayerCtrl.pas (line 665, 666), and insert -fs 
instead, then fullscreen works.


No easy workaround available I'm afraid.  Looks like a code change in 
MPlayerCtrl is required implementing a .FullScreen property.   
However, I still can't see how we'd toggle fullscreen, I can only see 
how to either start in FullScreen or in a Window.   And that caveat 
from the mplayer documentation would still hold - not all drivers are 
supported.


Patches welcome :-)




I played with this for a few minutes and came up with this:
MPlayerControl1.OnPlaying has to be assigned for 
MPlayerControl1.Position to work.


procedure TForm1.FullScreenCheckBoxChange(Sender: TObject);
var
  ScreenBounds: types.TRect;
  PlayerPosition: Single;
begin
  PlayerPosition := MPlayerControl1.Position;
  MPlayerControl1.Stop;

  if FullScreenCheckBox.Checked then
  begin
FSForm := TForm.Create(Self); //FSForm is a variable in TForm1
FSForm.BorderStyle:=bsNone;
FSForm.Color:=clBlack;
ScreenBounds := Screen.MonitorFromWindow(Handle).BoundsRect;
with ScreenBounds do
  FSForm.SetBounds(Left, Top, Right - Left, Bottom - Top);
FSForm.Visible:=True;

MPlayerControl1.Parent := FSForm;
  end
  else
  begin
MPlayerControl1.Parent := Self;
FSForm.Free;
  end;

  MPlayerControl1.Play;
  MPlayerControl1.Position := PlayerPosition;
end;

Andrew
--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus


Re: [Lazarus] Lazarus 1.2 not compiling with FPC 3.0.1

2015-01-10 Thread Anthony Walter
Oh, and here is an extra bit of information I neglected to mention. When I
use FPC 3.0.1 to compile against the trunk version of Lazarus, there are no
errors.

The point is, I think we should have a fixes version of Lazarus which can
build with the new fixes 3.0 version of FPC.
--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus


[Lazarus] Lazarus 1.2 not compiling with FPC 3.0.1

2015-01-10 Thread Anthony Walter
There was a recent announcement on the free pascal mailing list that a new
3.0 branch of the FPC was committed to svn.

I decided to checkout a copy of the branch and using it with the latest
official release of Lazarus, which I believe is 1.2.

The problem is I get errors when I make all on Lazarus 1.2.

Here are the svn repositories I checked out:

http://svn.freepascal.org/svn/fpc/branches/fixes_3_0
http://svn.freepascal.org/svn/lazarus/branches/fixes_1_2

Here is a listing of the make all output:

make -C packager/registration
make[1]: Entering directory
`/home/delluser/Development/Base/lazarus/packager/registration'
/bin/rm -f ../units/x86_64-linux/fcllaz.ppu
/home/delluser/Development/Base/fpc/bin/ppcx64 -MObjFPC -Scghi -O1 -g -gl
-vewnhi -l -Fu. -FE. -FU../units/x86_64-linux -Cg -dx86_64 fcllaz.pas
Hint: Start of reading config file
/home/delluser/Development/Base/fpc/bin/fpc.cfg
Hint: End of reading config file
/home/delluser/Development/Base/fpc/bin/fpc.cfg
Free Pascal Compiler version 3.0.1 [2015/01/10] for x86_64
Copyright (c) 1993-2015 by Florian Klaempfl and others
Target OS: Linux for x86-64
Compiling fcllaz.pas
fcllaz.pas(10,16) Hint: Unit db not used in fcllaz
fcllaz.pas(10,40) Hint: Unit eventlog not used in fcllaz
fcllaz.pas(10,50) Hint: Unit XMLConf not used in fcllaz
21 lines compiled, 0.1 sec
5 hint(s) issued
/bin/cp -f Makefile.compiled ../units/x86_64-linux/FCL.compiled
make[1]: Leaving directory
`/home/delluser/Development/Base/lazarus/packager/registration'
make -C components/lazutils
make[1]: Entering directory
`/home/delluser/Development/Base/lazarus/components/lazutils'
/bin/rm -f lib/x86_64-linux/lazutils.ppu
/home/delluser/Development/Base/fpc/bin/ppcx64 -MObjFPC -Scghi -O1 -g -gl
-vewnhi -l -Fu../../packager/units/x86_64-linux -Fu. -FE.
-FUlib/x86_64-linux -Cg -dx86_64 lazutils.pas
Hint: Start of reading config file
/home/delluser/Development/Base/fpc/bin/fpc.cfg
Hint: End of reading config file
/home/delluser/Development/Base/fpc/bin/fpc.cfg
Free Pascal Compiler version 3.0.1 [2015/01/10] for x86_64
Copyright (c) 1993-2015 by Florian Klaempfl and others
Target OS: Linux for x86-64
Compiling lazutils.pas
Compiling paswstring.pas
paswstring.pas(379,43) Error: Incompatible types: got address of
procedure(PWideChar;var AnsiString;Int64);Register expected
TUnicodeStringManager.procedure variable type of procedure(PWideChar;var
RawByteString;Word;Int64);Register
paswstring.pas(380,43) Error: Incompatible types: got address of
procedure(PChar;var WideString;Int64);Register expected
TUnicodeStringManager.procedure variable type of procedure(PChar;Word;var
WideString;Int64);Register
paswstring.pas(418,46) Error: Incompatible types: got address of
procedure(PWideChar;var AnsiString;Int64);Register expected
TUnicodeStringManager.procedure variable type of
procedure(PUnicodeChar;var RawByteString;Word;Int64);Register
paswstring.pas(419,46) Error: Incompatible types: got address of
procedure(PChar;var UnicodeString;Int64);Register expected
TUnicodeStringManager.procedure variable type of procedure(PChar;Word;var
UnicodeString;Int64);Register
paswstring.pas(433) Fatal: There were 4 errors compiling module, stopping
Fatal: Compilation aborted
make[1]: Leaving directory
`/home/delluser/Development/Base/lazarus/components/lazutils'
--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus