[fpc-devel] c:\fpc\2.2.2\examples\gtk1 and gtk2 : ReadMe.TXT Additions

[Mehmet Erol Sanliturk]

Dear Sirs ,


In my previous message

http://www.mail-archive.com/fpc-devel@lists.freepascal.org/msg12236.html


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 :

http://www.mail-archive.com/fpc-devel@lists.freepascal.org/msg12237.html


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