Re: [lazarus] Problem: /usr/bin/ld: cannot find -lglib

2006-06-27 Thread Andrew Higgs

Ramon Nogueira wrote:

Hi, I'm running lazarus 0.9.16 on Ubuntu 6.06 with FPC 2.0.2 installed
from RPMs with alien. Everything runs ok but when I try to build an
application (the default one that starts when Lazarus does), I get a
linker error:





Thanks in advance!

Ramon


Have you installed libglib1.2-dev? You will need this in order to compile.

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


Re: [lazarus] Problem: /usr/bin/ld: cannot find -lglib

2006-06-27 Thread Lord Satan
On Tue, 27 Jun 2006 18:58:02 +0200
Vincent Snijders <[EMAIL PROTECTED]> wrote:

> Ramon Nogueira wrote:
> > Hi, I'm running lazarus 0.9.16 on Ubuntu 6.06 with FPC 2.0.2 installed
> > from RPMs with alien. Everything runs ok but when I try to build an
> > application (the default one that starts when Lazarus does), I get a
> > linker error:
> > 
> > Free Pascal Compiler version 2.0.2 [2005/11/26] for i386
> > Copyright (c) 1993-2005 by Florian Klaempfl
> > Target OS: Linux for i386
> > Compiling /tmp/project1.lpr
> > Compiling unit1.pas
> > Linking /tmp/project1
> > /usr/bin/ld: cannot find -lglib
> > project1.lpr(17,1) Error: Error while linking
> > 
> > Am I missing a library or something? Do I need a specific version of
> > glib? Here is the output of
> > ls /usr/lib | grep glib:
> > glib-2.0
> > libavahi-glib.a
> > libavahi-glib.la
> > libavahi-glib.so
> > libavahi-glib.so.1
> > libavahi-glib.so.1.0.0
> > libdbus-glib-1.so.2
> > libdbus-glib-1.so.2.0.0
> > libglib-1.2.so.0
> > libglib-1.2.so.0.0.10
> > libglib-2.0.a
> > libglib-2.0.la
> > libglib-2.0.so
> > libglib-2.0.so.0
> > libglib-2.0.so.0.1000.3
> > libglibmm-2.4.so.1
> > libglibmm-2.4.so.1.0.24
> > libglibmm_generate_extra_defs-2.4.so.1
> > libglibmm_generate_extra_defs-2.4.so.1.0.24
> > libpoppler-glib.so.1
> > libpoppler-glib.so.1.0.0
> > 
> libglib-1.2.so  is missing. See also FAQ.
> 
I don't think that this is the problem as I don't have libglib-1.2.so but 
lazarus is working.
AFAIR if you use alien on the fpc RPM the newly created DEB does not install 
/etc/fpc.cfg, which causes the trouble.

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


[lazarus] MAIN FORM CORRUPTED.

2006-06-27 Thread Henrique de Paula Faria








I have a problem with lazarus 0.9.16beta IDE. After i
update from 0.9.15 to 16, the project iam working on had the main form
corrupted. The form file (.lfm) seems to have the six first lines removed:

 

ORIGINAL:

object frmPrincipal: TfrmPrincipal

  Left = 303

  Height = 415

  Top = 158

  Width = 630

  HorzScrollBar.Page = 632

  VertScrollBar.Page = 385

  ActiveControl = BitBtnViga

  BorderIcons = [biSystemMenu, biMinimize]

  BorderStyle = bsSingle

  Caption = 'PTE 0.01'

  ClientHeight = 386

  ClientWidth = 633

 

MODIFIED:

object frmPrincipal: TfrmPrincipal

  ActiveControl = BitBtnViga

  BorderIcons = [biSystemMenu, biMinimize]

  BorderStyle = bsSingle

  Caption = 'PTE 0.01'

  ClientHeight = 395

  ClientWidth = 630

 

Then it looses the reference and its size turns to the
default form at the top left of IDE. My main (principal) form has a menu and
six bitbutton.

 

Is it a bug ?

 








Re: [lazarus] Any king of IsNumeric() function arround?

2006-06-27 Thread Michael Van Canneyt


On Tue, 27 Jun 2006, Alain Michaud wrote:

> Hi,
>
>   excuse my naive questions again, but what is wrong with val()

Val does not take into account the value of DecimalSeparator.

Michael.

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


