Dear Sirs ,

In my previous message

I mentioned required DLL files .

(A)

The following sample ReadMe.TXT file
may be inserted into the following directory :

http://svn.freepascal.org/svn/fpc/trunk/packages/gtk1/examples/

ReadMe.TXT

---------------------------

The following libraries are needed to run the
example programs supplied in this directory :

In Windows :

libintl-1.dll
libgdk-0.dll
libgtk-0.dll
libglib-2.0-0.dll

gtkgl.dll ( required only for gtkgldemo.pp )

In FreeBSD :

In GNU/Linux :

---------------------------

(B)

The following sample ReadMe.TXT file
may be inserted into the following directory :

http://svn.freepascal.org/svn/fpc/trunk/packages/gtk2/examples/

ReadMe.TXT

---------------------------

The following libraries are needed to run the
example programs supplied in this directory :

In Windows :

libgdkglext-win32-1.0.0.dll
libglade-2.0-0.dll

In FreeBSD :

In GNU/Linux :

---------------------------

(C)

For the program

c:\fpc\2.2.2\examples\gtk2\gtk_demo\gtk_demo.exe

I mentioned the zero division exception .

Dear Paul Ishenin notified me about a Windows bug in his message :

as

" This is a known bug on windows.

Use the folowing call in your application initialization section:

Set8087CW($133F); "

Into

c:\fpc\2.2.2\examples\gtk2\gtk_demo\gtk_demo.pas

I added the above statement as

.
.
.

var
window,
notebook,
hbox,

  tree       : PGtkWidget;

begin
{$ifdef win32}
  Set8087CW($133F);
{$else}
{$endif}
  current_file := NULL;
   .
   .
   .

The program worked very well .

Addition of the following statement

{$ifdef win32}
  Set8087CW($133F);
{$else}
{$endif}

into

http://svn.freepascal.org/svn/fpc/trunk/packages/gtk2/examples/gtk_demo/gtk_demo.pas

will prevent zero division exception in Windows applications .

Into the directory

http://svn.freepascal.org/svn/fpc/trunk/packages/gtk2/examples/gtk_demo/

the following sample ReadMe.TXT file may be added :

ReadMe.TXT

---------------------------

The following statement in Windows
prevents zero division exception :

{$ifdef win32}
  Set8087CW($133F);
{$else}
{$endif}

---------------------------

Thank you very much ,

Mehmet Erol Sanliturk

Dear Sirs ,

Please add such fixes to the bug tracker (http://bugs.freepascal.org/) so it won't get lost.