Re: [lazarus] French translation / WIndows Manifest

2008-01-08 Thread wile64
Apply r13664


-- 
Laurent.

My Components: http://wiki.lazarus.freepascal.org/Wile64
French Forum : http://lazforum-fr.tuxfamily.org/index.php


[lazarus] StdOut on Linux b0rked

2008-01-08 Thread A.J. Venter

Hi all,
I am having an immensely weird problem with newest lazarus (which was 
definitely not there before).
The problem affects only code that makes use of tprocess to get output 
from a shell-script and feed it back as a function result.
It is triggered whenever stdout of the main program is piped. Whether to 
a file with  or to a program with |
For some reason the output from tprocess is suddenly all messed up and 
ends up being random lines from my program's output.


This is rather disturbing as I have a large amount of debug info which 
gets constantly dumped to stdout to allow me to track the process of the 
program and identify problems with the implementation as it runs. But, 
should I try to log this data with a pipe, or to seek out a specific 
fragment with grep, suddenly the tprocess function gets completely 
confused and I end up with random strings from my own output dumped 
where the output of a shell-script is meant to be.


What could cause this ? A stack overflow in the tprocess ? Any idea 
where I should look ? Was something in tprocess changed recently ?


My tprocess code is almost exactly based on the examples in the tutorial 
on the lazarus wiki.


A.J.
--
Any sufficiently advanced technology is indistinguishable from magic - 
Clarke's law
Any technology that is distinguishable from magic is insufficiently 
advanced -Gehm's corollary
Any technologist that is distinguishable from a magician is 
insufficiently advanced - My corollary

The worlds worst webcomic: http://silentcoder.co.za/scartoonz
The worlds best cybercafe manager: http://outkafe.outkastsolutions.co.za

begin:vcard
fn:AJ Venter
n:Venter;AJ
org:Global Pact Trading Pty. Ltd.;OutKast Solutions
email;internet:[EMAIL PROTECTED]
title:Director of Product Development
tel;work:+27 21 554 5059
tel;fax:+27 11 252 9197
tel;cell:+27 83 455 9978
url:http://www.outkastsolutions.co.za
version:2.1
end:vcard



[lazarus] Changing LCL without rebuild Lazarus

2008-01-08 Thread Fabio Dell'Aria
Hi to all,

I'm working on some LCL changes.

To do this I have created some test projects but after every rebuild I see
that my projects continue to uses the .ppu unit (do not rebuild my modified
LCL sources).

How I can instruct Lazarus to rebuild modified LCL sources instead of
continue to use LCL .ppu files?

-- 
Best regards...

Fabio Dell'Aria.


[lazarus] SegV with GTk2/Windows

2008-01-08 Thread Damien Gerard


I have a strange SegV, and I don't really know if I make operations at  
the wrong place or it is more or less a bug with GTk2 under Windows.


Program received signal SIGSEGV, Segmentation fault.
0x0040bee9 in TOBJECT__INHERITSFROM (ACLASS=0x6314ec) at objpas.inc:404
404 objpas.inc: No such file or directory.
in objpas.inc
Current language:  auto; currently pascal
(gdb) bt
#0  0x0040bee9 in TOBJECT__INHERITSFROM (ACLASS=0x6314ec) at  
objpas.inc:404

#1  0x027eeac4 in ?? ()
#2  0x0040b923 in fpc_do_is (ACLASS=0x2b0530, AOBJECT=0xfeeefeee) at  
objpas.inc:38
#3  0x004839b9 in TDRAGPERFORMER__DRAGSTOP (ADROPPED=true,  
this=0x27eeac4) at dragmanager.inc:231
#4  0x004849da in TDRAGMANAGERDEFAULT__DRAGSTOP (ADROPPED=true,  
this=0x2b74b4)

at dragmanager.inc:627
#5  0x00484c1f in TDRAGMANAGERDEFAULT__MOUSEUP (BUTTON=MBLEFT,  
SHIFT=[SSLEFT], X=371, Y=224,

this=0x2b74b4) at dragmanager.inc:687
#6  0x0049a27b in TCONTROL__MOUSEUP (BUTTON=MBLEFT, SHIFT=[SSLEFT],  
X=114, Y=46, this=0x35c143c)

at control.inc:3180
#7  0x004668a3 in TCUSTOMTREEVIEW__MOUSEUP (BUTTON=MBLEFT,  
SHIFT=[SSLEFT], X=114, Y=46,

