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

_______________________________________________
fpc-devel maillist  -  fpc-devel@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-devel

Reply via email to