Re: [lazarus] Any king of IsNumeric() function arround?

2006-06-27 Thread Alain Michaud
Hi,

  excuse my naive questions again, but what is wrong with val()


Alain

On Tue, 2006-06-27 at 22:21 +0200, Christian U. wrote:
> FUNCTION IsNumeric(s: STRING): boolean;
> VAR
>   i: integer;
> BEGIN
> //TODO:Replace ',' with Systemdelemiter
>   Result := (length(s) > 0);
>   FOR i := 1 TO length(s) DO
> IF NOT ((Char(s[i]) IN ['0'..'9']) or (Char(s[i]) = DecimalSeparator)
> or (Char(s[i]) = '-') or (Char(s[i]) = '+')) THEN
>   BEGIN
> Result := False;
> exit;
>   END;
> END;
> 
> regards
> Christian
> 
> _
>  To unsubscribe: mail [EMAIL PROTECTED] with
> "unsubscribe" as the Subject
>archives at http://www.lazarus.freepascal.org/mailarchives

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


Re: [lazarus] Any king of IsNumeric() function arround?

2006-06-27 Thread A.J. Venter
Shortcomings:
1) Does not handle OTHER pascal supported numeric formats - eg hex
2) Won't work for all character sets

I actually think tryTextToFloat is a BETTER way.

A.J.
On Tuesday 27 June 2006 22:21, Christian U. wrote:
> FUNCTION IsNumeric(s: STRING): boolean;
> VAR
>   i: integer;
> BEGIN
> //TODO:Replace ',' with Systemdelemiter
>   Result := (length(s) > 0);
>   FOR i := 1 TO length(s) DO
> IF NOT ((Char(s[i]) IN ['0'..'9']) or (Char(s[i]) = DecimalSeparator)
> or (Char(s[i]) = '-') or (Char(s[i]) = '+')) THEN
>   BEGIN
> Result := False;
> exit;
>   END;
> END;
>
> regards
> Christian
>
> _
>  To unsubscribe: mail [EMAIL PROTECTED] with
> "unsubscribe" as the Subject
>archives at http://www.lazarus.freepascal.org/mailarchives

-- 
"there's nothing as inspirational for a hacker as a cat obscuring a bug 
by sitting in front of the monitor" - Boudewijn Rempt
A.J. Venter
Chief Software Architect
OpenLab International
www.getopenlab.com
www.silentcoder.co.za
+27 82 726 5103

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


Re: [lazarus] Any king of IsNumeric() function arround?

2006-06-27 Thread Christian U.
FUNCTION IsNumeric(s: STRING): boolean;
VAR
  i: integer;
BEGIN
//TODO:Replace ',' with Systemdelemiter
  Result := (length(s) > 0);
  FOR i := 1 TO length(s) DO
IF NOT ((Char(s[i]) IN ['0'..'9']) or (Char(s[i]) = DecimalSeparator)
or (Char(s[i]) = '-') or (Char(s[i]) = '+')) THEN
  BEGIN
Result := False;
exit;
  END;
END;

regards
Christian

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


Re: Any king of IsNumeric() function arround?

2006-06-27 Thread Alexandre Leclerc

2006/6/27, Michael Van Canneyt <[EMAIL PROTECTED]>:



On Tue, 27 Jun 2006, Alexandre Leclerc wrote:

> 2006/6/27, Alexandre Leclerc <[EMAIL PROTECTED]>:
> > I've looked in many rtl units for a IsNumeric() like function. Any
> > arround or I should code one?
>
> Ok, TextToFloat will do the trick. :)

Better, use TryTextToFloat - it saves you an exception :)


Ha! I would had a surprise at runtime :) Thanks. I'll use
TryStrToFloat in factr, this is exactly what I was looking for (kind
of).

--
Alexandre Leclerc

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


Re: Any king of IsNumeric() function arround?

2006-06-27 Thread Michael Van Canneyt


On Tue, 27 Jun 2006, Alexandre Leclerc wrote:

> 2006/6/27, Alexandre Leclerc <[EMAIL PROTECTED]>:
> > I've looked in many rtl units for a IsNumeric() like function. Any
> > arround or I should code one?
>
> Ok, TextToFloat will do the trick. :)

Better, use TryTextToFloat - it saves you an exception :)

Michael.

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


Re: Any king of IsNumeric() function arround?