this=0x35c143c) at treeview.inc:4461
#8  0x00496fd2 in TCONTROL__DOMOUSEUP (MESSAGE=
  {MSG = 514, KEYS = 1, XPOS = 114, YPOS = 46, POS = {X = 114, Y  
= 46}, DUMMY = 3014770, RESULT

= 0}, BUTTON=MBLEFT, this=0x35c143c) at control.inc:1624
#9  0x0049774d in TCONTROL__WMLBUTTONUP (MESSAGE=
  {MSG = 514, KEYS = 1, XPOS = 114, YPOS = 46, POS = {X = 114, Y  
= 46}, DUMMY = 3014770, RESULT

= 0}, this=0x35c143c) at control.inc:1965
#10 0x0040bf99 in TOBJECT__DISPATCH (MESSAGE=void) at objpas.inc:463
#11 0x00497650 in TCONTROL__WMMBUTTONQUADCLK (MESSAGE=
  {MSG = 514, KEYS = 1, XPOS = 114, YPOS = 46, POS = {X = 114, Y  
= 46}, DUMMY = 3014770, RESULT

= 0}, this=0x35c143c) at control.inc:1933
#12 0x0048ed02 in TWINCONTROL__WNDPROC (MESSAGE=
  {MSG = 514, WPARAM = 1, LPARAM = 3014770, RESULT = 0, WPARAMLO  
= 1, WPARAMHI = 0, LPARAMLO = 1
14, LPARAMHI = 46, RESULTLO = 0, RESULTHI = 0}, this=0x35c143c) at  
wincontrol.inc:4689

#13 0x00464ad7 in TCUSTOMTREEVIEW__WNDPROC (MESSAGE=
  {MSG = 514, WPARAM = 1, LPARAM = 3014770, RESULT = 0, WPARAMLO  
= 1, WPARAMHI = 0, LPARAMLO = 1
14, LPARAMHI = 46, RESULTLO = 0, RESULTHI = 0}, this=0x35c143c) at  
treeview.inc:3819
#14 0x00523075 in DELIVERMESSAGE (TARGET=0x35c143c, AMESSAGE=void) at  
gtkproc.inc:3598
#15 0x0052cad3 in DELIVERMOUSEUPMESSAGE (WIDGET=0x27ce630,  
EVENT=0x360eb18, AWINCONTROL=0x35c143c)

at gtkcallback.inc:1727
#16 0x0052cbd7 in GTKMOUSEBTNRELEASE (WIDGET=0x27ce630,  
EVENT=0x360eb18, DATA=0x35c143c)

at gtkcallback.inc:1783
#17 0x6058c612 in ?? () from C:\Projects\pixie\client\src\pixie\libgtk- 
win32-2.0-0.dll

#18 0x027ce630 in ?? ()
#19 0x0360eb18 in ?? ()
#20 0x035c143c in ?? ()
#21 0x in ?? ()
(gdb)


Any Idea ?



--
Damien Gerard
[EMAIL PROTECTED]

Le temps n'a pas d'importance. Seul le code est important
   -- (f00ty)




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


Re: [lazarus] SegV with GTk2/Windows

2008-01-08 Thread Paul Ishenin

Damien Gerard wrote:


I have a strange SegV, and I don't really know if I make operations at 
the wrong place or it is more or less a bug with GTk2 under Windows.



[skip]

Any Idea ?


Yes, you are using some snapshot (released about week ago). Please 
update your lazarus.


Best regards,
Paul Ishenin.

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


Re: [lazarus] StdOut on Linux b0rked

2008-01-08 Thread Michael Van Canneyt


On Tue, 8 Jan 2008, A.J. Venter wrote:

 Hi all,
 I am having an immensely weird problem with newest lazarus (which was
 definitely not there before).
 The problem affects only code that makes use of tprocess to get output from a
 shell-script and feed it back as a function result.
 It is triggered whenever stdout of the main program is piped. Whether to a
 file with  or to a program with |
 For some reason the output from tprocess is suddenly all messed up and ends up
 being random lines from my program's output.
 
 This is rather disturbing as I have a large amount of debug info which gets
 constantly dumped to stdout to allow me to track the process of the program
 and identify problems with the implementation as it runs. But, should I try to
 log this data with a pipe, or to seek out a specific fragment with grep,
 suddenly the tprocess function gets completely confused and I end up with
 random strings from my own output dumped where the output of a shell-script is
 meant to be.
 
 What could cause this ? A stack overflow in the tprocess ? Any idea where I
 should look ? Was something in tprocess changed recently ?

