Re: [lazarus] Serial Comm Support Windows

2007-12-03 Thread Luis R. Hilario B.
Look at your inbox.

2007/12/2, Stephano <[EMAIL PROTECTED]>:
> Florian Klaempfl wrote:
> > May I add this to the rtl?
>
> Luis Hilario modified FPC's Unix serial.pp unit for use under windows
> (which I have not tested). You can refer to the following post:
> http://www.mail-archive.com/lazarus@miraclec.com/msg15211.html
>
> I presume it would fall under FPC's modified LGPL. But I will email him
> anyway to get his approval.
>
> His post mentions 2 additional issues:
> 1- SerOpen return value of 0 or -1 in case of error.
> 2- Unix/termios and Windows/DCB structures are different. Maybe a common
>   structure should be used to have cross-platform support?
>
> Stephano
>
> _
>  To unsubscribe: mail [EMAIL PROTECTED] with
> "unsubscribe" as the Subject
>archives at http://www.lazarus.freepascal.org/mailarchives
>


-- 
http://luisdigital.com

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


Re: Testers for the unicode support on windows

2007-08-10 Thread Luis R. Hilario B.
News:
http://trolltech.com/products/qt/gplexception

But:
B) You must, on request, make a complete package including the
complete source code of Your Software...

When BSD permits code closed, that is not a contradiction?

2007/8/8, Luis R. Hilario B. <[EMAIL PROTECTED]>:
> I know that since the principle.
>
> 2007/8/7, Vincent Snijders <[EMAIL PROTECTED]>:
> > Luis R. Hilario B. schreef:
> > > Qt license.
> > >
> >
> > You don't need a QT license to test the unicode support in windows using the
> > win32/win64 interface.
> >
> > Vincent
> >
> > > 2007/8/6, Felipe Monteiro de Carvalho <[EMAIL PROTECTED]>:
> > >> On 8/6/07, Luis R. Hilario B. <[EMAIL PROTECTED]> wrote:
> > >>> The problem of the license (commercial) discourages me
> > >> Which license are you talking about?
> > >>
> > >> My message is a specific call for testers on the unicode support for
> > >> the win32/64 interface.
> >
> > _
> >  To unsubscribe: mail [EMAIL PROTECTED] with
> > "unsubscribe" as the Subject
> >archives at http://www.lazarus.freepascal.org/mailarchives
> >
>
>
> --
> http://luisdigital.com
>


-- 
http://luisdigital.com

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


Re: Testers for the unicode support on windows

2007-08-08 Thread Luis R. Hilario B.
I know that since the principle.

2007/8/7, Vincent Snijders <[EMAIL PROTECTED]>:
> Luis R. Hilario B. schreef:
> > Qt license.
> >
>
> You don't need a QT license to test the unicode support in windows using the
> win32/win64 interface.
>
> Vincent
>
> > 2007/8/6, Felipe Monteiro de Carvalho <[EMAIL PROTECTED]>:
> >> On 8/6/07, Luis R. Hilario B. <[EMAIL PROTECTED]> wrote:
> >>> The problem of the license (commercial) discourages me
> >> Which license are you talking about?
> >>
> >> My message is a specific call for testers on the unicode support for
> >> the win32/64 interface.
>
> _
>  To unsubscribe: mail [EMAIL PROTECTED] with
> "unsubscribe" as the Subject
>archives at http://www.lazarus.freepascal.org/mailarchives
>


-- 
http://luisdigital.com

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


Re: Testers for the unicode support on windows

2007-08-07 Thread Luis R. Hilario B.
Qt license.

2007/8/6, Felipe Monteiro de Carvalho <[EMAIL PROTECTED]>:
> On 8/6/07, Luis R. Hilario B. <[EMAIL PROTECTED]> wrote:
> > The problem of the license (commercial) discourages me
>
> Which license are you talking about?
>
> My message is a specific call for testers on the unicode support for
> the win32/64 interface.
>
> --
> Felipe Monteiro de Carvalho
>
> _
>  To unsubscribe: mail [EMAIL PROTECTED] with
> "unsubscribe" as the Subject
>archives at http://www.lazarus.freepascal.org/mailarchives
>


-- 
http://luisdigital.com

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


Re: Testers for the unicode support on windows

2007-08-06 Thread Luis R. Hilario B.
Good work!

I have a lot of time that do not contribute.
The problem of the license (commercial) discourages me, change of
versions of Qt, and busy in other things.

2007/8/5, Felipe Monteiro de Carvalho <[EMAIL PROTECTED]>:
> Hi, where are the testers? =)
>
> The only thing missing before changing to unicode as the default mode
> on the windows interface is testing to identify all remaining problems
> with it.
>
> I use a quite limited set of the lcl components on my programs, so I
> am not the best person to do more extensive testing.
>
> Since 30 minutes or so, the IDE can input utf-8 correctly (when
> WindowsUnicodeSupport is activated), so it's easier to test unicode
> applications.
>
> thanks,
> --
> Felipe Monteiro de Carvalho
>
> _
>  To unsubscribe: mail [EMAIL PROTECTED] with
> "unsubscribe" as the Subject
>archives at http://www.lazarus.freepascal.org/mailarchives
>


-- 
http://luisdigital.com

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


Re: [lazarus] Lazarus Character map and UTF

2007-05-12 Thread Luis R. Hilario B.

"two-byte font in the editor options" Worked.

But in Windows there are two visible characters.  It thought that
Windows used UTF by defect.  That one must modify in Windows?  Or I
should use the function UTF at ASCII?.

2007/5/12, Mattias Gaertner <[EMAIL PROTECTED]>:

On Sat, 12 May 2007 10:05:09 -0400
"Luis R. Hilario B." <[EMAIL PROTECTED]> wrote:

> View mapc.png
>
> 2007/5/12, Mattias Gaertner <[EMAIL PROTECTED]>:
> > On Sat, 12 May 2007 16:18:42 +0300
> > ik <[EMAIL PROTECTED]> wrote:
> >
> > > Hi,
> > >
> > > GTK1.2 does not support Unicode and UTF8 charset at all, only
> > > latin1.
> >
> > Where did you get this information?
> > Gtk2 only supports UTF-8, while GTK1.2 only supports the current
> > characterset (e.g. UTF-8 or ISO).
> > The LCL gtk (1+2) intf only work correctly with UTF-8.
> > The LCL gtk intf does not yet support typing combined characters for
> > custom controls like TSynEdit, but it supports copying them and
> > native controls like TEdit and TComboBox supports typing combined
> > characters. But gtk2 supports more much language specific things
> > than gtk1.
> >
> > > And AFAIK it's deprecated and not under development anymore.
> > >
> > > Ido
> > >
> > > On 5/12/07, Luis R. Hilario B. <[EMAIL PROTECTED]> wrote:
> > > > 2007/5/12, ik <[EMAIL PROTECTED]>:
> > > > > Hi,
> > > > >
> > > > > I have few questions for you :
> > > > > 1. What UTF (7,8,16,32) ?
> > > > UTF8?
> > > >
> > > > > 2. What font are you using to display, and what GUI toolkit
> > > > > (GTK1.2,QT, GTK2 ...) ?
> > > > > 3. What is the GUI toolkit that your lazarus is using (same as
> > > > > the above) ?
> > > > GTK1
> > > > > 4. How did you add the char, and what is it's type (Char,
> > > > > String, WideString, AnsiString) ?
> > > >
> > > > Label1.Caption := 'Â(c) <-Visible - (c)<-No visible';
> >
> > Seems to work here. Can you provide a zipped example, so that the
> > mail does not mangle the characters?

The character map shows characters above 128. This typically means you
are not using a unicode font. Please make sure, you select a two-byte
font in the editor options for the source editor and start the IDE
with a UTF-8 language setting.

For example under ubuntu:
export LANG=en_US.UTF-8

The LCL works with UTF-8 strings.

Or: use the gtk2 IDE.

Note: afaik the character map only supports 1-byte characters and the
copyright character is 2 bytes under UTF-8.

http://www.fileformat.info/info/unicode/char/00a9/index.htm


Mattias

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




--
http://luisdigital.com

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


Re: [lazarus] Lazarus Character map and UTF

2007-05-12 Thread Luis R. Hilario B.

View mapc.png

2007/5/12, Mattias Gaertner <[EMAIL PROTECTED]>:

On Sat, 12 May 2007 16:18:42 +0300
ik <[EMAIL PROTECTED]> wrote:

> Hi,
>
> GTK1.2 does not support Unicode and UTF8 charset at all, only latin1.

Where did you get this information?
Gtk2 only supports UTF-8, while GTK1.2 only supports the current
characterset (e.g. UTF-8 or ISO).
The LCL gtk (1+2) intf only work correctly with UTF-8.
The LCL gtk intf does not yet support typing combined characters for
custom controls like TSynEdit, but it supports copying them and native
controls like TEdit and TComboBox supports typing combined characters.
But gtk2 supports more much language specific things than gtk1.

> And AFAIK it's deprecated and not under development anymore.
>
> Ido
>
> On 5/12/07, Luis R. Hilario B. <[EMAIL PROTECTED]> wrote:
> > 2007/5/12, ik <[EMAIL PROTECTED]>:
> > > Hi,
> > >
> > > I have few questions for you :
> > > 1. What UTF (7,8,16,32) ?
> > UTF8?
> >
> > > 2. What font are you using to display, and what GUI toolkit
> > > (GTK1.2,QT, GTK2 ...) ?
> > > 3. What is the GUI toolkit that your lazarus is using (same as
> > > the above) ?
> > GTK1
> > > 4. How did you add the char, and what is it's type (Char, String,
> > > WideString, AnsiString) ?
> >
> > Label1.Caption := 'Â(c) <-Visible - (c)<-No visible';

Seems to work here. Can you provide a zipped example, so that the mail
does not mangle the characters?


Mattias



> >
> > >
> > > Ido
> > >
> > > On 5/12/07, Luis R. Hilario B. <[EMAIL PROTECTED]> wrote:
> > > > Hello,
> > > >
> > > > I tried to insert a character, appears normal, but while the
> > > > program is in execution is not visible, putting the character
> > > > in UTF copied from KWrite (two characters) worked.
> > > >
> > > > --
> > > > http://luisdigital.com
> > > >
> > >
> > >
> > > --
> > > http://ik.homelinux.org/
> > >
> > > _
> > >  To unsubscribe: mail [EMAIL PROTECTED] with
> > > "unsubscribe" as the Subject
> > >archives at http://www.lazarus.freepascal.org/mailarchives
> > >
> >
> >
> > --
> > http://luisdigital.com
> >
> > _
> >  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




--
http://luisdigital.com
<>

Re: [lazarus] Lazarus Character map and UTF

2007-05-12 Thread Luis R. Hilario B.

2007/5/12, ik <[EMAIL PROTECTED]>:

Hi,

I have few questions for you :
1. What UTF (7,8,16,32) ?

UTF8?


2. What font are you using to display, and what GUI toolkit
(GTK1.2,QT, GTK2 ...) ?
3. What is the GUI toolkit that your lazarus is using (same as the above) ?

GTK1

4. How did you add the char, and what is it's type (Char, String,
WideString, AnsiString) ?


Label1.Caption := 'Â(c) <-Visible - (c)<-No visible';



Ido

On 5/12/07, Luis R. Hilario B. <[EMAIL PROTECTED]> wrote:
> Hello,
>
> I tried to insert a character, appears normal, but while the program
> is in execution is not visible, putting the character in UTF copied
> from KWrite (two characters) worked.
>
> --
> http://luisdigital.com
>


--
http://ik.homelinux.org/

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




--
http://luisdigital.com

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


[lazarus] Lazarus Character map and UTF

2007-05-11 Thread Luis R. Hilario B.

Hello,

I tried to insert a character, appears normal, but while the program
is in execution is not visible, putting the character in UTF copied
from KWrite (two characters) worked.

--
http://luisdigital.com

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


Re: [lazarus] Serial unit for Windows

2007-05-04 Thread Luis R. Hilario B.

Normal access, Windows API.

But as you can see there is procedure, for almost all:

{ Getting and setting the line states directly. }
procedure SerSetDTR(Handle: TSerialHandle; State: Boolean);
procedure SerSetRTS(Handle: TSerialHandle; State: Boolean);
function SerGetCTS(Handle: TSerialHandle): Boolean;
function SerGetDSR(Handle: TSerialHandle): Boolean;
function SerGetRI(Handle: TSerialHandle): Boolean;


I have placed to work a program of Windows in Linux and functioned
perfectly thanks to this unit.
http://forums.parallax.com/forums/default.aspx?f=25&m=189025