2006-06-27 Thread Alexandre Leclerc

2006/6/27, Alexandre Leclerc <[EMAIL PROTECTED]>:

I've looked in many rtl units for a IsNumeric() like function. Any
arround or I should code one?


Ok, TextToFloat will do the trick. :)

--
Alexandre Leclerc

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


[lazarus] Any king of IsNumeric() function arround?

2006-06-27 Thread Alexandre Leclerc

I've looked in many rtl units for a IsNumeric() like function. Any
arround or I should code one?

Example:
IsNumeric('1.00 '): True
IsNumeric(' 1.0 0 211 7'): False
IsNumeric('1.a'): False
IsNumeric('1.0e-10'): False //No scientific-big-numbers notation for now.

The '.' should be taken from actual system decimal separator OR
hardcoded as '.'. I prefere hardcoded, but... well, this could be a
parameter.

Regards.

--
Alexandre Leclerc

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


[lazarus] printing from lazarus

2006-06-27 Thread nonsense

hi all,
I am very sorry for newbie question (beause I am a delphi programmer 
origin) ...


but, pls

how is possible to print source code from lazarus under windows aka 
delphi ??

very very pls, move me to any suitsble links (or so)...

thns
very much

nonsense

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


Re: [lazarus] Problem: /usr/bin/ld: cannot find -lglib

2006-06-27 Thread Vincent Snijders

Ramon Nogueira wrote:

Hi, I'm running lazarus 0.9.16 on Ubuntu 6.06 with FPC 2.0.2 installed
from RPMs with alien. Everything runs ok but when I try to build an
application (the default one that starts when Lazarus does), I get a
linker error:

Free Pascal Compiler version 2.0.2 [2005/11/26] for i386
Copyright (c) 1993-2005 by Florian Klaempfl
Target OS: Linux for i386
Compiling /tmp/project1.lpr
Compiling unit1.pas
Linking /tmp/project1
/usr/bin/ld: cannot find -lglib
project1.lpr(17,1) Error: Error while linking

Am I missing a library or something? Do I need a specific version of
glib? Here is the output of
ls /usr/lib | grep glib:
glib-2.0
libavahi-glib.a
libavahi-glib.la
libavahi-glib.so
libavahi-glib.so.1
libavahi-glib.so.1.0.0
libdbus-glib-1.so.2
libdbus-glib-1.so.2.0.0
libglib-1.2.so.0
libglib-1.2.so.0.0.10
libglib-2.0.a
libglib-2.0.la
libglib-2.0.so
libglib-2.0.so.0
libglib-2.0.so.0.1000.3
libglibmm-2.4.so.1
libglibmm-2.4.so.1.0.24
libglibmm_generate_extra_defs-2.4.so.1
libglibmm_generate_extra_defs-2.4.so.1.0.24
libpoppler-glib.so.1
libpoppler-glib.so.1.0.0


libglib-1.2.so  is missing. See also FAQ.

Vincent

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


[lazarus] Problem: /usr/bin/ld: cannot find -lglib

2006-06-27 Thread Ramon Nogueira

Hi, I'm running lazarus 0.9.16 on Ubuntu 6.06 with FPC 2.0.2 installed
from RPMs with alien. Everything runs ok but when I try to build an
application (the default one that starts when Lazarus does), I get a
linker error:

Free Pascal Compiler version 2.0.2 [2005/11/26] for i386
Copyright (c) 1993-2005 by Florian Klaempfl
Target OS: Linux for i386
Compiling /tmp/project1.lpr
Compiling unit1.pas
Linking /tmp/project1
/usr/bin/ld: cannot find -lglib
project1.lpr(17,1) Error: Error while linking

Am I missing a library or something? Do I need a specific version of
glib? Here is the output of
ls /usr/lib | grep glib:
glib-2.0
libavahi-glib.a
libavahi-glib.la
libavahi-glib.so
libavahi-glib.so.1
libavahi-glib.so.1.0.0
libdbus-glib-1.so.2
libdbus-glib-1.so.2.0.0
libglib-1.2.so.0
libglib-1.2.so.0.0.10
libglib-2.0.a
libglib-2.0.la
libglib-2.0.so
libglib-2.0.so.0
libglib-2.0.so.0.1000.3
libglibmm-2.4.so.1
libglibmm-2.4.so.1.0.24
libglibmm_generate_extra_defs-2.4.so.1
libglibmm_generate_extra_defs-2.4.so.1.0.24
libpoppler-glib.so.1
libpoppler-glib.so.1.0.0