Nothing was changed.
Can you please give some sample code? It's hard to say something in general.

Note that  or  | cannot be used unless you invoke the shell with a
commandline like
/bin/sh -c your command  yourfile

Michael.

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


Re: [lazarus] Changing LCL without rebuild Lazarus

2008-01-08 Thread A.J. Venter

Fabio Dell'Aria wrote:

Hi to all,

I'm working on some LCL changes.

To do this I have created some test projects but after every rebuild I 
see that my projects continue to uses the .ppu unit (do not rebuild my 
modified LCL sources).


How I can instruct Lazarus to rebuild modified LCL sources instead of 
continue to use LCL .ppu files?

Go into the tools menu, rebuild lazarus, and rebuild the lcl :)

A.J.
--
Any sufficiently advanced technology is indistinguishable from magic - 
Clarke's law
Any technology that is distinguishable from magic is insufficiently 
advanced -Gehm's corollary
Any technologist that is distinguishable from a magician is 
insufficiently advanced - My corollary

The worlds worst webcomic: http://silentcoder.co.za/scartoonz
The worlds best cybercafe manager: http://outkafe.outkastsolutions.co.za

begin:vcard
fn:AJ Venter
n:Venter;AJ
org:Global Pact Trading Pty. Ltd.;OutKast Solutions
email;internet:[EMAIL PROTECTED]
title:Director of Product Development
tel;work:+27 21 554 5059
tel;fax:+27 11 252 9197
tel;cell:+27 83 455 9978
url:http://www.outkastsolutions.co.za
version:2.1
end:vcard



Re: [lazarus] StdOut on Linux b0rked

2008-01-08 Thread A.J. Venter



Nothing was changed.
Can you please give some sample code? It's hard to say something in general.

Note that  or  | cannot be used unless you invoke the shell with a
commandline like
/bin/sh -c your command  yourfile


I mean when I launch the program myself on the commandline e.g.
./hawkstoneadmin | grep INSERT INTO

So the piping should, in theory, have no effect on this call:
function GetCanID:String
Var StrList: TStringList;
Begin
 execute ('/usr/bin/getcanid.sh',StrList)
 try
   GetCanID  = StrList[0];
 except
   GetCanID = 'UNSET';
end;

The execute procedure is defined as follows:

procedure execute (command:string; var output:Tstrings);
const
  READ_BYTES = 2048;

Var
 Process :Tprocess;
   MemStream : TMemoryStream;
  n: LongInt;
  BytesRead: LongInt;
begin
try
Process := TProcess.create(nil);;
 Process.CommandLine :=  command;



 {Actually run the thing and catch the output}
  MemStream := TMemoryStream.Create;
  outPut := TStringList.Create;
  BytesRead := 0;

Process.Options := [poUsePipes,poNoConsole];

  Process.Execute;

  while Process.Running do
  begin
// make sure we have room
MemStream.SetSize(BytesRead + READ_BYTES);

// try reading it
n := Process.Output.Read((MemStream.Memory + BytesRead)^, READ_BYTES);
if n  0
then begin
  Inc(BytesRead, n);
end
else begin
  // no data, wait 100 ms
  Sleep(100);
end;
  end;
  // read last part
  repeat
// make sure we have room
MemStream.SetSize(BytesRead + READ_BYTES);
// try reading it
n := Process.Output.Read((MemStream.Memory + BytesRead)^, READ_BYTES);
if n  0
then begin
  Inc(BytesRead, n);
end;
  until n = 0;
  MemStream.SetSize(BytesRead);
  OutPut.LoadFromStream(MemStream);
  MemStream.Free;
 Process.Free;
except
  debugln('Could not execute: '+Command);
end;
end;

--
Any sufficiently advanced technology is indistinguishable from magic - 
Clarke's law
Any technology that is distinguishable from magic is insufficiently 
advanced -Gehm's corollary
Any technologist that is distinguishable from a magician is 
insufficiently advanced - My corollary

The worlds worst webcomic: http://silentcoder.co.za/scartoonz
The worlds best cybercafe manager: http://outkafe.outkastsolutions.co.za

begin:vcard
fn:AJ Venter
n:Venter;AJ
org:Global Pact Trading Pty. Ltd.;OutKast Solutions
email;internet:[EMAIL PROTECTED]
title:Director of Product Development
tel;work:+27 21 554 5059
tel;fax:+27 11 252 9197
tel;cell:+27 83 455 9978
url:http://www.outkastsolutions.co.za
version:2.1
end:vcard