2007/5/4, Razvan Adrian Bogdan <[EMAIL PROTECTED]>:

Is it suppose to work accessing the port directly and reading pin
states or normal synchronous/asynchronous access ?

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




--
http://luisdigital.com

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


Re: [lazarus] Serial unit for Windows

2007-05-02 Thread Luis R. Hilario B.

Personally only I have used serial.pp for Linux and i liked (first
time that use the serial port), so I decided to create a version for
Windows.

This unit is very small, contains the basic thing and is easy to use.
Perfect for microcontrollers.

2007/5/2, Razvan Adrian Bogdan <[EMAIL PROTECTED]>:

What are the functional differences between this and synaser ?

On 5/1/07, Luis R. Hilario B. <[EMAIL PROTECTED]> wrote:
> Hello,
>
> New unit serial.pp for Windows.
> http://www.luisdigital.com/programacion/fpc/serial.pp
>
> Please, to verify any error, since I am not an expert.
>
> Some differences:
>
> Linux:
> TSerialState = record
> LineState: LongWord;
> tios: termios;
>   end;
>
> Windows:
> TSerialState = record
> LineState: LongWord;
> DCB: TDCB;
>   end;
>
> BitsPerSec now is Windows const. CBR_110...
>
> procedure SerRestoreState(Handle: TSerialHandle; State: TSerialState);
> Restore only DCB.
>
> There is an error in the description of the version in Linux:
>
> Returns "0" if device could not be found
> function SerOpen(const DeviceName: String): TSerialHandle;
>
> Really is -1
>
> --
> http://luisdigital.com
>
> _
>  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




--
http://luisdigital.com

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


[lazarus] Serial unit for Windows

2007-05-01 Thread Luis R. Hilario B.

Hello,

New unit serial.pp for Windows.
http://www.luisdigital.com/programacion/fpc/serial.pp

Please, to verify any error, since I am not an expert.

Some differences:

Linux:
TSerialState = record
   LineState: LongWord;
   tios: termios;
 end;

Windows:
TSerialState = record
   LineState: LongWord;
   DCB: TDCB;
 end;

BitsPerSec now is Windows const. CBR_110...

procedure SerRestoreState(Handle: TSerialHandle; State: TSerialState);
Restore only DCB.

There is an error in the description of the version in Linux:

Returns "0" if device could not be found
function SerOpen(const DeviceName: String): TSerialHandle;

Really is -1

--
http://luisdigital.com

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


Re: [lazarus] TFilelistBox dont work

2007-04-28 Thread Luis R. Hilario B.

default value in Delphi is ftNormal
And are visible the files with attribute 'A' or without him.

But that is not really the problem, in Delphi functions totally different.

For example:
ftArchive Does not it show hidden files, Lazarus yes.

2007/4/28, Vincent Snijders <[EMAIL PROTECTED]>:

Luis R. Hilario B. schreef:
> Right now works thus:
> ftArchive = If has the attribute of file.
> ftNormal = If has no attribute.
>
> Do the test removing all the attributes.
> DOS/Windows (OS/2?):
>
> attribu -r -a -s -h file.ext
>
> It can be that in the future be 100% Delphi compatible, but now I am
> working in unit serie.pp for Windows.

What is Delphi compatible, i.e. what is de default value in Delphi?

Vincent

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




--
http://luisdigital.com

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


Re: [lazarus] TFilelistBox dont work

2007-04-27 Thread Luis R. Hilario B.

Right now works thus:
ftArchive = If has the attribute of file.
ftNormal = If has no attribute.

Do the test removing all the attributes.
DOS/Windows (OS/2?):

attribu -r -a -s -h file.ext

It can be that in the future be 100% Delphi compatible, but now I am
working in unit serie.pp for Windows.

2007/4/27, fedorax <[EMAIL PROTECTED]>:

Thank's.
With ftArchive that's work. I cant find exactly when ftArchive become necessary
but when FPC svn version was 2.1.1 the component TFilelistBox work without this
line.
In the IDE the default value of filetype ftArchive is set to false. May be the
best way is set the default to true in future ? I dont know what do ftNormal. I
try it lonely on some directories and in ever case i've nothing in the list.

Selon "Luis R. Hilario B." <[EMAIL PROTECTED]>:

> Try
> FileType:=[ftNormal,ftArchive,ftReadOnly];
>
> Really the implementation of Lazarus is not the same one of Delphi,
> possibly change later.
>
> 2007/4/20, fedorax <[EMAIL PROTECTED]>:
> > Hello,
> >
> > With lazarus svn 10980 fpc svn 7141
> >
> > The component TFileListBox  don't work.
> >
> > With FileListBox1 do begin
> >   FileType:=[ftNormal,ftReadOnly];
> >   Mask:='*.*';
> >   Directory:='/usr/local/bin/';
> > end;
> >
> > Display nothing.
> >
> > Also try with
> > Mask='*';
> > Directory:='/usr/local/bin';
> > nothing change.
> >
> > OS: Linux fedora 6
> >
> > _
> >  To unsubscribe: mail [EMAIL PROTECTED] with
> > "unsubscribe" as the Subject
> >archives at http://www.lazarus.freepascal.org/mailarchives
> >
>
>
> --
> http://luisdigital.com
>
> _
>  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




--
http://luisdigital.com

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


Re: [lazarus] TFilelistBox dont work

2007-04-24 Thread Luis R. Hilario B.

Try
FileType:=[ftNormal,ftArchive,ftReadOnly];

Really the implementation of Lazarus is not the same one of Delphi,
possibly change later.

2007/4/20, fedorax <[EMAIL PROTECTED]>:

Hello,

With lazarus svn 10980 fpc svn 7141

The component TFileListBox  don't work.

With FileListBox1 do begin
  FileType:=[ftNormal,ftReadOnly];
  Mask:='*.*';
  Directory:='/usr/local/bin/';
end;

Display nothing.

Also try with
Mask='*';
Directory:='/usr/local/bin';
nothing change.

OS: Linux fedora 6

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




--
http://luisdigital.com

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


[lazarus] Delphi PHP

2007-02-21 Thread Luis R. Hilario B.

Hello,

In CodeGear Delphi for PHP:
http://www.codegear.com/Products/Delphi/DelphiforPHP/tabid/237/Default.aspx

It seems me that here was spoken of something seemed once.

--
http://luisdigital.com

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


Re: [lazarus] 0.9.20 released

2006-11-09 Thread Luis R. Hilario B.

2006/11/9, Graeme Geldenhuys <[EMAIL PROTECTED]>:

On 09/11/06, Luis R. Hilario B. <[EMAIL PROTECTED]> wrote:
> > Which files are enormous?
>
> The final result of the programs created with MSEide + MSEgui

Isn't that just because of the debug information inside the
executables.  This is covered in the Free Pascal or Lazarus FAQ.  Use
the 'strip' command, to remove the debug information from the
executable.

For example:
 I compile a app with Lazarus and the executable is 12Mb.  After using
'strip appname.exe' it shrinks down to 4Mb.


I know.
You consider that 4MB is small?


It is verified that the size yes imports. :)



Regards,
  - Graeme -

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




--
http://luisdigital.com

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


Re: [lazarus] 0.9.20 released

2006-11-08 Thread Luis R. Hilario B.

2006/11/8, Felipe Monteiro de Carvalho <[EMAIL PROTECTED]>:

On 11/8/06, Luis R. Hilario B. <[EMAIL PROTECTED]> wrote:
> But the files are enormous.

Which files are enormous?


The final result of the programs created with MSEide + MSEgui

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




--
http://luisdigital.com

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


Re: [lazarus] 0.9.20 released

2006-11-08 Thread Luis R. Hilario B.

Like http://mypage.bluewin.ch/msegui/

But the files are enormous.

2006/11/8, Felipe Monteiro de Carvalho <[EMAIL PROTECTED]>:

On 11/8/06, Sebastian Kraft <[EMAIL PROTECTED]> wrote:
> > New widgetset: fpgui
> >
> Where is this? I can't find it in Build Lazarus Dialog or Project compile
> options...
> How can I use it?

We just added a empty compilable skeleton for fpGUI, it isn't
implemented yet, so it wasn't added to the build lazarus dialog. I
think this was a bit misleading changes text.

fpGUI is a object oriented framework that writes it's own controls
(like Qt), and runs on top of X11 or Windows API currently. Currently
it's under heavy work, and thus not yet usable to write applications
as the API may change a lot in the next few weeks.

Because fpGUI does not use native controls, it's much easier to be
ported, as only the drawing functions need to be reimplemented.

In the future, after it's ready (and this can take a lot of time,
perhaps 1 year), I expect the following benefits for LCL-fpGUI
interface:

* Direct X11 support on Lazarus (without Gtk or Qt).
* Make lazarus easier to port for more PDA platforms

--
Felipe Monteiro de Carvalho

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




--
http://luisdigital.com

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


Re: [lazarus] lazarus 0.9.18 on Mandriva 2007

2006-10-29 Thread Luis R. Hilario B.

2006/10/28, Burkhard Carstens <[EMAIL PROTECTED]>:

Am Samstag, 28. Oktober 2006 18:37 schrieb Mattias Gaertner:
> On Sat, 28 Oct 2006 18:14:21 +0200
>
> Burkhard Carstens <[EMAIL PROTECTED]> wrote:
> > Am Samstag, 28. Oktober 2006 17:08 schrieb Mattias Gaertner:
> > > On Sat, 28 Oct 2006 16:36:12 +0200
> > >
> > > Burkhard Carstens <[EMAIL PROTECTED]> wrote:
> > > > Am Samstag, 28. Oktober 2006 14:10 schrieb Andrew Haines:
> > > > > Felipe Monteiro de Carvalho wrote:
> > > > > > On 10/28/06, Mattias Gaertner <[EMAIL PROTECTED]>
> > > > > >
> > > > > > wrote:
> > > > > >> > > Yes, I noticed it too. Recently Andrew Haines fixed 2
> > > > > >> > > of the 3 worse bugs that prevented the use of the Gtk
> > > > > >> > > 2 IDE. Now there is only 1 left, autosize bug causes
> > > > > >> > > some dialogs of the IDE to freeze it.
> > > > > >>
> > > > > >> Can you give more details?
> > > > >
> > > > > In the Environment Options Dialog on the Object Inspector Tab
> > > > > the Item Height TSpinEdit resizes continually. (perhaps from
> > > > > MaxWord to MinWord and back around ? )
> > >
> > > Fixed.
> > >
> > > > Same here with SpinEdit used in my project. Just compiled
> > > > lazarus with gtk2, opened my project and selected the spinedit.
> > > > First, spinedit1.width periodically decreased downto 0, until I
> > > > set constrains.minwidth. After doing that, height (and another
> > > > field, don't remember which one) increased periodically. No way
> > > > to stop it except closing laz.
> > > > Looks like some recursion ..
> > >
> > > Please update lazarus from svn and check.
> >
> > Thanks! Indeed it's fixed.
> > Unfortunately, there are still too many problems, so I immediately
> > switched back to gtk1 ..
> >
> > * some of my memos don't show any text (thou it's there if I edit
> > the lines property in OI)
>
> Can you give a small example?
>
> > * can't change color of a TMemo (property color). Well, I can
> > change it in OI, but it's has no effect ..)
>
> Works here. Can you give an example?

Allready switched back to gtk1 and unfortunately I am very short of
time.. so no example, just some hints:
The memos are on different TTabSheets of a TPageControl.
* some show text some not.


That same it passes me after update to Mandriva 2007, also some texts
are invisible (Unicode problem?).

view example lazarusblank.png


* All of them refuse to show any other color than white as background
color.
* With GTk1, I am not able to set clBtnFace as color. The first set of
colors in the drop-down list work, up to clAqua but then it gets funny:
* when selection clLtGrey property is switched to clSilver
* clDarkGrey works
* some other colors are selectable, but the don't change appearance of
the memo. The color just sticks to the last working one in designer and
white when running the app.


> > * drop-down lists in OI are pretty scrambled (items drawn with
> > different text-height/overlapping), as soon as you scroll (e.g.
> > color selection)
>
> Confirmed.
>
> > * IDE/Formdesigner/OI are pretty slow
>
> I hope by using cairo directly te gtk2 intf can avoid some of the gtk
> overhead.

sounds good.

Burkhard

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




--
http://luisdigital.com


lazarusblank.png
Description: PNG image


[lazarus] Qt Message

2006-10-02 Thread Luis R. Hilario B.

Hello,