Thanks in advance!

Ramon

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


Re: [lazarus] amd64

2006-06-27 Thread Alain Michaud
Hi,

> b: download the binary for linux amd64 (x86_64) from the www.freepascal.org
> website and install it.
> 
> http://www.freepascal.org/down/x86_64/linux-ftp.freepascal.org.html
> 
> Mattias
> 

Once I have this installed. Can I compile the regular lazarus source
code?, or is there a special package for 64bit ?

Same question with the source code for FPC ?


Excuse me for the naive questions. I am lazy!


Alain



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


Re: [lazarus] Clipboard and Image formats

2006-06-27 Thread Christian U.
> You must register the format type of what you wish to add to the
> Windows clipboard, first of all, then you must (unless it's a bitmap
> or wmf file), create your own format to place it and register it as a
> data.

schould bitmap not be registered within the lcl ???

> To read it, you must also check to see the format of the clipboard,
> and then read it only if it's the same type of content.

i think the clipboard can hold more than one thing/format and delphi checks
for an image
automatically when i try to assign a TClipboard to an TGraphic does the lcl
dont do this ???

> Please note that in order to know wether there is a content of the
> clipboard there are several ways, on of them is to chain yourself to
> the message queue.

the TClipboard class schould do this internally as in delphi

are there some examples how to use the clipboard correctly ??

Christian

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


Re: [lazarus] ide freezes on exit on Linux.

2006-06-27 Thread Giuliano Colla




Mattias Gaertner ha scritto:

  On Tue, 27 Jun 2006 14:13:01 +0200
Giuliano Colla <[EMAIL PROTECTED]> wrote:

  
  
The last snapshots from svn show an annoying behavior.  If you run an 
application from ide, the ide freezes on exit, and you're forced to kill 
it. Having the debugger enabled or not doesn't make any difference. If 
you just start lazarus, edit files etc. without launching the app, it 
terminates properly.
The last revision I tested which doesn't show this behavior is rev. 9438 
of June 15.
Tested under Red Hat WS 3 (kernel 2.4.21) and FC5 (kernel 2.6.16).

  
  
Maybe it is the new TAsyncProcess.
Please compile clean with -dDisableAsyncProcess.


  

Bingo! With -dDisableAsyncProcess it doesn't freeze anymore (rev. 9500).
Thanks.

Giuliano





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


Re: [lazarus] fpcunit - patch (part 1)

2006-06-27 Thread Graeme Geldenhuys

Is this for trying to commit the changes to SubVersion?  I always work
against the latest SubVersion revision...
Changes are on my other development PC, so will only be able to send
it to you later.

Regards,
 - Graeme -



On 6/27/06, Al Boldi <[EMAIL PROTECTED]> wrote:

Won't apply onto 0.9.15.

Can you send the changed files in full?

Thanks!


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


Re: [lazarus] ide freezes on exit on Linux.

2006-06-27 Thread Mattias Gaertner
On Tue, 27 Jun 2006 14:13:01 +0200
Giuliano Colla <[EMAIL PROTECTED]> wrote:

> The last snapshots from svn show an annoying behavior.  If you run an 
> application from ide, the ide freezes on exit, and you're forced to kill 
> it. Having the debugger enabled or not doesn't make any difference. If 
> you just start lazarus, edit files etc. without launching the app, it 
> terminates properly.
> The last revision I tested which doesn't show this behavior is rev. 9438 
> of June 15.
> Tested under Red Hat WS 3 (kernel 2.4.21) and FC5 (kernel 2.6.16).

Maybe it is the new TAsyncProcess.
Please compile clean with -dDisableAsyncProcess.


Mattias

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


Re: [lazarus] fpcunit - patch (part 1)

2006-06-27 Thread Al Boldi
Graeme Geldenhuys wrote:
> Attached is a patch for /components/fpcunit.  The patch should be
> applied from the root Lazarus directory.
>
> It is a combined patch (a few files have changes).

Won't apply onto 0.9.15.

Can you send the changed files in full?

Thanks!

--
Al

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


Re: [lazarus] FPC performance profile