[lazarus] Question about packages and units

2008-01-08 Thread Joost van der Sluis
Hi al,

If you install the fpWeb package, create a new cgi-application with a
TFPWebModule. You can drop a THTMLEntityProducer on that module. So far
so good. Then you can add an OnWritePage event, but thereafter the
program will nog compile anymore, because you have to add the
'htmlwriter' unit to your uses clause manually.

Question is: how can I do this automatically? Thus that when you drop a
THTMLEntityProducer on a module, add the 'htmlwriter' unit
automatically?

Joost.

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


Re: [lazarus] SegV with GTk2/Windows

2008-01-08 Thread Damien Gerard


On Jan 8, 2008, at 12:41 PM, Paul Ishenin wrote:


Damien Gerard wrote:


I have a strange SegV, and I don't really know if I make operations  
at the wrong place or it is more or less a bug with GTk2 under  
Windows.



[skip]

Any Idea ?


Yes, you are using some snapshot (released about week ago). Please  
update your lazarus.




I used the following one : Lazarus-0.9.25-fpc-2.2.1-20080105-win32.exe
All right I will use the 08 with fpc 2.2.0.


Best regards,
Paul Ishenin.




--
Damien Gerard
[EMAIL PROTECTED]

Le temps n'a pas d'importance. Seul le code est important
   -- (f00ty)




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


Re: [lazarus] Question about packages and units

2008-01-08 Thread Mattias Gärtner
Zitat von Joost van der Sluis [EMAIL PROTECTED]:

 Hi al,

 If you install the fpWeb package, create a new cgi-application with a
 TFPWebModule. You can drop a THTMLEntityProducer on that module. So far
 so good. Then you can add an OnWritePage event, but thereafter the
 program will nog compile anymore, because you have to add the
 'htmlwriter' unit to your uses clause manually.

 Question is: how can I do this automatically? Thus that when you drop a
 THTMLEntityProducer on a module, add the 'htmlwriter' unit
 automatically?

The IDE should do this automatically. What package installs THTMLEntityProducer?


Mattias

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


Re: [lazarus] regex-dna benchmark

2008-01-08 Thread Marco van de Voort
On Mon, Jan 07, 2008 at 06:37:08PM +0100, willem wrote:
 I have a wiki site about google android.
 It  covers also the topic of lazarus and free pascal.
 My visitors are interested in benchmark as my ranking.
 
 A partical interesting benchmark is the free pas rex-dna benchmark.
 
 Does one of the developers have more information of this benchmark ?

Afaik that mostly tests a regex library, not a compiler. The benchmarks are
used in the so called language shootout

Note that the ranking for this benchmark

http://shootout.alioth.debian.org/gp4/benchmark.php?test=regexdnalang=all

looks nothing like the overall order (determined with all benchmarks):

http://shootout.alioth.debian.org/gp4/benchmark.php?test=alllang=all

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


Re: [lazarus] Question about packages and units

2008-01-08 Thread Joost van der Sluis
Op dinsdag 08-01-2008 om 14:14 uur [tijdzone +0100], schreef Mattias
Gärtner:
 Zitat von Joost van der Sluis [EMAIL PROTECTED]:
 
  Hi al,
 
  If you install the fpWeb package, create a new cgi-application with a
  TFPWebModule. You can drop a THTMLEntityProducer on that module. So far
  so good. Then you can add an OnWritePage event, but thereafter the
  program will nog compile anymore, because you have to add the
  'htmlwriter' unit to your uses clause manually.
 
  Question is: how can I do this automatically? Thus that when you drop a
  THTMLEntityProducer on a module, add the 'htmlwriter' unit
  automatically?
 
 The IDE should do this automatically. What package installs 
 THTMLEntityProducer?

components/fpweb/weblaz.lpk

Joost


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


Re: [lazarus] Latest svn fails to compile.

2008-01-08 Thread Giuliano Colla

Paul Ishenin ha scritto:

Giuliano Colla пишет:

Latest svn (r 13667) fails to compile (Linux - fpc 2.0.4).
Unit lcl/ldocktree.pas complains that InflateRect is undefined. Adding 
LCLIntf to the uses clauses fixes the problem.

InflateRect is defined in types.pas of fpc 2.2.0



That's why I specified that the problem is fpc 2.0.4 specific.
Unless the LCLIntf implementation is broken, adding the uses clause 
keeps fpc 2.0.4 compatibility.
Mattias said that 2.0.4 must be still supported, because 2.2.0 doesn't 
run (yet) in some platforms.