After clarifying that the mesages LCL work well, we go with the part of Qt.

Some of the events that generates QListWidget they are:
QEventContextMenu (with a right click)
QEventToolTip
QEventKeyPress (keyboard)
QEventKeyRelease

But not QEventMouseButtonPress neither QEventMouseMove, etc.
They will be blocked or is normal?

Some expert in Qt around here?

--
http://luisdigital.com

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


Re: [lazarus] LCL Message

2006-10-01 Thread Luis R. Hilario B.

It seems me that is done in the following way:

procedure TQtMemoStrings.IsChanged;
begin
 if Assigned((FOwner as TCustomMemo).OnChange) then
 begin
   (FOwner as TCustomMemo).Modified := False;
   (FOwner as TCustomMemo).OnChange(self);
 end;
end;

But I agree not to change that, because Qtwidgetset should work the
same as Gtkwidgetset,  etc., although be an error.

2006/10/1, Felipe Monteiro de Carvalho <[EMAIL PROTECTED]>:

On 10/1/06, Marc Weustink <[EMAIL PROTECTED]> wrote:
> Delphi send an onclick if the selction changes by a user event.

Is there a reason why this is like that}

> AFAIK, a OnSelectionChange is sent always.

So how can our widgetset tell LCL only to send a OnSelectionChange
event and *not* a OnClick}

--
Felipe Monteiro de Carvalho

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




--
http://luisdigital.com

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


Re: [lazarus] LCL Message

2006-10-01 Thread Luis R. Hilario B.

LM_SELCHANGE send OnSelectionChange and next OnClick, but not only in
Qt also in GTK.

Bug or feature?

2006/9/19, Felipe Monteiro de Carvalho <[EMAIL PROTECTED]>:

Ok, something very strange is going on.

I added a slot for the itemchanged signal that looks like this:

procedure TQtListWidget.SlotSelectionChange(current: QListWidgetItemH;
  previous: QListWidgetItemH); cdecl;
var
  Msg: TLMessage;