2006-06-27 Thread Al Boldi
Al Boldi wrote:
> Christian Budde wrote:
> > I'm not into FPC, but this looks like if the compiler doesn't put the
> > variable(/branch address) on an address which is dividable by 16. On
> > some Intel processors, that makes a huge difference, especially in case
> > of branches.
>
> So you are saying 'var i:double' has to be on an address dividable by 16
> for some Intel processors.
>
> I found this:
>   Pentium-MMX  0% slowdown
>   PentiumII  222% slowdown
>   Pentium4   333% slowdown
>
> Can somebody post an asm that more easily shows this problem?

Ok, http://www.emulators.com/docs/pentium_1.htm says this:

Finally that dreaded partial register stall! The one serious bug in the P6 
design that can cause legacy code to run slower. By "legacy code" I mean 
code written for a previous version of the processor.

< snip >

While every other optimization in the P6 family pretty much boosts 
performance without requiring the programmer to rewrite one single line of 
code, even the 4-1-1 decode rule, the register renaming optimization has one 
fatal flaw that kills performance: partial registers stalls! A partial 
register stall is when a partial register (that is, the AL, AH, and AX parts 
of the EAX register, the BL, BH, and BX parts of the EBX register, etc) get 
renamed to different internal registers because the processor believes the 
uses are mutually exclusive.

< snip >

This is perfectly valid code, and runs perfectly fine on the 486, Pentium 
classic, and AMD processors, but suffers a partial register stall on any of 
the P6 processors. On the Pentium Pro a stall of about 12 clock cycles, and 
on the newer Pentium III about 4 clock cycles.


Why does the partial register stall occur? Because internally the AL register 
and the EAX registers get mapped to two different internal registers. The 
processor does not discover the mistake until the second micro-op is about 
to execute, at which point it needs to stop and re-execute the instruction 
properly. This results in the pipeline being flushed and the processor 
having to decode the instructions a second time.


How to solve the problem? Well, Intel DID tell developers how to avoid the 
problem. Most didn't listen. The way you work around a partial register 
stall is to clear a register, either using an XOR operation on itself, a SUB 
on itself, or moving the value 0 into the register. (Ironically, SBB which 
is almost identical to SUB, does not do the trick!) Using one of these three 
tricks will flag the register as being clear, i.e. zero. This allows the 
second use of the instruction to be mapped to the same internal register. No 
stall.

< snip >

--end of quote

Florian, what's the status on FPC?

Thanks!

--
Al

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


Re: [lazarus] fpGui and fpGfx

2006-06-27 Thread Michael Van Canneyt



On Tue, 27 Jun 2006, Graeme Geldenhuys wrote:


Hi,

Anybody know the history of these two projects?  Why was the
development stopped?


Lack of time.



I still think a custom lightweight toolkit for FPC and Lazarus will be
great.  No dependency on large toolkits, looks the same on all
platforms, anti-aliased fonts, etc...  I am currently working on a
heavily modified version of lptk.  I didn't agree with the coding
standards/style of lptk and started my own branch.


You can use fpGUI.
The code is functional. There were functioning test programs.

Michael.

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


[lazarus] ide freezes on exit on Linux.

2006-06-27 Thread Giuliano Colla
The last snapshots from svn show an annoying behavior.  If you run an 
application from ide, the ide freezes on exit, and you're forced to kill 
it. Having the debugger enabled or not doesn't make any difference. If 
you just start lazarus, edit files etc. without launching the app, it 
terminates properly.
The last revision I tested which doesn't show this behavior is rev. 9438 
of June 15.

Tested under Red Hat WS 3 (kernel 2.4.21) and FC5 (kernel 2.6.16).

Giuliano

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


Re: [lazarus] Problem porting an application

2006-06-27 Thread Marco van de Voort
> On Mon, 26 Jun 2006, Nathan Samson wrote:
> 
> > sorry for not giving the errors
> >
> > OtherMethod.pas(114,19) Error: Identifier not found "FindIntToIdent"
> > OtherMethod.pas(127,18) Error: Identifier not found "FindIdentToInt"
> 
> Where does this function 'FindIntToIdent' come from ?

Classes.
 
> It's not a standard Delphi function - at least Delphi 7 does not have it.

D6 does. So does FPC (at least some of these). But they don't seem to be
exported under FPC, while they are under Delphi.

I'm afraid these are undocumented in Delphi (internal funcs)

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