Regards,

Giuliano


--
Giuliano Colla

Whenever people agree with me, I always feel I must be wrong (O. Wilde)

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


[lazarus] Latest svn fails to compile.

2008-01-08 Thread Giuliano Colla

Latest svn (r 13667) fails to compile (Linux - fpc 2.0.4).
Unit lcl/ldocktree.pas complains that InflateRect is undefined. Adding 
LCLIntf to the uses clauses fixes the problem.


Regards,

Giuliano

--
Giuliano Colla

Whenever people agree with me, I always feel I must be wrong (O. Wilde)

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


[lazarus] Dialog window in Init Final Section

2008-01-08 Thread SteveG
Anybody know of a cross platform way of showing a message dialog within 
the Initialization and/or Finalization of a unit ?


What I am after is an alert message if a dll fails to load / unload in 
the Init / Final section of the main unit. (GUI app)


Cant use ShowMessage as message loop not running yet (?), and writeln 
wont be seen if started from shortcut.


Thanks
SteveG

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


Re: [lazarus] StdOut on Linux b0rked

2008-01-08 Thread Vincent Snijders

A.J. Venter schreef:



Nothing was changed.
Can you please give some sample code? It's hard to say something in 
general.


Note that  or  | cannot be used unless you invoke the shell with a
commandline like
/bin/sh -c your command  yourfile


I mean when I launch the program myself on the commandline e.g.
./hawkstoneadmin | grep INSERT INTO

So the piping should, in theory, have no effect on this call:
function GetCanID:String
Var StrList: TStringList;
Begin
 execute ('/usr/bin/getcanid.sh',StrList)


is '/usr/bin/getcanid.sh' an executable? Maybe you should use something like:
'/bin/sh /usr/bin/getcanid.sh' ?

Vincent

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


Re: [lazarus] Latest svn fails to compile.

2008-01-08 Thread Paul Ishenin

Giuliano Colla пишет:

Latest svn (r 13667) fails to compile (Linux - fpc 2.0.4).
Unit lcl/ldocktree.pas complains that InflateRect is undefined. Adding 
LCLIntf to the uses clauses fixes the problem.

InflateRect is defined in types.pas of fpc 2.2.0

Best regards,
Paul Ishenin.

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


Re: [lazarus] StdOut on Linux b0rked

2008-01-08 Thread Michael Van Canneyt


On Tue, 8 Jan 2008, Vincent Snijders wrote:

 A.J. Venter schreef:
  
   Nothing was changed.
   Can you please give some sample code? It's hard to say something in
   general.
  
   Note that  or  | cannot be used unless you invoke the shell with a
   commandline like
   /bin/sh -c your command  yourfile
  
  I mean when I launch the program myself on the commandline e.g.
  ./hawkstoneadmin | grep INSERT INTO
  
  So the piping should, in theory, have no effect on this call:
  function GetCanID:String
  Var StrList: TStringList;
  Begin
   execute ('/usr/bin/getcanid.sh',StrList)
 
 is '/usr/bin/getcanid.sh' an executable? Maybe you should use something like:
 '/bin/sh /usr/bin/getcanid.sh' ?

Even so, we don't know what happens inside getcanid.sh, and even less about
hawkstoneadmin: if it expects a terminal or not. Maybe it expects std input
to be available and whatnot.

Michael.

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


Re: [lazarus] Latest svn fails to compile.

2008-01-08 Thread Paul Ishenin

Giuliano Colla wrote:

Paul Ishenin ha scritto:

Giuliano Colla пишет:

Latest svn (r 13667) fails to compile (Linux - fpc 2.0.4).
Unit lcl/ldocktree.pas complains that InflateRect is undefined. 
Adding LCLIntf to the uses clauses fixes the problem.

InflateRect is defined in types.pas of fpc 2.2.0



That's why I specified that the problem is fpc 2.0.4 specific.
Unless the LCLIntf implementation is broken, adding the uses clause 
keeps fpc 2.0.4 compatibility.
Mattias said that 2.0.4 must be still supported, because 2.2.0 doesn't 
run (yet) in some platforms.

Since fix is very easy I will not persist too much. Applied in 13668.

Best regards,
Paul Ishenin.

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


Re: [lazarus] Latest svn fails to compile.

2008-01-08 Thread Vincent Snijders

Paul Ishenin schreef:

Giuliano Colla wrote:

Paul Ishenin ha scritto:

Giuliano Colla пишет:

Latest svn (r 13667) fails to compile (Linux - fpc 2.0.4).
Unit lcl/ldocktree.pas complains that InflateRect is undefined. 
Adding LCLIntf to the uses clauses fixes the problem.

InflateRect is defined in types.pas of fpc 2.2.0



That's why I specified that the problem is fpc 2.0.4 specific.
Unless the LCLIntf implementation is broken, adding the uses clause 
keeps fpc 2.0.4 compatibility.
Mattias said that 2.0.4 must be still supported, because 2.2.0 doesn't 
run (yet) in some platforms.

Since fix is very easy I will not persist too much. Applied in 13668.



Maybe it is better to wrap it in {$IFDEF VER2_0}...{$ENDIF}, so we can find it 
easier after the 2.2.2 release.


Vincent

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


Re: [lazarus] Question about packages and units

2008-01-08 Thread Joost van der Sluis
Op dinsdag 08-01-2008 om 14:29 uur [tijdzone +0100], schreef Joost van
der Sluis:
 Op dinsdag 08-01-2008 om 14:14 uur [tijdzone +0100], schreef Mattias
 Gärtner:
  Zitat von Joost van der Sluis [EMAIL PROTECTED]:
  
   Hi al,
  
   If you install the fpWeb package, create a new cgi-application with a
   TFPWebModule. You can drop a THTMLEntityProducer on that module. So far
   so good. Then you can add an OnWritePage event, but thereafter the
   program will nog compile anymore, because you have to add the
   'htmlwriter' unit to your uses clause manually.
  
   Question is: how can I do this automatically? Thus that when you drop a
   THTMLEntityProducer on a module, add the 'htmlwriter' unit
   automatically?
  
  The IDE should do this automatically. What package installs 
  THTMLEntityProducer?
 
 components/fpweb/weblaz.lpk

Well, it is.

Here with me, locally... 

I thought that I already send in the patch to add it to Lazarus. Seems
like I didn't. Attached is the patch. The THTMLEntityProducer is only
for fpc 2.2.3 and above so I added some ifdefs for fpr 2.0.4 and 2.2.0.

Joost.


Index: weblazideintf.pp
===
--- weblazideintf.pp	(revision 13658)
+++ weblazideintf.pp	(working copy)
@@ -96,7 +96,9 @@
 begin
   RegisterComponents(fpWebTab,[THTMLDatasetContentProducer,
THTMLSelectProducer,
-   THTMLDatasetSelectProducer])
+   THTMLDatasetSelectProducer
+   {$IFNDEF VER2_0}{$IFNDEF VER2_2_0},THTMLEntityProducer{$ENDIF}{$ENDIF}
+   ])
 
 end;
 


[lazarus] ScrollBox scrolling problem situation

2008-01-08 Thread Andrey Gusev
Can somebody comments situation with ScrollBox scrolling Win32 wrong 
implementation ?


I have in view of
http://bugs.freepascal.org/view.php?id=10471,
http://bugs.freepascal.org/view.php?id=10400
issues, that still actual on svn 13339.

More concrete: where and how much deeply to dig, to fix that problem ?

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


[lazarus] ScrollBox scrolling problem situation

2008-01-08 Thread Andrey Gusev

* Andrey Gusev [EMAIL PROTECTED] [Tue, 08 Jan 2008 20:53:48 +0300]:

Can somebody comments situation with ScrollBox scrolling Win32 wrong
implementation ?

I have in view of
http://bugs.freepascal.org/view.php?id=10471,
http://bugs.freepascal.org/view.php?id=10400
issues, that still actual on svn 13339.


13669, mistyped



More concrete: where and how much deeply to dig, to fix that problem ?


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


Re: [lazarus] Changing LCL without rebuild Lazarus

2008-01-08 Thread Mattias Gaertner
On Tue, 08 Jan 2008 14:08:05 +0200
A.J. Venter [EMAIL PROTECTED] wrote:

 Fabio Dell'Aria wrote:
  Hi to all,
  
  I'm working on some LCL changes.
  
  To do this I have created some test projects but after every
  rebuild I see that my projects continue to uses the .ppu unit (do
  not rebuild my modified LCL sources).
  
  How I can instruct Lazarus to rebuild modified LCL sources instead
  of continue to use LCL .ppu files?
 Go into the tools menu, rebuild lazarus, and rebuild the lcl :)

You can set shortcuts for building lazarus in the editor options /
keymapping.

Mattias

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


[lazarus] OFF: TDBMemo + Firebird (UIB+FBDataset) = READ ONLY