begin
  FillChar(Msg, SizeOf(Msg), #0);

  Msg.Msg := LM_SELCHANGE;

  try
LCLObject.WindowProc(TLMessage(Msg));
  except
Application.HandleException(nil);
  end;
end;

If I comment out the LCLObject.WindowProc() line, no events are
received for the listbox.

If I don't commen it and click on the list box and drag to change
selection, I will receive many OnClick and OnSelectionChange events.

Could it be a problem with the qt bindings?

It seams to me everything I did was correct. Here is my SetSlots
function, I not only use a events look, but alse set a slot for a
signal directly, because that signal has no corresponding event:

class procedure TQtWSCustomListBox.SetSlots(const QtListWidget: TQtListWidget);
var
  Method: TMethod;
  Hook : QListWidget_hookH;
begin
  // Various Events

  Hook := QListWidget_hook_create(QtListWidget.Widget);

  TEventFilterMethod(Method) := QtListWidget.EventFilter;

  QObject_hook_hook_events(Hook, Method);

  // OnSelectionChange event

  QListWidget_currentItemChanged_Event(Method) :=
QtListWidget.SlotSelectionChange;

  QListWidget_hook_hook_currentItemChanged(Hook, Method);
end;

I also attached a diff.
--
Felipe Monteiro de Carvalho






--
http://luisdigital.com

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


[lazarus] QtComboBox Update

2006-09-28 Thread Luis R. Hilario B.

Hello,

ComboBox update in file qtcombobox.diff
Any correction is welcome.
--
http://luisdigital.com
Index: ide/revision.inc
===
--- ide/revision.inc	(revision 10003)
+++ ide/revision.inc	(working copy)
@@ -1,2 +1,2 @@
 // Created by Svn2RevisionInc
-const RevisionStr = '9891';
+const RevisionStr = '10002M';
Index: lcl/interfaces/qt/qtobjects.pas
===
--- lcl/interfaces/qt/qtobjects.pas	(revision 10003)
+++ lcl/interfaces/qt/qtobjects.pas	(working copy)
@@ -8,6 +8,38 @@
 
 type
 
+  { TQtComboStrings }
+
+  TQtComboStrings = class(TStrings)
+  private
+FComboChanged: Boolean; // StringList and QtComboBox out of sync
+FStringList: TStringList; // Holds the items to show
+FQtComboBox: QComboBoxH;  // Qt Widget
+FOwner: TWinControl;  // Lazarus Control Owning ListStrings
+FUpdating: Boolean;   // We're changing Qt Widget
+procedure InternalUpdate;
+procedure ExternalUpdate(var Astr: TStringList; Clear: Boolean = True);
+procedure IsChanged; // OnChange triggered by program action
+  protected
+function GetTextStr: string; override;
+function GetCount: integer; override;
+function Get(Index : Integer) : string; override;
+//procedure SetSorted(Val : boolean); virtual;
+  public
+constructor Create(ComboBoxH : QComboBoxH; TheOwner: TWinControl);
+destructor Destroy; override;
+procedure Assign(Source : TPersistent); override;
+procedure Clear; override;
+procedure Delete(Index : integer); override;
+procedure Insert(Index : integer; const S: string); override;
+procedure SetText(TheText: PChar); override;
+//procedure Sort; virtual;
+  public
+//property Sorted: boolean read FSorted write SetSorted;
+property Owner: TWinControl read FOwner;
+  end;
+
+
   { TQtListStrings }
 
   TQtListStrings = class(TStrings)
@@ -567,5 +599,129 @@
   Result := QImage_numBytes(Handle);
 end;
 
+{ TQtComboStrings }
+
+procedure TQtComboStrings.InternalUpdate;
+begin
+
+end;
+
+procedure TQtComboStrings.ExternalUpdate(var Astr: TStringList; Clear: Boolean
+  );
+var
+  i: Integer;
+  data: QVariantH;
+begin
+
+  data := QVariant_create(10); //Creates dummy data
+
+  FUpdating := True;
+  if Clear then
+QComboBox_clear(FQtComboBox);
+  for i := 0 to AStr.Count -1 do
+QComboBox_additem(FQtComboBox, @WideString(Astr[i]), data);
+  FUpdating := False;
+  IsChanged;
+  FUpdating := False;
+
+  QVariant_destroy(data); // Clean up
+end;
+
+procedure TQtComboStrings.IsChanged;
+begin
+
+end;
+
+function TQtComboStrings.GetTextStr: string;
+begin
+  Result:=inherited GetTextStr;
+end;
+
+function TQtComboStrings.GetCount: integer;
+begin
+  if FComboChanged then InternalUpdate;
+  Result := FStringList.Count;
+end;
+
+function TQtComboStrings.Get(Index: Integer): string;
+begin
+  if FComboChanged then InternalUpdate;
+  if Index < FStringList.Count then
+ Result := FStringList.Strings[Index]
+  else Result := '';
+end;
+
+constructor TQtComboStrings.Create(ComboBoxH: QComboBoxH; TheOwner: TWinControl
+  );
+var
+  Method: TMethod;
+  Hook : QComboBox_hookH;
+//  Astr: WideString;
+  i: Integer;
+begin
+  inherited Create;
+
+  {$ifdef VerboseQt}
+if (ComboBoxH = nil) then WriteLn('TQtComboStrings.Create Unspecified ComboBoxH widget');
+if (TheOwner = nil) then WriteLn('TQtComboStrings.Create Unspecified owner');
+  {$endif}
+
+  FStringList := TStringList.Create;
+  FQtComboBox := ComboBoxH;
+  FStringList.Text := TCustomComboBox(TheOwner).Items.Text;
+  FOwner:=TheOwner;
+end;
+
+destructor TQtComboStrings.Destroy;
+begin
+  inherited Destroy;
+end;
+
+procedure TQtComboStrings.Assign(Source: TPersistent);
+begin
+  inherited Assign(Source);
+end;
+
+procedure TQtComboStrings.Clear;
+begin
+  FUpdating := True;
+  FStringList.Clear;
+  QComboBox_clear(FQtComboBox);
+  FComboChanged := False;
+  FUpdating := False;
+  IsChanged;
+end;
+
+procedure TQtComboStrings.Delete(Index: integer);
+begin
+  if FComboChanged then InternalUpdate;
+
+  if Index < FStringList.Count then
+  begin
+FStringList.Delete(Index);
+ExternalUpdate(FStringList,True);
+FComboChanged := False;
+  end;
+end;
+
+procedure TQtComboStrings.Insert(Index: integer; const S: string);
+begin
+  if FComboChanged then InternalUpdate;
+
+  if Index < 0 then Index := 0;
+
+  if Index <= FStringList.Count then
+  begin
+FStringList.Insert(Index,S);
+ExternalUpdate(FStringList,True);
+FComboChanged := False;
+  end;
+end;
+
+procedure TQtComboStrings.SetText(TheText: PChar);
+begin
+  inherited SetText(TheText);
+end;
+
 end.
 
Index: lcl/interfaces/qt/qtwsstdctrls.pp
===
--- lcl/interfaces/qt/qtwsstdctrls.pp	(revision 10003)
+++ lcl/interfaces/qt/qtwsstdctrls.pp	(working copy)
@@ -1071,10 +1071,11 @@
   Returns: The state of the control
  

Re: [lazarus] Screenshots wanted

2006-09-27 Thread Luis R. Hilario B.

I see that already is included.

2006/9/27, Luis R. Hilario B. <[EMAIL PROTECTED]>:

http://luisdigital.com/programacion/lazarus/

2006/9/26, Felipe Monteiro de Carvalho <[EMAIL PROTECTED]>:
> Hello,
>
> We are giving a new face to the screenshots page, and I would like to
> add screenshots of Lazarus running on various operating systems. We
> already have the most obvious ones: Linux and Windows.
>
> It would be great if others could provide the following screenshots:
>
> * Lazarus Running on Mac OS X
> * Lazarus Crosscompiling to Windows CE
> * Running on FreeBSD
>
> If you have nowhere to host the screenshots, you can upload them to
> the wiki, here:
>
> http://wiki.lazarus.freepascal.org/Special:Upload
>
> This is the new screenshots page:
>
> http://wiki.lazarus.freepascal.org/Screenshots
>
> Note: That page is underconstruction
>
> thanks,
> --
> Felipe Monteiro de Carvalho
>
> _
>  To unsubscribe: mail [EMAIL PROTECTED] with
> "unsubscribe" as the Subject
>archives at http://www.lazarus.freepascal.org/mailarchives
>


--
http://luisdigital.com




--
http://luisdigital.com

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


Re: [lazarus] Screenshots wanted

2006-09-27 Thread Luis R. Hilario B.

http://luisdigital.com/programacion/lazarus/

2006/9/26, Felipe Monteiro de Carvalho <[EMAIL PROTECTED]>:

Hello,

We are giving a new face to the screenshots page, and I would like to
add screenshots of Lazarus running on various operating systems. We
already have the most obvious ones: Linux and Windows.

It would be great if others could provide the following screenshots:

* Lazarus Running on Mac OS X
* Lazarus Crosscompiling to Windows CE
* Running on FreeBSD

If you have nowhere to host the screenshots, you can upload them to
the wiki, here:

http://wiki.lazarus.freepascal.org/Special:Upload

This is the new screenshots page:

http://wiki.lazarus.freepascal.org/Screenshots

Note: That page is underconstruction

thanks,
--
Felipe Monteiro de Carvalho

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




--
http://luisdigital.com

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


Re: [lazarus] Bug Tracking, of nothing serves?

2006-09-25 Thread Luis R. Hilario B.

Yes there is a problem.  It should be easy to solve, but personally I
do not know a lot of the IDE.

As solution click "Save all", is the same thing.

2006/9/25, Onjahyr <[EMAIL PROTECTED]>:

What usefulness to lose time sending BUG if never it has solution?

Good, I believe that this tool still does not give to use, the Java does
not give work in such a way.

A so simple thing not to have solution as Vicente affirms...

Eu não estou na equipe do desenvolvimento, mas a solução é assim simples
que dá até a raiva!

When the event of the component occur, enable the button save.

It is lack of will of help! I made already my part.

I do not more go to send Bugs.

Link: http://www.freepascal.org/mantis/view.php?id=7403

TKS

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




--
http://luisdigital.com

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


Re: [lazarus] LCL Message

2006-09-22 Thread Luis R. Hilario B.

That same I suggest, so that it is not lost.

2006/9/22, Felipe Monteiro de Carvalho <[EMAIL PROTECTED]>:

I will send this patch to be applied.

--
Felipe Monteiro de Carvalho

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




--
http://luisdigital.com

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


[lazarus] LCL Message

2006-09-19 Thread Luis R. Hilario B.

Hello,

I implemented ListBox.Onclick and ListBox.OnSelectionChange, but they
do not work correctly.  OnSelectionChange sends messages of all types
and OnClick does not want to send Onclick (But I see the sign in Qt
when I click an item).  View file "ListBoxonclick.diff". If someone
understands what is happening that he fix him because no longer I know
what to do.

White flag. :(
--
http://luisdigital.com
Index: ide/revision.inc
===
--- ide/revision.inc	(revision 9935)
+++ ide/revision.inc	(working copy)
@@ -1,2 +1,2 @@
 // Created by Svn2RevisionInc
-const RevisionStr = '9891';
+const RevisionStr = '9917M';
Index: lcl/interfaces/qt/qtobjects.pas
===
--- lcl/interfaces/qt/qtobjects.pas	(revision 9935)
+++ lcl/interfaces/qt/qtobjects.pas	(working copy)
@@ -26,6 +26,7 @@
 function Get(Index : Integer) : string; override;
 //procedure SetSorted(Val : boolean); virtual;
   public
+LCLObject: TWinControl;
 constructor Create(ListWidgetH : QListWidgetH; TheOwner: TWinControl);
 destructor Destroy; override;
 procedure Assign(Source : TPersistent); override;
@@ -471,11 +472,7 @@
 end;
 
 function TQtListStrings.Get(Index: Integer): string;
-{var
-  QListWidgetItem: QListWidgetItemH;}
 begin
-{  QListWidgetItem := QListWidget_item(FQtListWidget, Index);
-  Result := QListWidgetItem;}
   if FListChanged then InternalUpdate;
   if Index < FStringList.Count then
  Result := FStringList.Strings[Index]
@@ -501,9 +498,14 @@
   FOwner:=TheOwner;
   // Callback Event
   {Method := ListChanged;}
+(*  TEventFilterMethod(Method) := ListChangedHandler;
+  Hook := QListWidget_hook_create(FQtListWidget);
+  QListWidget_hook_hook_itemChanged(Hook,Method); *)
+  // Callback Event
+  {Method := ListChanged;}
   TEventFilterMethod(Method) := ListChangedHandler;
   Hook := QListWidget_hook_create(FQtListWidget);
-  QListWidget_hook_hook_itemChanged(Hook,Method);
+  QListWidget_hook_hook_currentItemChanged(Hook,Method);
 end;
 
 destructor TQtListStrings.Destroy;
@@ -562,8 +564,17 @@
 
 function TQtListStrings.ListChangedHandler(Sender: QObjectH; Event: QEventH
   ): Boolean; cdecl;
+var
+  Mess: TLMessage;
 begin
-
+ //  if not FUpdating then begin
+//FTextChanged := True;
+FillChar(Mess, SizeOf(Mess), #0);
+Mess.Msg := LM_SELCHANGE;
+//(FOwner as TCustomMemo).Modified := True;
+FOwner.Dispatch(TLMessage(Mess));
+//end;
+  Result := True;
 end;
 
 end.
Index: lcl/interfaces/qt/qtprivate.pp
===
--- lcl/interfaces/qt/qtprivate.pp	(revision 9935)
+++ lcl/interfaces/qt/qtprivate.pp	(working copy)
@@ -286,11 +286,14 @@
   end;
 
   
+  { TQtListWidget }
+
   TQtListWidget = class(TQtListView)
   private
   public
 constructor Create(const AWinControl: TWinControl; const AParams: TCreateParams); override;
 destructor Destroy; override;
+procedure SlotClicked(ModelIndex: QModelIndexH); cdecl;
   public
 function currentRow: Integer;
 procedure setCurrentRow(row: Integer);
@@ -2187,6 +2190,19 @@
   inherited Destroy;
 end;
 
+procedure TQtListWidget.SlotClicked(ModelIndex: QModelIndexH); cdecl;
+var
+  Msg: TLMessage;
+begin
+  Msg.Msg := LM_CLICKED;
+
+  try
+LCLObject.WindowProc(TLMessage(Msg));
+  except
+Application.HandleException(nil);
+  end;
+end;
+
 {--
   Function: TQtListWidget.currentRow
   Params:  None
Index: lcl/interfaces/qt/qtwsstdctrls.pp
===
--- lcl/interfaces/qt/qtwsstdctrls.pp	(revision 9935)
+++ lcl/interfaces/qt/qtwsstdctrls.pp	(working copy)
@@ -107,6 +107,7 @@
 
   TQtWSCustomListBox = class(TWSCustomListBox)
   private
+class procedure SetSlots(const QtListWidget: TQtListWidget);
   protected
   public
 class function  CreateHandle(const AWinControl: TWinControl;
@@ -306,6 +307,15 @@
 
 { TQtWSCustomListBox }
 
+class procedure TQtWSCustomListBox.SetSlots(const QtListWidget: TQtListWidget);
+var
+  Method: TMethod;
+begin
+  QAbstractItemView_clicked_Event(Method) := QtListWidget.SlotClicked;
+
+  QAbstractItemView_hook_hook_clicked(QListWidget_hook_create(QtListWidget.Widget), Method);
+end;
+
 {--
   Method: TQtWSCustomListBox.CreateHandle
   Params:  None
@@ -316,6 +326,7 @@
   QtListWidget: TQtListWidget;
 begin
   QtListWidget := TQtListWidGet.Create(AWinControl, AParams);
+  SetSlots(QtListWidget);
   Result := THandle(QtListWidget);
 end;
 


Re: [lazarus] LCL error: OnDrawItem

2006-09-16 Thread Luis R. Hilario B.

Now it compiled well.

2006/9/16, Mattias Gaertner <[EMAIL PROTECTED]>:

On Sat, 16 Sep 2006 09:46:58 -0400
"Luis R. Hilario B." <[EMAIL PROTECTED]> wrote:

> Find declaration and compilarion.
> Because the statement is different:
>
> Unit1.pas
> procedure ListBox1DrawItem(Control: TWinControl; Index: LongInt;
>   ARect: TRect; State: TBaseOwnerDrawState);
>
> stdctrls.pp
> TDrawItemEvent = procedure(Control: TWinControl; Index: Integer;
>   ARect: TRect; State: TOwnerDrawState)

The IDE now uses the source declaration instead of the RTTI and adds
the needed units to the uses section.


Mattias



>
> 2006/9/16, Mattias Gaertner <[EMAIL PROTECTED]>:
> > On Fri, 15 Sep 2006 22:44:34 -0400
> > "Luis R. Hilario B." <[EMAIL PROTECTED]> wrote:
> >
> > > Hello,
> > >
> > > Error: Identifier not found "TBaseOwnerDrawState"
> > >
> > > ../lcl/stdctrls.pp
> > > TDrawItemEvent = procedure(Control: TWinControl; Index: Integer;
> > >  ARect: TRect; State: TOwnerDrawState
> > > <
> >
> > Please give more details.
> > Find declaration or identifier completion or compilation ... .
> > All three work here.
> >
> >
> > Mattias
> >
> > _
> >  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




--
http://luisdigital.com

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


Re: [lazarus] LCL error: OnDrawItem

2006-09-16 Thread Luis R. Hilario B.

Find declaration and compilarion.
Because the statement is different:

Unit1.pas
procedure ListBox1DrawItem(Control: TWinControl; Index: LongInt;
 ARect: TRect; State: TBaseOwnerDrawState);

stdctrls.pp
TDrawItemEvent = procedure(Control: TWinControl; Index: Integer;
 ARect: TRect; State: TOwnerDrawState)

2006/9/16, Mattias Gaertner <[EMAIL PROTECTED]>:

On Fri, 15 Sep 2006 22:44:34 -0400
"Luis R. Hilario B." <[EMAIL PROTECTED]> wrote:

> Hello,
>
> Error: Identifier not found "TBaseOwnerDrawState"
>
> ../lcl/stdctrls.pp
> TDrawItemEvent = procedure(Control: TWinControl; Index: Integer;
>  ARect: TRect; State: TOwnerDrawState
> <

Please give more details.
Find declaration or identifier completion or compilation ... .
All three work here.


Mattias

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




--
http://luisdigital.com

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


[lazarus] LCL error: OnDrawItem

2006-09-15 Thread Luis R. Hilario B.

Hello,

Error: Identifier not found "TBaseOwnerDrawState"

../lcl/stdctrls.pp
TDrawItemEvent = procedure(Control: TWinControl; Index: Integer;
ARect: TRect; State: TOwnerDrawState <
--
http://luisdigital.com

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


Re: [lazarus] Roadmap Qt update

2006-09-15 Thread Luis R. Hilario B.

2006/9/15, Graeme Geldenhuys <[EMAIL PROTECTED]>:

On 15/09/06, Felipe Monteiro de Carvalho
<[EMAIL PROTECTED]> wrote:
> > Green light for roadmap:
> > TListBox
> > TFileListBox
>
> Added.
>
> > There is some page where is known who is working with x component?
>
> What do you mean by x component? THe X11 port of LCL?

I dont' think he ment it as X11. I think he ment is as component X or
component Y or component Z.  x being a placeholder for whatever
components need work in the Qt->LCL code.


Yes (x,y,z) :)
But already I saw what wanted:
http://www.freepascal.org/cgi-bin/viewcvs.cgi/trunk/lcl/interfaces/qt/qtprivate.pp?root=lazarus&rev=9893&view=log

Three (+/-) people working with Qt.

Someone more is encouraged?
is not very difficult and Felipe helps a lot.


Regards,
  - Graeme -

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




--
http://luisdigital.com

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


[lazarus] Roadmap Qt update

2006-09-14 Thread Luis R. Hilario B.

Hello,

Green light for roadmap:
TListBox
TFileListBox
http://wiki.lazarus.freepascal.org/Roadmap

There is some page where is known who is working with x component?
--
http://luisdigital.com


QtListbox.png
Description: PNG image


Re: Media attention

2006-09-11 Thread Luis R. Hilario B.

http://barrapunto.com/article.pl?sid=06/09/11/2329221&mode=thread
:)

2006/9/11, Luis R. Hilario B. <[EMAIL PROTECTED]>:

Hello,

We have the attention of the media, so smile to the public. :)
--
http://luisdigital.com




--
http://luisdigital.com

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


[lazarus] Media attention

2006-09-11 Thread Luis R. Hilario B.

Hello,

We have the attention of the media, so smile to the public. :)
--
http://luisdigital.com

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


Re: [lazarus] The spirit lost of Borland

2006-09-06 Thread Luis R. Hilario B.

IE v6 SP1

2006/9/6, Felipe Monteiro de Carvalho <[EMAIL PROTECTED]>:

Look at the list of pre-requisites:

Microsoft .NET Framework v1.1,
Microsoft .NET SDK v1.1,
Microsoft Visual J# v1.1,
Microsoft XML Core Services v4.0 SP2.

--
Felipe Monteiro de Carvalho

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




--
http://luisdigital.com

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


[lazarus] Identifier not found "TQtListView"

2006-09-06 Thread Luis R. Hilario B.

Hello,

Trying to implement TListBox, the error:
qtwsstdctrls.pp(303,15) Error: Identifier not found "TQtListView"

class function TQtWSCustomListBox.CreateHandle(const AWinControl: TWinControl;
 const AParams: TCreateParams): HWND;
var
 QtListView: TQtListView;
begin
 QtListView := TQtListView.Create(AWinControl, AParams);
 Result := THandle(QtListView);
end;

It says in the Wiki "This isn´t difficult."
Good for the one that knows. :)
--
http://luisdigital.com

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


Re: [lazarus] The spirit lost of Borland

2006-09-06 Thread Luis R. Hilario B.

Some errors of translation, like "I Disturb Dephi" (Turbo Delphi).

But they can translate using http://www.freetranslation.com/ of
Spanish-English, and is understood more or less.

There is a review in PCMagazine:
http://www.pcmag.com/article2/0,1759,2011448,00.asp

according to the author, bad the unique thing that has is:
"As noted, the Turbo Explorer editions are self-contained and don't
support adding third-party components."
"Abundance of features may be overwhelming to new users."

Should be a joke.

2006/9/6, Ewald Horn <[EMAIL PROTECTED]>:

Hi Luis,

you are quite correct. The company I knew as Borland (back in 1995 - 1997)
has long ago ceased to exist. Since Delphi 6 I've given up on Borland,
especially after they seemed to loose focus and  got .Net crazy. I've had no
intention of downloading the Turbo stuff (I still own a copy of Turbo Pascal
7.0 :) since I'm very impressed by FPC and Lazarus, but it is good to know
that I made the right choice when I moved away from Borland. Forcing .Net on
someone, well, that should be a crime!

Thank the heavens for products such as NetBeans, Lazarus and the Free Pascal
Compiler! Now even one-man businesses can survive the harsh startup costs
involved with doing your own thing. Hats off to the FPC and Lazarus teams!

Kind regards
Ewald Horn


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




--
http://luisdigital.com

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


[lazarus] The spirit lost of Borland

2006-09-06 Thread Luis R. Hilario B.

Hello,

Some comments about I Disturb Delphi in Spanish:
http://barrapunto.com/journal.pl?op=display&uid=803&id=22622

And here in English:
http://bdn.borland.com/article/33659

In conclusion can be told that Borland has not filled the expectation.
--
http://luisdigital.com

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


Re: [lazarus] fpGUI and Qt

2006-09-05 Thread Luis R. Hilario B.

It sounds better than .Net/Mono
Thanks by the information.

2006/9/5, A.J. Venter <[EMAIL PROTECTED]>:

> >
> > KDE is a desktop environment that is written on Qt. It has a library
> > with some widgets, but nothing really necessary. We can base LCL only
> > on Qt and be desktop environment independent.
>
> It believed that KDE added many new things to Qt or more facility, for
> access peripheral for example (scanner, parallel port, etc.) .
Lazarus is working on QT4 support, which will be the base for KDE4. But with
KDE4 there will be a fairly significant new innovation called RuDI which will
replace kdelibs for third-party apps.
Basically if you use RuDI your programs will be able to use KDE widgets
including all their extra functionality (like network transparent
file-access) when in KDE, will use GNOME widgets when run under gnome, aqua
widgets when run under aqua and win32 widgets when run under windows - all
without ever changing the code.
Basically RuDI is taking a slightly different mechanism to try and achieve
exactly what te LCL is intended to achieve - at least in terms of platform
neutrality, and the motivation was exactly this - so that third party
developers can support KDE integration without needing massive amounts of
complexity to support other desktops/platforms.

The RuDI mechanism is different though, the apps using RuDI don't link to any
libraries for widgets, just to the RuDI support libs, the actuall calls are
replaced with xml messages which the an interface to the local libraries then
pass on to the appropriate handler- be that DCOP or DCOM :)

See this page for more information:
http://tom.acrewoods.net/writing/kde4

I for one would love to be able to port my apps to RuDI eventually.

Ciao
A.J.
--
"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




--
http://luisdigital.com

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


Re: [lazarus] fpGUI and Qt

2006-09-04 Thread Luis R. Hilario B.

http://www.trolltech.com/developer/downloads/qt/x11

Result:
http://www.luisdigital.com/varios/ (Qt4.png)
Qt is pretty and powerful.

Two hours compiling (less QtDesigner, has problems).
Recalled me the old times, http://dot.kde.org/971834156/

Tomorrow will be a great day:  Testing Qt with Lazarus, TurboExplorer
and I have a years more than life!

Mm, Already is day 5!
Happy birthday!!! xD


2006/9/4, Felipe Monteiro de Carvalho <[EMAIL PROTECTED]>:

On 9/4/06, Luis R. Hilario B. <[EMAIL PROTECTED]> wrote:
> Mandriva 10.2 (2005 LE).
> qt4-common-4.1.4-12mdv2007.0.i586.rpm

Before you install that you need another package:

libqtgui4

And maybe others. It´s best to use URPMI to install those packages.
Just add a good repository that has Qt4.

> It believed that KDE added many new things to Qt or more facility, for
> access peripheral for example (scanner, parallel port, etc.) .

Yes, but it´s desktop environment dependent. It´s much better to
create our own units. We already have good support for parallel port
for example.

--
Felipe Monteiro de Carvalho

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




--
http://luisdigital.com

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


Re: [lazarus] fpGUI and Qt

2006-09-04 Thread Luis R. Hilario B.

2006/9/4, Felipe Monteiro de Carvalho <[EMAIL PROTECTED]>:

On 9/4/06, Luis R. Hilario B. <[EMAIL PROTECTED]> wrote:
> Some aid in the Wiki to install Qt4?
> Is not very new?

Ummm, the problem is that this changes from distribution to distribution.

If your distribution is RPM based then go to this website:

http://rpm.pbone.net/index.php3/stat/2/simple/2

And find a package for your distribution. Search for qt4


Mandriva 10.2 (2005 LE).
qt4-common-4.1.4-12mdv2007.0.i586.rpm

But if does not it function, I will test with:
ftp://ftp.trolltech.com/qt/source/INSTALL


> Why not KDE?  Lazarus would be very powerful.
> I like to ask. :)

What do you mean by KDE?

KDE is a desktop environment that is written on Qt. It has a library
with some widgets, but nothing really necessary. We can base LCL only
on Qt and be desktop environment independent.


It believed that KDE added many new things to Qt or more facility, for
access peripheral for example (scanner, parallel port, etc.) .

--
Felipe Monteiro de Carvalho

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




--
http://luisdigital.com

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


Re: [lazarus] fpGUI and Qt

2006-09-04 Thread Luis R. Hilario B.

I do not have Qt4 (I have Qt3).
And only they are the sources to install Qt4.
http://www.trolltech.com/developer/downloads/qt/x11

Some aid in the Wiki to install Qt4?
Is not very new?

Why not KDE?  Lazarus would be very powerful.
I like to ask. :)

2006/9/4, Felipe Monteiro de Carvalho <[EMAIL PROTECTED]>:

On 9/4/06, Luis R. Hilario B. <[EMAIL PROTECTED]> wrote:
> Which is the web of fpGUI and Qt(LCL)?
> They are usables these projects.

A few days ago I implemented TLabel for LCL-Qt, so it´s best if you
use the subversion lazarus to test it.

The interface works on Unixes and Mac OS X.

If you have any application you with to recompile for Qt, just say
what it needs and I will try to implement the necessary parts (if it
doesn´t take too much time).

> I got no idea at what level the Qt4 Bindings are at

They are very complete and well tested.

--
Felipe Monteiro de Carvalho

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




--
http://luisdigital.com

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


[lazarus] fpGUI and Qt

2006-09-04 Thread Luis R. Hilario B.

Hello,

Which is the web of fpGUI and Qt(LCL)?
They are usables these projects.

Thanks.
--
http://luisdigital.com

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


[lazarus] Turbo explorer

2006-08-08 Thread Luis R. Hilario B.

Hello,

"CUPERTINO, Calif. — August 8, 2006 — Today, the Developer Tools Group
of Borland Software Corporation (NASDAQ: BORL) announced plans to
release single language versions of Borland Developer Studio, the
company's development environment for Microsoft(r) Windows(r) and .NET
applications. Bringing back the popular Turbo™ moniker, the new
Borland Turbo products offer low-cost, language-specific rapid
application development capabilities for students, hobbyist
developers, occupational developers as well as individual
professionals."

http://www.turboexplorer.com/
What do you think?
they're back to do it again?

--
http://luisdigital.com

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


Re: [lazarus] ListView bug

2006-01-16 Thread Luis R. Hilario B.
Fixed. Thanks You.

2006/1/16, Mattias Gaertner <[EMAIL PROTECTED]>:
> On Wed, 11 Jan 2006 10:30:25 -0400
> "Luis R. Hilario B." <[EMAIL PROTECTED]> wrote:
>
> > Another bug (same place, can be).
> >
> > Lazarus windows say:
> > "Error in TimageLIstComponentEditor
> > The component editor of class "TImageListComponentEditor"
> > invoked with verb #0 "Image list editor..."
> > has created the error:
> > "Access violation""
> >
> >
> > TCustomListView.SetSelection FSelected=B752C9D4
> > TCustomListView.SetSelection FSelected=B752C014
> > TApplication.HandleException Access violation
> >   Stack trace:
> >   $081CD0F8  TCUSTOMLISTVIEW__CNNOTIFY,  line 124 of
> > ./include/customlistview.inc
>
> Maybe fixed. Please test.
>
> Mattias
>
>
> >   $0805D14B
> >   $08135DE2  TCONTROL__WNDPROC,  line 1520 of ./include/control.inc
> >   $0812D79D  TWINCONTROL__WNDPROC,  line 3046 of ./include/wincontrol.inc
> >   $08149BF9  DELIVERMESSAGE,  line 3447 of gtkproc.inc
> >   $081E3886  GTKWSCUSTOMLISTVIEW_SELECTROW,  line 118 of
> >   gtkwscustomlistview.inc $B7E06EAF  CODEEXPLOPTS_finalize,  line 104 of
> >   debugoptionsfrm.pas $D015
> > Note: GetTextBuf is overridden for: °pNä.··_«ôÿÈè_
> > TApplication.HandleException: there was another exception during
> > showing the first exception
> > TDesigner.OnComponentEditorVerbMenuItemClick ERROR: Access violation
> > TApplication.HandleException: there was another exception during
> > showing the first exception
> >
> >
> > 2006/1/11, Mattias Gaertner <[EMAIL PROTECTED]>:
> > > On Tue, 10 Jan 2006 22:08:26 -0400
> > > "Luis R. Hilario B." <[EMAIL PROTECTED]> wrote:
> > >
> > > > I already found it.  It was in the LCL (customlistview.*), but Windows
> > > > was not affected, rare.
> > >
> > > Some events are different. That's why the LCL is flexible and we always
> > > suggest, that a programmer avoids using messages.
> > >
> > > Mattias
> > >
> > >
> > >
> > > >
> > > > 2006/1/10, Luis R. Hilario B. <[EMAIL PROTECTED]>:
> > > > > Thanks you!
> > > > >
> > > > > Which file has the modifications?
> > > > > http://www.freepascal.org/cgi-bin/viewcvs.cgi/trunk/?root=lazarus
> > > > >
> > > > > 2006/1/10, Mattias Gaertner <[EMAIL PROTECTED]>:
> > > > > > On Wed, 4 Jan 2006 20:27:50 -0400
> > > > > > "Luis R. Hilario B." <[EMAIL PROTECTED]> wrote:
> > > > > >
> > > > > > > 2006/1/4, Mattias Gaertner <[EMAIL PROTECTED]>:
> > > > > > > > On Wed, 4 Jan 2006 10:16:26 -0400
> > > > > > > > "Luis R. Hilario B." <[EMAIL PROTECTED]> wrote:
> > > > > > > >
> > > > > > > > > Hello,
> > > > > > > > >
> > > > > > > > > if TListView.Items.Delete(Last.Selected.Index) then Lazarus
> > > > > > > > > crash;
> > > > > > > >
> > > > > > > > Can you send an example?
> > > > > > > >
> > > > > > > I cannot reproduce the problem with an example.
> > > > > > >
> > > > > > > And it is different with "Code Templates" : erasing the first
> > > > > > > time functions well, but when is erased again (the last one
> > > > > > > selected) failure: "List index (24) out of bounds."
> > > > > >
> > > > > > Fixed.
> > > > > > The Selected was not updated properly.
> > > > > >
> > > > > > Mattias
> > > > > >
> > > > > > _
> > > > > >  To unsubscribe: mail [EMAIL PROTECTED] with
> > > > > > "unsubscribe" as the Subject
> > > > > >archives at http://www.lazarus.freepascal.org/mailarchives
> > > > > >
> > > > >
> > > > >
> > > > > --
> > > > > http://luisdigital.com
> > > > >
> > > >
> > > >
> > > > --
> > > > http://luisdigital.com
> > > >
> > > > _
> > > >  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
> > >
> >
> >
> > --
> > http://luisdigital.com
> >
> > _
> >  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
>


--
http://luisdigital.com

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


Re: [lazarus] 2 Exception Windows

2006-01-11 Thread Luis R. Hilario B.
Mmm, Ok.
But that passes if is not a graphic (X11, Windows) program, also appears?

Last question of the day, promise.  :D
And many thanks, you (all) they are marvelous.

2006/1/11, Mattias Gaertner <[EMAIL PROTECTED]>:
> On Wed, 11 Jan 2006 19:09:47 -0400
> "Luis R. Hilario B." <[EMAIL PROTECTED]> wrote:
>
> > Using:
> > Try
> >  ...
> > Except
> >  On Exception do
> >  ...
> > end;
> >
> > Works well (only my window appears).
> >
> > What does "Application.CaptureExceptions"?
> > It can be what I seek, but does not function, always "True".
>
> Application.CaptureExceptions = true means, catch exceptions and show the
> dialog.
> Otherwise unhandled exceptions will halt the application. This can be useful
> for hard to find bugs.
>
>
> Mattias
>
>
> >
> > 2006/1/11, Mattias Gaertner <[EMAIL PROTECTED]>:
> > > On Wed, 11 Jan 2006 18:04:19 -0400
> > > "Luis R. Hilario B." <[EMAIL PROTECTED]> wrote:
> > >
> > > > Hello,
> > > >
> > > > Two windows appear when an exception is generated, mine (personalized)
> > > > and another generic one.
> > > >
> > > > How do I do so that not the generic one appear?
> > >
> > > Application.OnException:[EMAIL PROTECTED];
> > >
> > > Mattias
> > >
> > > _
> > >  To unsubscribe: mail [EMAIL PROTECTED] with
> > > "unsubscribe" as the Subject
> > >archives at http://www.lazarus.freepascal.org/mailarchives
> > >
> >
> >
> > --
> > http://luisdigital.com
> >
> > _
> >  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
>


--
http://luisdigital.com

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


Re: [lazarus] 2 Exception Windows

2006-01-11 Thread Luis R. Hilario B.
Using:
Try
 ...
Except
 On Exception do
 ...
end;

Works well (only my window appears).

What does "Application.CaptureExceptions"?
It can be what I seek, but does not function, always "True".

2006/1/11, Mattias Gaertner <[EMAIL PROTECTED]>:
> On Wed, 11 Jan 2006 18:04:19 -0400
> "Luis R. Hilario B." <[EMAIL PROTECTED]> wrote:
>
> > Hello,
> >
> > Two windows appear when an exception is generated, mine (personalized)
> > and another generic one.
> >
> > How do I do so that not the generic one appear?
>
> Application.OnException:[EMAIL PROTECTED];
>
> Mattias
>
> _
>  To unsubscribe: mail [EMAIL PROTECTED] with
> "unsubscribe" as the Subject
>archives at http://www.lazarus.freepascal.org/mailarchives
>


--
http://luisdigital.com

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


[lazarus] 2 Exception Windows

2006-01-11 Thread Luis R. Hilario B.
Hello,

Two windows appear when an exception is generated, mine (personalized)
and another generic one.

How do I do so that not the generic one appear?
Thanks.
--
http://luisdigital.com

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


Re: [lazarus] ListView bug

2006-01-11 Thread Luis R. Hilario B.
Another bug (same place, can be).

Lazarus windows say:
"Error in TimageLIstComponentEditor
The component editor of class "TImageListComponentEditor"
invoked with verb #0 "Image list editor..."
has created the error:
"Access violation""


TCustomListView.SetSelection FSelected=B752C9D4
TCustomListView.SetSelection FSelected=B752C014
TApplication.HandleException Access violation
  Stack trace:
  $081CD0F8  TCUSTOMLISTVIEW__CNNOTIFY,  line 124 of
./include/customlistview.inc
  $0805D14B
  $08135DE2  TCONTROL__WNDPROC,  line 1520 of ./include/control.inc
  $0812D79D  TWINCONTROL__WNDPROC,  line 3046 of ./include/wincontrol.inc
  $08149BF9  DELIVERMESSAGE,  line 3447 of gtkproc.inc
  $081E3886  GTKWSCUSTOMLISTVIEW_SELECTROW,  line 118 of gtkwscustomlistview.inc
  $B7E06EAF  CODEEXPLOPTS_finalize,  line 104 of debugoptionsfrm.pas
  $D015
Note: GetTextBuf is overridden for: °pNä.··_«ôÿÈè_
TApplication.HandleException: there was another exception during
showing the first exception
TDesigner.OnComponentEditorVerbMenuItemClick ERROR: Access violation
TApplication.HandleException: there was another exception during
showing the first exception


2006/1/11, Mattias Gaertner <[EMAIL PROTECTED]>:
> On Tue, 10 Jan 2006 22:08:26 -0400
> "Luis R. Hilario B." <[EMAIL PROTECTED]> wrote:
>
> > I already found it.  It was in the LCL (customlistview.*), but Windows
> > was not affected, rare.
>
> Some events are different. That's why the LCL is flexible and we always
> suggest, that a programmer avoids using messages.
>
> Mattias
>
>
>
> >
> > 2006/1/10, Luis R. Hilario B. <[EMAIL PROTECTED]>:
> > > Thanks you!
> > >
> > > Which file has the modifications?
> > > http://www.freepascal.org/cgi-bin/viewcvs.cgi/trunk/?root=lazarus
> > >
> > > 2006/1/10, Mattias Gaertner <[EMAIL PROTECTED]>:
> > > > On Wed, 4 Jan 2006 20:27:50 -0400
> > > > "Luis R. Hilario B." <[EMAIL PROTECTED]> wrote:
> > > >
> > > > > 2006/1/4, Mattias Gaertner <[EMAIL PROTECTED]>:
> > > > > > On Wed, 4 Jan 2006 10:16:26 -0400
> > > > > > "Luis R. Hilario B." <[EMAIL PROTECTED]> wrote:
> > > > > >
> > > > > > > Hello,
> > > > > > >
> > > > > > > if TListView.Items.Delete(Last.Selected.Index) then Lazarus
> > > > > > > crash;
> > > > > >
> > > > > > Can you send an example?
> > > > > >
> > > > > I cannot reproduce the problem with an example.
> > > > >
> > > > > And it is different with "Code Templates" : erasing the first time
> > > > > functions well, but when is erased again (the last one selected)
> > > > > failure: "List index (24) out of bounds."
> > > >
> > > > Fixed.
> > > > The Selected was not updated properly.
> > > >
> > > > Mattias
> > > >
> > > > _
> > > >  To unsubscribe: mail [EMAIL PROTECTED] with
> > > > "unsubscribe" as the Subject
> > > >archives at http://www.lazarus.freepascal.org/mailarchives
> > > >
> > >
> > >
> > > --
> > > http://luisdigital.com
> > >
> >
> >
> > --
> > http://luisdigital.com
> >
> > _
> >  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
>


--
http://luisdigital.com

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


Re: [lazarus] ListView bug

2006-01-10 Thread Luis R. Hilario B.
I already found it.  It was in the LCL (customlistview.*), but Windows
was not affected, rare.

2006/1/10, Luis R. Hilario B. <[EMAIL PROTECTED]>:
> Thanks you!
>
> Which file has the modifications?
> http://www.freepascal.org/cgi-bin/viewcvs.cgi/trunk/?root=lazarus
>
> 2006/1/10, Mattias Gaertner <[EMAIL PROTECTED]>:
> > On Wed, 4 Jan 2006 20:27:50 -0400
> > "Luis R. Hilario B." <[EMAIL PROTECTED]> wrote:
> >
> > > 2006/1/4, Mattias Gaertner <[EMAIL PROTECTED]>:
> > > > On Wed, 4 Jan 2006 10:16:26 -0400
> > > > "Luis R. Hilario B." <[EMAIL PROTECTED]> wrote:
> > > >
> > > > > Hello,
> > > > >
> > > > > if TListView.Items.Delete(Last.Selected.Index) then Lazarus crash;
> > > >
> > > > Can you send an example?
> > > >
> > > I cannot reproduce the problem with an example.
> > >
> > > And it is different with "Code Templates" : erasing the first time
> > > functions well, but when is erased again (the last one selected)
> > > failure: "List index (24) out of bounds."
> >
> > Fixed.
> > The Selected was not updated properly.
> >
> > Mattias
> >
> > _
> >  To unsubscribe: mail [EMAIL PROTECTED] with
> > "unsubscribe" as the Subject
> >archives at http://www.lazarus.freepascal.org/mailarchives
> >
>
>
> --
> http://luisdigital.com
>


--
http://luisdigital.com

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


Re: [lazarus] ListView bug

2006-01-10 Thread Luis R. Hilario B.
Thanks you!

Which file has the modifications?
http://www.freepascal.org/cgi-bin/viewcvs.cgi/trunk/?root=lazarus

2006/1/10, Mattias Gaertner <[EMAIL PROTECTED]>:
> On Wed, 4 Jan 2006 20:27:50 -0400
> "Luis R. Hilario B." <[EMAIL PROTECTED]> wrote:
>
> > 2006/1/4, Mattias Gaertner <[EMAIL PROTECTED]>:
> > > On Wed, 4 Jan 2006 10:16:26 -0400
> > > "Luis R. Hilario B." <[EMAIL PROTECTED]> wrote:
> > >
> > > > Hello,
> > > >
> > > > if TListView.Items.Delete(Last.Selected.Index) then Lazarus crash;
> > >
> > > Can you send an example?
> > >
> > I cannot reproduce the problem with an example.
> >
> > And it is different with "Code Templates" : erasing the first time
> > functions well, but when is erased again (the last one selected)
> > failure: "List index (24) out of bounds."
>
> Fixed.
> The Selected was not updated properly.
>
> Mattias
>
> _
>  To unsubscribe: mail [EMAIL PROTECTED] with
> "unsubscribe" as the Subject
>archives at http://www.lazarus.freepascal.org/mailarchives
>


--
http://luisdigital.com

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


Re: [lazarus] ListView bug

2006-01-04 Thread Luis R. Hilario B.
2006/1/4, Mattias Gaertner <[EMAIL PROTECTED]>:
> On Wed, 4 Jan 2006 17:53:26 -0400
> "Luis R. Hilario B." <[EMAIL PROTECTED]> wrote:
>
> > Add icons in "Image list editor" (for example) and select the last
> > one, clic "Delete" and BOOM.
>
> That was exactly what I did, but I didn't heard the BOOM.
:D
> What lazarus/fpc version are you using?
lazarus-0.9.11-20060104-src.tar.bz2

> Can you write a small example?
Right now not, later I will be able (they are going to use my PC).

I have created a Flash, I expect that can see it:
http://luisdigital.com/varios/listviewbug.htm
>
>
> Mattias
>
>
> >
> > 2006/1/4, Mattias Gaertner <[EMAIL PROTECTED]>:
> > > On Wed, 4 Jan 2006 17:40:01 -0400
> > > "Luis R. Hilario B." <[EMAIL PROTECTED]> wrote:
> > >
> > > > lazarus/ideintf/imagelisteditor.pp
> > > > Line 187:fLv.Items.Delete(Il.Index);
> > >
> > > How?
> > >
> > >
> > > > But is a general failure in GTK, for example "Code Templates" also
> > > > fails.
> > >
> > > How?
> > >
> > > Mattias
> > >
> > >
> > > >
> > > > 2006/1/4, Mattias Gaertner <[EMAIL PROTECTED]>:
> > > > > On Wed, 4 Jan 2006 10:16:26 -0400
> > > > > "Luis R. Hilario B." <[EMAIL PROTECTED]> wrote:
> > > > >
> > > > > > Hello,
> > > > > >
> > > > > > if TListView.Items.Delete(Last.Selected.Index) then Lazarus crash;
> > > > >
> > > > > Can you send an example?
> > > > >
> > > > > Mattias
> > > > >
> > > > >
> > > > > >
> > > > > > Only GTK.
> > > > > >
> > > > > > TApplication.HandleException List index (7) out of bounds
> > > > > >   Stack trace:
> > > > > >   $080BA63E
> > > > > > TApplication.HandleException Access violation
> > > > > >   Stack trace:
> > > > > >   $081CA9EF  TLISTITEM__SETSTATE,  line 524 of
> > > > > >   ./include/listitem.inc $081CC4D2  TCUSTOMLISTVIEW__DOSELECTITEM,
> > > > > >line 225 of
> > > > > > ./include/customlistview.inc
> > > > > >   $081CC200  TCUSTOMLISTVIEW__CNNOTIFY,  line 148 of
> > > > > > ./include/customlistview.inc
> > > > > >   $0805D14B
> > > > > >   $08135602  TCONTROL__WNDPROC,  line 1520 of
> > > > > >   ./include/control.inc $0812CFAD  TWINCONTROL__WNDPROC,  line
> > > > > >   3046 of ./include/wincontrol.inc $081493F9  DELIVERMESSAGE,
> > > > > >   line 3447 of gtkproc.inc $081E2646
> > > > > >   GTKWSCUSTOMLISTVIEW_SELECTROW,  line 118 of
> > > > > >   gtkwscustomlistview.inc $B7E06EAF  CODEEXPLOPTS_finalize,  line
> > > > > >   104 of debugoptionsfrm.pas $D015
> > > > > > Note: GetTextBuf is overridden for: [EMAIL PROTECTED] (c)_
> > > > > >
> > > > > > --
> > > > > > http://luisdigital.com
> > > > > >
> > > > > > _
> > > > > >  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
> > > > >
> > > >
> > > >
> > > > --
> > > > http://luisdigital.com
> > > >
> > > > _
> > > >  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
> > >
> >
> >
> > --
> > http://luisdigital.com
> >
> > _
> >  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
>


--
http://luisdigital.com

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


Re: [lazarus] ListView bug

2006-01-04 Thread Luis R. Hilario B.
Add icons in "Image list editor" (for example) and select the last
one, clic "Delete" and BOOM.

2006/1/4, Mattias Gaertner <[EMAIL PROTECTED]>:
> On Wed, 4 Jan 2006 17:40:01 -0400
> "Luis R. Hilario B." <[EMAIL PROTECTED]> wrote:
>
> > lazarus/ideintf/imagelisteditor.pp
> > Line 187:fLv.Items.Delete(Il.Index);
>
> How?
>
>
> > But is a general failure in GTK, for example "Code Templates" also fails.
>
> How?
>
> Mattias
>
>
> >
> > 2006/1/4, Mattias Gaertner <[EMAIL PROTECTED]>:
> > > On Wed, 4 Jan 2006 10:16:26 -0400
> > > "Luis R. Hilario B." <[EMAIL PROTECTED]> wrote:
> > >
> > > > Hello,
> > > >
> > > > if TListView.Items.Delete(Last.Selected.Index) then Lazarus crash;
> > >
> > > Can you send an example?
> > >
> > > Mattias
> > >
> > >
> > > >
> > > > Only GTK.
> > > >
> > > > TApplication.HandleException List index (7) out of bounds
> > > >   Stack trace:
> > > >   $080BA63E
> > > > TApplication.HandleException Access violation
> > > >   Stack trace:
> > > >   $081CA9EF  TLISTITEM__SETSTATE,  line 524 of ./include/listitem.inc
> > > >   $081CC4D2  TCUSTOMLISTVIEW__DOSELECTITEM,  line 225 of
> > > > ./include/customlistview.inc
> > > >   $081CC200  TCUSTOMLISTVIEW__CNNOTIFY,  line 148 of
> > > > ./include/customlistview.inc
> > > >   $0805D14B
> > > >   $08135602  TCONTROL__WNDPROC,  line 1520 of ./include/control.inc
> > > >   $0812CFAD  TWINCONTROL__WNDPROC,  line 3046 of
> > > >   ./include/wincontrol.inc $081493F9  DELIVERMESSAGE,  line 3447 of
> > > >   gtkproc.inc $081E2646  GTKWSCUSTOMLISTVIEW_SELECTROW,  line 118 of
> > > >   gtkwscustomlistview.inc $B7E06EAF  CODEEXPLOPTS_finalize,  line 104
> > > >   of debugoptionsfrm.pas $D015
> > > > Note: GetTextBuf is overridden for: [EMAIL PROTECTED] (c)_
> > > >
> > > > --
> > > > http://luisdigital.com
> > > >
> > > > _
> > > >  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
> > >
> >
> >
> > --
> > http://luisdigital.com
> >
> > _
> >  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
>


--
http://luisdigital.com

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


Re: [lazarus] ListView bug

2006-01-04 Thread Luis R. Hilario B.
lazarus/ideintf/imagelisteditor.pp
Line 187:fLv.Items.Delete(Il.Index);

But is a general failure in GTK, for example "Code Templates" also fails.

2006/1/4, Mattias Gaertner <[EMAIL PROTECTED]>:
> On Wed, 4 Jan 2006 10:16:26 -0400
> "Luis R. Hilario B." <[EMAIL PROTECTED]> wrote:
>
> > Hello,
> >
> > if TListView.Items.Delete(Last.Selected.Index) then Lazarus crash;
>
> Can you send an example?
>
> Mattias
>
>
> >
> > Only GTK.
> >
> > TApplication.HandleException List index (7) out of bounds
> >   Stack trace:
> >   $080BA63E
> > TApplication.HandleException Access violation
> >   Stack trace:
> >   $081CA9EF  TLISTITEM__SETSTATE,  line 524 of ./include/listitem.inc
> >   $081CC4D2  TCUSTOMLISTVIEW__DOSELECTITEM,  line 225 of
> > ./include/customlistview.inc
> >   $081CC200  TCUSTOMLISTVIEW__CNNOTIFY,  line 148 of
> > ./include/customlistview.inc
> >   $0805D14B
> >   $08135602  TCONTROL__WNDPROC,  line 1520 of ./include/control.inc
> >   $0812CFAD  TWINCONTROL__WNDPROC,  line 3046 of ./include/wincontrol.inc
> >   $081493F9  DELIVERMESSAGE,  line 3447 of gtkproc.inc
> >   $081E2646  GTKWSCUSTOMLISTVIEW_SELECTROW,  line 118 of
> >   gtkwscustomlistview.inc $B7E06EAF  CODEEXPLOPTS_finalize,  line 104 of
> >   debugoptionsfrm.pas $D015
> > Note: GetTextBuf is overridden for: [EMAIL PROTECTED] (c)_
> >
> > --
> > http://luisdigital.com
> >
> > _
> >  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
>


--
http://luisdigital.com

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


[lazarus] ListView bug

2006-01-04 Thread Luis R. Hilario B.
Hello,

if TListView.Items.Delete(Last.Selected.Index) then Lazarus crash;

Only GTK.

TApplication.HandleException List index (7) out of bounds
  Stack trace:
  $080BA63E
TApplication.HandleException Access violation
  Stack trace:
  $081CA9EF  TLISTITEM__SETSTATE,  line 524 of ./include/listitem.inc
  $081CC4D2  TCUSTOMLISTVIEW__DOSELECTITEM,  line 225 of
./include/customlistview.inc
  $081CC200  TCUSTOMLISTVIEW__CNNOTIFY,  line 148 of
./include/customlistview.inc
  $0805D14B
  $08135602  TCONTROL__WNDPROC,  line 1520 of ./include/control.inc
  $0812CFAD  TWINCONTROL__WNDPROC,  line 3046 of ./include/wincontrol.inc
  $081493F9  DELIVERMESSAGE,  line 3447 of gtkproc.inc
  $081E2646  GTKWSCUSTOMLISTVIEW_SELECTROW,  line 118 of gtkwscustomlistview.inc
  $B7E06EAF  CODEEXPLOPTS_finalize,  line 104 of debugoptionsfrm.pas
  $D015
Note: GetTextBuf is overridden for: [EMAIL PROTECTED] (c)_

--
http://luisdigital.com

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


Re: [lazarus] Designer SpeedButton showstopper

2005-12-31 Thread Luis R. Hilario B.
Donwload lazarus-0.9.11-20051231-src.*
or update CVS.

I have just tested and not no longer the problem exists.
I am thinking about using FPC 2.0.2 and "Lazarus 2006", as a stable version.
It would be able to create a branch only with arrangements without new things?

Happy 2006!

2005/12/31, Markku Niskanen <[EMAIL PROTECTED]>:
> Has anyone idea/time to have a look at the SpeedButton Glyph
> loading problem in Designer which is a real showstopper now. I am not
> yet familiar enough with the internal workings of the IDE, I can only
> provide a bactrace. This happens when you assign a glyph to a
> speedbutton (select image and press ok).
>
> I tried to investigate the cause but I have very little clue as to what
> to look for and where. Loading glyphs at runtime is an alternative,
> of course and I have used that. Anyhow, the backtrace is :
>
>
> #0  $baadf00d in ?? ()
> #1  $004b21b5 in TBITMAPCANVAS__FREEDC (this=$22c42d4) at
> bitmapcanvas.inc:114
> #2  $004b1faa in TBITMAPCANVAS__CREATEHANDLE (this=$22c4014) at
> bitmapcanvas.inc:49
> #3  $004b8260 in TCANVAS__REQUIREDSTATE
> (REQSTATE=[CSHANDLEVALID..CSBRUSHVALID], this=$22c4014) at canvas.inc:1403
> #4  $004b80fa in TCANVAS__GETHANDLE (this=$22c4014) at canvas.inc:1315
> #5  $0048f4dc in TBUTTONGLYPH__DRAW (CANVAS=$e553c, CLIENT=
> {LEFT = 0, TOP = 0, RIGHT = 23, BOTTOM = 22, TOPLEFT = {X = 0, Y =
> 0}, BOTTOMRIGHT = {X = 23, Y = 22}},
> OFFSET={X = 0, Y = 0}, STATE=BSUP, TRANSPARENT=true, BIDIFLAGS=0,
> this=$1fddc9c, result=
> {LEFT = 0, TOP = 0, RIGHT = 23, BOTTOM = 22, TOPLEFT = {X = 0, Y =
> 0}, BOTTOMRIGHT = {X = 23, Y = 22}})
> at buttonglyph.inc:127
> #6  $00490443 in TCUSTOMSPEEDBUTTON__PAINT (this=$22814f0) at
> speedbutton.inc:496
> #7  $0048aff6 in TGRAPHICCONTROL__WMPAINT (MESSAGE={MSG = 1056, DC =
> 3724621780, PAINTSTRUCT = $0, RESULT = 0},
> this=$22814f0) at graphiccontrol.inc:64
> #8  $007bfd1b in SYSTEM_TOBJECT_$__DISPATCH$formal ()
> #9  $00567082 in TDESIGNER__PAINTCONTROL (SENDER=$22814f0, THEMESSAGE=
>   {MSG = 1056, DC = 3724621780, PAINTSTRUCT = $0, RESULT = 0},
> this=$22c80ec) at Designer.pp:1028
> #10 $00568b42 in TDESIGNER__ISDESIGNMSG (SENDER=$22814f0, THEMESSAGE=
>   {MSG = 1056, WPARAM = -570345516, LPARAM = 0, RESULT = 0, WPARAMLO =
> 14292, WPARAMHI = 56833, LPARAMLO = 0, LPARAM
> HI = 0, RESULTLO = 0, RESULTHI = 0}, this=$22c80ec) at Designer.pp:1796
> #11 $0048637d in TCONTROL__WNDPROC (THEMESSAGE=
>   {MSG = 1056, WPARAM = -570345516, LPARAM = 0, RESULT = 0, WPARAMLO =
> 14292, WPARAMHI = 56833, LPARAMLO = 0, LPARAM
> HI = 0, RESULTLO = 0, RESULTHI = 0}, this=$22814f0) at control.inc:1445
> #12 $004855e4 in TCONTROL__PERFORM (MSG=1056, WPARAM=-570345516, LPARAM=0,
> this=$22814f0) at control.inc:1006
> #13 $0047d920 in TWINCONTROL__PAINTCONTROLS (DC=3724621780, FIRST=$0,
> this=$2280ca0) at wincontrol.inc:2680
> #14 $0047d707 in TWINCONTROL__PAINTHANDLER (THEMESSAGE=
>   {MSG = 1056, DC = 3724621780, PAINTSTRUCT = $6facc, RESULT = 457432},
> this=$2280ca0) at wincontrol.inc:2619
> #15 $00480607 in TWINCONTROL__WMPAINT (MSG={MSG = 1056, DC = 3724621780,
> PAINTSTRUCT = $6facc, RESULT = 457432},
> this=$2280ca0) at wincontrol.inc:4318
> #16 $0048b302 in TCUSTOMCONTROL__WMPAINT (MESSAGE=
>   {MSG = 1056, DC = 3724621780, PAINTSTRUCT = $6facc, RESULT = 457432},
> this=$2280ca0) at customcontrol.inc:100
> #17 $007bfd1b in SYSTEM_TOBJECT_$__DISPATCH$formal ()
> #18 $00567082 in TDESIGNER__PAINTCONTROL (SENDER=$2280ca0, THEMESSAGE=
>   {MSG = 1056, DC = 3724621780, PAINTSTRUCT = $6facc, RESULT = 457432},
> this=$22c80ec) at Designer.pp:1028
> #19 $00568b42 in TDESIGNER__ISDESIGNMSG (SENDER=$2280ca0, THEMESSAGE=
>   {MSG = 1056, WPARAM = -570345516, LPARAM = 457420, RESULT = 457432,
> WPARAMLO = 14292, WPARAMHI = 56833, LPARAMLO =
>  64204, LPARAMHI = 6, RESULTLO = 64216, RESULTHI = 6}, this=$22c80ec) at
> Designer.pp:1796
> #20 $0048637d in TCONTROL__WNDPROC (THEMESSAGE=
>   {MSG = 1056, WPARAM = -570345516, LPARAM = 457420, RESULT = 457432,
> WPARAMLO = 14292, WPARAMHI = 56833, LPARAMLO =
>  64204, LPARAMHI = 6, RESULTLO = 64216, RESULTHI = 6}, this=$2280ca0) at
> control.inc:1445
> #21 $0047e425 in TWINCONTROL__WNDPROC (MESSAGE=
>   {MSG = 1056, WPARAM = -570345516, LPARAM = 457420, RESULT = 457432,
> WPARAMLO = 14292, WPARAMHI = 56833, LPARAMLO =
>  64204, LPARAMHI = 6, RESULTLO = 64216, RESULTHI = 6}, this=$2280ca0) at
> wincontrol.inc:3046
> #22 $004de7a7 in DELIVERMESSAGE (TARGET=$2280ca0, MESSAGE=void) at
> Win32Proc.pp:541
> #23 $00457ce1 in SENDPAINTMESSAGE (parentfp=$6fccc) at
> win32callback.inc:435
>
> --
> [EMAIL PROTECTED]
>
> _
>  To unsubscribe: mail [EMAIL PROTECTED] with
> "unsubscribe" as the Subject
>archives at http://www.lazarus.freepascal.org/mailarchives
>