[lazarus] fpGui and fpGfx

2006-06-27 Thread Graeme Geldenhuys

Hi,

Anybody know the history of these two projects?  Why was the
development stopped?

I still think a custom lightweight toolkit for FPC and Lazarus will be
great.  No dependency on large toolkits, looks the same on all
platforms, anti-aliased fonts, etc...  I am currently working on a
heavily modified version of lptk.  I didn't agree with the coding
standards/style of lptk and started my own branch.
Once I have my toolkit in a relatively stable state, I will attempt to
implement it in Lazarus (if feasible).

Regards,
 - Graeme -



--
There's no place like 127.0.0.1

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


Re: [lazarus] StretchDIBits API for Linux?

2006-06-27 Thread Paul Michell
Felipe thanks for the code, I guess this requires the source to be a TBitmap,
or something else with a Canvas property? I am actually working with a raw 
memory buffer so that I can do fast scanline access. I was hoping there was 
an X Windows or GTK call that could take a pointer to this memory in the way 
that StretchDIBits does on Windows?

Thanks again,

Paul

On Tuesday 27 June 2006 1:27 am, Felipe Monteiro de Carvalho wrote:
> On 6/26/06, Paul Michell <[EMAIL PROTECTED]> wrote:
> > Does any one know of a Linux API call that performs the same function as
> > StretchDIBits on Windows? I am looking for a fast way of transferring a
> > memory buffer containing a 24bpp image to the screen. I would like to
> > avoid having to add additional dependencies beyond those required for a
> > standard LCL program, or having to transfer to some intermediate buffer
> > (such as a TBitmap) first.
>
> TtCanvas.StretchDraw works reasonably well. There are some issues,
> however. I will post some code from the virtual magnifying glass to
> show you how I did things differently on Windows and Unix to get both
> working well when performing stretch operation:
>
> {$IFDEF Win32}
> if vConfigurations.invertColors then
> begin
>   DestCanvas.Brush.Color := clWhite;
>   DestCanvas.FillRect(Bounds(ClientLeft, ClientTop, ClientWidth,
> ClientHeight));
> end;
>
> StretchBlt(DestCanvas.Handle, ClientLeft, ClientTop, ClientWidth,
> ClientHeight,
>  bmpDisplay.Canvas.Handle, ScreenRect.Left, ScreenRect.Top,
>  ScreenRect.Right - ScreenRect.Left, ScreenRect.Bottom -
> ScreenRect.Top, dwROP);
> {$ENDIF}
> {$IFDEF Unix}
> // Cleans the screen to solve a bug on some systems. Possibly a gtk bug
> DestCanvas.Brush.Color := clWhite;
> DestCanvas.FillRect(Bounds(ClientLeft, ClientTop, ClientWidth,
> ClientHeight));
>
> {***
> *  Paints in two steps. First copies a rect from bmpDisplay, and
> then enlarges it
> *  This is required on Gtk because StretchBlt only accepts SrcX = SrcY
> = 0 ***}
>
> bmpEnlargedDisplay.Canvas.CopyRect(
>  Bounds(0, 0, ScreenRect.Right - ScreenRect.Left,
> ScreenRect.Bottom - ScreenRect.Top),
>  bmpDisplay.Canvas, ScreenRect);
>
> bmpEnlargedDisplay.Height := ScreenRect.Bottom - ScreenRect.Top;
> bmpEnlargedDisplay.Width := ScreenRect.Right - ScreenRect.Left;
>
> DestCanvas.StretchDraw(
>  Bounds(ClientLeft, ClientTop, ClientWidth, ClientHeight),
> bmpEnlargedDisplay);
> {$ENDIF}

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


Re: [lazarus] amd64

2006-06-27 Thread Mattias Gaertner
On Mon, 26 Jun 2006 21:44:02 -0400
Alain Michaud <[EMAIL PROTECTED]> wrote:

> Hi,
> 
>   how do I install FPC 2.0.2 (and Lazarus) on a AMD 64 ?
> 
> a: it does not work
> 
> b: you have to install some special version i886 or someting
> 
> c: you have to edit somefile...

b: download the binary for linux amd64 (x86_64) from the www.freepascal.org
website and install it.

http://www.freepascal.org/down/x86_64/linux-ftp.freepascal.org.html

Mattias

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