2008-01-08 Thread Osvaldo TC Filho
did is TDBMemo ok with fields blob type 1 of firebird 2.0? It is ever
read only here!

Environment:
Lazarus 0.9.25 svn
GTK2
Ubuntu 7.10
UIB + TFBdataset

Thanks for all

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


Re: [lazarus] ScrollBox scrolling problem situation

2008-01-08 Thread Mattias Gaertner
On Tue, 08 Jan 2008 20:55:59 +0300
Andrey Gusev [EMAIL PROTECTED] wrote:

 * Andrey Gusev [EMAIL PROTECTED] [Tue, 08 Jan 2008 20:53:48 +0300]:
  Can somebody comments situation with ScrollBox scrolling Win32 wrong
  implementation ?
 
  I have in view of
  http://bugs.freepascal.org/view.php?id=10471,
  http://bugs.freepascal.org/view.php?id=10400
  issues, that still actual on svn 13339.
 
 13669, mistyped
 
 
  More concrete: where and how much deeply to dig, to fix that
  problem ?

The problem is, that at the moment the win32 interface moves the childs
instead of moving the client area. This operation is not atomic, that
means, each child move creates messages. It is nearly impossible to
make this operation atomic platform independently. That's why instead
all widgetsets should instead move the 'client area'. This means the
childs should be put on an internal widget - the 'client area widget'.
Scrolling means then to simply move the client area widget.
So, it is needed that TWin32WSScrollingWinControl creates an internal
widget and put its childs on this widget. That's all.
The winapi part is not hard. The hardest part is to understand the
win32 interface and fix all places, where this might be relevant.

AFAIK the other widgetsets already use an internal client area widget.

Mattias

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


Re: [lazarus] Latest svn fails to compile.

2008-01-08 Thread Mattias Gaertner
On Tue, 08 Jan 2008 16:19:27 +0100
Vincent Snijders [EMAIL PROTECTED] wrote:

 Paul Ishenin schreef:
  Giuliano Colla wrote:
  Paul Ishenin ha scritto:
  Giuliano Colla пишет:
  Latest svn (r 13667) fails to compile (Linux - fpc 2.0.4).
  Unit lcl/ldocktree.pas complains that InflateRect is undefined. 
  Adding LCLIntf to the uses clauses fixes the problem.
  InflateRect is defined in types.pas of fpc 2.2.0
 
 
  That's why I specified that the problem is fpc 2.0.4 specific.
  Unless the LCLIntf implementation is broken, adding the uses
  clause keeps fpc 2.0.4 compatibility.
  Mattias said that 2.0.4 must be still supported, because 2.2.0
  doesn't run (yet) in some platforms.
  Since fix is very easy I will not persist too much. Applied in
  13668.
  
 
 Maybe it is better to wrap it in {$IFDEF VER2_0}...{$ENDIF}, so we
 can find it easier after the 2.2.2 release.

Done in 13674

Mattias

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


Re: [lazarus] Question about packages and units

2008-01-08 Thread Mattias Gaertner
On Tue, 08 Jan 2008 16:39:16 +0100
Joost van der Sluis [EMAIL PROTECTED] wrote:

 Op dinsdag 08-01-2008 om 14:29 uur [tijdzone +0100], schreef Joost van
 der Sluis:
  Op dinsdag 08-01-2008 om 14:14 uur [tijdzone +0100], schreef Mattias
  Gärtner:
   Zitat von Joost van der Sluis [EMAIL PROTECTED]:
   
Hi al,
   
If you install the fpWeb package, create a new cgi-application
with a TFPWebModule. You can drop a THTMLEntityProducer on that
module. So far so good. Then you can add an OnWritePage event,
but thereafter the program will nog compile anymore, because
you have to add the 'htmlwriter' unit to your uses clause
manually.
   
Question is: how can I do this automatically? Thus that when
you drop a THTMLEntityProducer on a module, add the
'htmlwriter' unit automatically?
   
   The IDE should do this automatically. What package installs
   THTMLEntityProducer?
  
  components/fpweb/weblaz.lpk
 
 Well, it is.
 
 Here with me, locally... 
 
 I thought that I already send in the patch to add it to Lazarus. Seems
 like I didn't. Attached is the patch. The THTMLEntityProducer is only
 for fpc 2.2.3 and above so I added some ifdefs for fpr 2.0.4 and
 2.2.0.

Thanks. Added.


Mattias

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


Re: [lazarus] Question about packages and units