--
http://luisdigital.com

_

Re: [lazarus] How to copy/move files

2005-12-21 Thread Luis R. Hilario B.
FPC is crossplatform:
http://www.freepascal.org/docs-html/rtl/sysutils/filenameroutines.html


2005/12/21, bobby <[EMAIL PROTECTED]>:
> hi to all,
>
> I'm making a program to sort a collection of specific files.
> Now, is there a crossplatform function to move/copy/rename files?
> If not, how can I do it for Win32?
>
> regards
> Boban Spasic
>
>
> _
>  To unsubscribe: mail [EMAIL PROTECTED] with
> "unsubscribe" as the Subject
>archives at http://www.lazarus.freepascal.org/mailarchives
>


--
http://luisdigital.com

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


Re: [lazarus] USB Icon

2005-12-18 Thread Luis R. Hilario B.
Yes, kde.lpi -> KDE icon :)

2005/12/18, Michael Van Canneyt <[EMAIL PROTECTED]>:
>
>
> On Sun, 18 Dec 2005, Luis R. Hilario B. wrote:
>
> > Hello,
> >
> > If a project has name USB, appears icon USB in the program instead of
> > the traditional one (X).  Who puts the icon, the graphical system or
> > Lazarus?
>
> If Lazarus doesn't provide one, the graphical system does.
>
> Michael.
> >
> > O.S.: Linux
> > --
> > http://luisdigital.com
> >
> > _
> >  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
>