2008-01-08 Thread Mattias Gaertner
On Tue, 08 Jan 2008 14:29:39 +0100
Joost van der Sluis [EMAIL PROTECTED] wrote:

 Op dinsdag 08-01-2008 om 14:14 uur [tijdzone +0100], schreef Mattias
 Gärtner:
  Zitat von Joost van der Sluis [EMAIL PROTECTED]:
  
   Hi al,
  
   If you install the fpWeb package, create a new cgi-application
   with a TFPWebModule. You can drop a THTMLEntityProducer on that
   module. So far so good. Then you can add an OnWritePage event,
   but thereafter the program will nog compile anymore, because you
   have to add the 'htmlwriter' unit to your uses clause manually.
  
   Question is: how can I do this automatically? Thus that when you
   drop a THTMLEntityProducer on a module, add the 'htmlwriter' unit
   automatically?
  
  The IDE should do this automatically. What package installs
  THTMLEntityProducer?
 
 components/fpweb/weblaz.lpk

Sorry. I forgot. I did not yet implement that part. ;)

http://bugs.freepascal.org/view.php?id=10594

Mattias

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


Re: [lazarus] StdOut on Linux b0rked

2008-01-08 Thread A.J. Venter

Vincent Snijders wrote:

A.J. Venter schreef:



Nothing was changed.
Can you please give some sample code? It's hard to say something in 
general.


Note that  or  | cannot be used unless you invoke the shell with a
commandline like
/bin/sh -c your command  yourfile


I mean when I launch the program myself on the commandline e.g.
./hawkstoneadmin | grep INSERT INTO

So the piping should, in theory, have no effect on this call:
function GetCanID:String
Var StrList: TStringList;
Begin
 execute ('/usr/bin/getcanid.sh',StrList)


is '/usr/bin/getcanid.sh' an executable? Maybe you should use something 
like:

'/bin/sh /usr/bin/getcanid.sh' ?

Aye it is, I wrote it myself.
And the bangpath is correct as well.

A.J.

--
Any sufficiently advanced technology is indistinguishable from magic - 
Clarke's law
Any technology that is distinguishable from magic is insufficiently 
advanced -Gehm's corollary
Any technologist that is distinguishable from a magician is 
insufficiently advanced - My corollary

The worlds worst webcomic: http://silentcoder.co.za/scartoonz
The worlds best cybercafe manager: http://outkafe.outkastsolutions.co.za

begin:vcard
fn:AJ Venter
n:Venter;AJ
org:Global Pact Trading Pty. Ltd.;OutKast Solutions
email;internet:[EMAIL PROTECTED]
title:Director of Product Development
tel;work:+27 21 554 5059
tel;fax:+27 11 252 9197
tel;cell:+27 83 455 9978
url:http://www.outkastsolutions.co.za
version:2.1
end:vcard



Re: [lazarus] StdOut on Linux b0rked

2008-01-08 Thread A.J. Venter

Well getcanid.sh is very simple:

#!/bin/sh
IP=`/sbin/route | grep default | awk '{print $2}'`
FALLBACK=x.x.x.x.
URIPATH=cgi-bin/getunitinformation.cgi
if ! IDLINE=`wget -O - http://$IP/$URIPATH; 2/dev/null | grep 
UNITID` ; then
if ! IDLINE=`wget -O - http://$FALLBACK/$URIPATH; 2/dev/null| 
grep UNITID 2/dev/null` ; then

IDLINE=UNITID=test
fi
fi
UNITID=`echo $IDLINE | awk -F = '{print $2}'`
echo $UNITID
---

HawkstoneAdmin is just a standard graphical linux application, it never 
uses stdin as far as I know. It does however make extensive use of unit 
postgres. I don't know if this could be affecting it.


A.J.




--
Any sufficiently advanced technology is indistinguishable from magic - 
Clarke's law
Any technology that is distinguishable from magic is insufficiently 
advanced -Gehm's corollary
Any technologist that is distinguishable from a magician is 
insufficiently advanced - My corollary

The worlds worst webcomic: http://silentcoder.co.za/scartoonz
The worlds best cybercafe manager: http://outkafe.outkastsolutions.co.za

begin:vcard
fn:AJ Venter
n:Venter;AJ
org:Global Pact Trading Pty. Ltd.;OutKast Solutions
email;internet:[EMAIL PROTECTED]
title:Director of Product Development
tel;work:+27 21 554 5059
tel;fax:+27 11 252 9197
tel;cell:+27 83 455 9978
url:http://www.outkastsolutions.co.za
version:2.1
end:vcard