--
http://luisdigital.com

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


[lazarus] USB Icon

2005-12-18 Thread Luis R. Hilario B.
Hello,

If a project has name USB, appears icon USB in the program instead of
the traditional one (X).  Who puts the icon, the graphical system or
Lazarus?

O.S.: Linux
--
http://luisdigital.com

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


Re: [lazarus] Server and Client

2005-11-12 Thread Luis R. Hilario B.
Some link?

2005/11/12, Ales Katona <[EMAIL PROTECTED]>:
> Kleiton Luiz wrote:
>
> > Hi !
> >
> > In delphi for windows have a server and client objects and
> > for lazarus, have too ??
> >
> > Thanks !
> >
> >
> > **
> > *---*
> > *--+*
> > *Kleiton L R Soares /(cel. 9639-5829)/*
> > Analista de Sistemas - ADM. Redes
> > ICQ.: 132279038 MSN.: [EMAIL PROTECTED]
> > 
> >
> > /"Quem conhece a sua ignorância revela a mais profunda sapiência.
> > Quem ignora a sua ignorância vive na mais profunda ilusão".
> > (Lao-Tsé)/.
> >
> > 
> > Yahoo! FareChase - Search multiple travel sites in one click.
> > 
>
>
> I'm currently working on TCP and UDP visual components for Lazarus. I've
> tested them in Linux and Windows but there are still some bugs to be
> fixed before I make them available. I will post info here when it's all
> done.
>
> Ales Katona
>
> P.S: other sub-protocols(telnet, ftp, http etc) will follow as I or
> others add such functionality.
>
> _
>  To unsubscribe: mail [EMAIL PROTECTED] with
> "unsubscribe" as the Subject
>archives at http://www.lazarus.freepascal.org/mailarchives
>


--
http://luisdigital.com

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


Re: [lazarus] A new marketing strategy

2005-11-09 Thread Luis R. Hilario B.
My (2) Delphisuperhero:
http://luisdigital.com/varios/ xD

But to send Delphi Personal would be better promotion.

2005/9/19, Razvan Adrian Bogdan <[EMAIL PROTECTED]>:
> If you were wondering what marketing strategies Borland was planning
> lately, search no more, Delphiman is here, hope he will beat all those
> (C/C++) compilers out there :)
>
> http://www.borland.com/superhero
> http://www.delphisuperhero.com/
>
> Razvan
>
> _
>  To unsubscribe: mail [EMAIL PROTECTED] with
> "unsubscribe" as the Subject
>archives at http://www.lazarus.freepascal.org/mailarchives
>


--
http://luisdigital.com

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


Re: [lazarus] Bug similar al Bug 0000722 pero con el Tedit

2005-10-23 Thread Luis R. Hilario B.
"Qué dijo???
Esta es una lista internacional y el idioma aceptado es el inglés. Si
quieres una respuesta, por favor ponga su pregunta/problema de forma
que pueda ser entendida por la comunidad en inglés."

O puedes usar: http://www.freetranslation.com/ como yo ;)

He said (more or less):
Error seemed to Bug 722 but with the Tedit
In Lazarus 0.9.8 and 0.9.10 Beta MS-Windows

Using ShowMessage in the events OnExit and OnEnter, the aplicacion
finishes generating an exception.

2005/10/23, [EMAIL PROTECTED] <[EMAIL PROTECTED]>:
>
>
> In a message dated 10/22/2005 8:04:21 P.M. Central Daylight Time,
> [EMAIL PROTECTED] writes:
> >Fue probado en el Lazarus 0.9.8 y en Lazarus 0.9.10 Beta con los
> >mismos resultados en el evento OnExit de Tedit.
> >Se ejecuta inapropiadamente. S.O. usado es Windows.
> ?Si se coloca el procedure ShowMessage en los eventos OnExit y en
> >OnEnter la aplicacion termina generando una excepcion.
>
>
> Say what???
> This is an international list with the accepted language being English. If
> you want an answer  please post your question/problem so it can be
> understood by the community in English
>
> Thanks
> Dave


--
http://luisdigital.com

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


Re: [lazarus] Lazarus and FVWMN

2005-10-18 Thread Luis R. Hilario B.
Something more, the error: "Error: Can't call the linker, switching to
external linking".

is for lack of memory, I use the text mode to compile Lazarus.

2005/10/18, Luis R. Hilario B. <[EMAIL PROTECTED]>:
> There is not problem, only you have to have installed lib GTK or GTK2
> (or QT), etc.
>
> No hay problema, sólo tienes que tener instalada las librerías GTK o
> GTK2 (o QT), etc.
>
> 2005/10/18, Edwin Quijada <[EMAIL PROTECTED]>:
> > Hi!
> > I am developing an app to run into PI and PII with 32Mb. I will use FVWM or
> > Enlightmen as desktop .
> > Mu question : Can Lazarus run into this machine with this hardware and
> > desktop system?
> > This app is so simple so we dont need to buy expensives PC else use our old
> > PC PI and PII with 32 and 64 Mbram
> > Any cluees?
> >
> > *---*
> > *-Edwin Quijada
> > *-Developer DataBase
> > *-JQ Microsistemas
> > *-809-747-2787
> > * " Si deseas lograr cosas excepcionales debes de hacer cosas fuera de lo
> > comun"
> > *---*
> >
> > _
> > Visita MSN Latino Entretenimiento: ¡música, cine, chismes, TV y más...!
> > http://latino.msn.com/entretenimiento/
> >
> > _
> >  To unsubscribe: mail [EMAIL PROTECTED] with
> > "unsubscribe" as the Subject
> >archives at http://www.lazarus.freepascal.org/mailarchives
> >
>
>
> --
> http://luisdigital.com
>


--
http://luisdigital.com

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


Re: [lazarus] Lazarus and FVWMN

2005-10-18 Thread Luis R. Hilario B.
There is not problem, only you have to have installed lib GTK or GTK2
(or QT), etc.

No hay problema, sólo tienes que tener instalada las librerías GTK o
GTK2 (o QT), etc.

2005/10/18, Edwin Quijada <[EMAIL PROTECTED]>:
> Hi!
> I am developing an app to run into PI and PII with 32Mb. I will use FVWM or
> Enlightmen as desktop .
> Mu question : Can Lazarus run into this machine with this hardware and
> desktop system?
> This app is so simple so we dont need to buy expensives PC else use our old
> PC PI and PII with 32 and 64 Mbram
> Any cluees?
>
> *---*
> *-Edwin Quijada
> *-Developer DataBase
> *-JQ Microsistemas
> *-809-747-2787
> * " Si deseas lograr cosas excepcionales debes de hacer cosas fuera de lo
> comun"
> *---*
>
> _
> Visita MSN Latino Entretenimiento: ¡música, cine, chismes, TV y más...!
> http://latino.msn.com/entretenimiento/
>
> _
>  To unsubscribe: mail [EMAIL PROTECTED] with
> "unsubscribe" as the Subject
>archives at http://www.lazarus.freepascal.org/mailarchives
>


--
http://luisdigital.com

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


Re: [lazarus] Daily snapshots

2005-09-23 Thread Luis R. Hilario B.
2005/9/23, Vincent Snijders <[EMAIL PROTECTED]>:
>
> After 0.9.10 has been released,
>
> Vincent.
>
Should not be Lazarus in frozen mode for the version 1.0?
Various translators we have to work double, because the content changes.

Lazarus 2006 Ya! :)
--
http://luisdigital.com

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


[lazarus] ReactOS runs Klinton (compiler Delphi)

2005-09-18 Thread Luis R. Hilario B.
Hello,

Reactos runs some programs created with Delphi and Lazarus, also
Lazarus works (more or less).
http://luisdigital.com/so/reactos/
-- 
http://luisdigital.com

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


Re: [lazarus] Translation

2005-08-24 Thread Luis R. Hilario B.
Mattias dijo:
"It is planned to write all translations only in utf8 and automatically
convert it to the current character encoding."
Sorry ;)

2005/8/24, Luis R. Hilario B. <[EMAIL PROTECTED]>:
> Hola Juan,
> 
> update the .es.po
> 
> 2005/8/24, Juan Martinez <[EMAIL PROTECTED]>:
> > Hi all!
> >
> > I have noticed that Spanish translation of the IDE's
> > strings is not complete, so I decided to complete it.
> > The problem is that the newest lazarus revisions use
> > utf encoding so should I update the .es.po files or
> > the .esutf.po ones? or both?
> >
> > BTW, I use FPC 2.0.0 and I don't know how to compile
> > lazarus with -dNoUTF8Translations through make.
> >
> > Juan
> >
> >
> > __
> > Correo Yahoo!
> > Espacio para todos tus mensajes, antivirus y antispam ¡gratis!
> > Regístrate ya - http://correo.espanol.yahoo.com/
> >
> > _
> >  To unsubscribe: mail [EMAIL PROTECTED] with
> > "unsubscribe" as the Subject
> >archives at http://www.lazarus.freepascal.org/mailarchives
> >
> 
> 
> --
> http://luisdigital.com
> 


-- 
http://luisdigital.com

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


Re: [lazarus] Translation

2005-08-24 Thread Luis R. Hilario B.
Hola Juan,

update the .es.po

2005/8/24, Juan Martinez <[EMAIL PROTECTED]>:
> Hi all!
> 
> I have noticed that Spanish translation of the IDE's
> strings is not complete, so I decided to complete it.
> The problem is that the newest lazarus revisions use
> utf encoding so should I update the .es.po files or
> the .esutf.po ones? or both?
> 
> BTW, I use FPC 2.0.0 and I don't know how to compile
> lazarus with -dNoUTF8Translations through make.
> 
> Juan
> 
> 
> __
> Correo Yahoo!
> Espacio para todos tus mensajes, antivirus y antispam ¡gratis!
> Regístrate ya - http://correo.espanol.yahoo.com/
> 
> _
>  To unsubscribe: mail [EMAIL PROTECTED] with
> "unsubscribe" as the Subject
>archives at http://www.lazarus.freepascal.org/mailarchives
> 


-- 
http://luisdigital.com

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