Help need in conversion
lazarus / 39-Graphics

----------------------------------------------------------------------
ZsurzsaLaszlo · 2012-08-28 19:38

Source: http://www.sulaco.co.za/opengl_project_glWindows.htm

Could some one should me how to convert it to lazarus, or maybe direct
me to a web site where I find information regarding conversion. I find
really hard in this moment to make it work under Lazarus. What do you
suggest.

The program can be found in the attachment to.

Thanks,
Zs.L

----------------------------------------------------------------------
Leledumbo · 2012-08-29 07:58

Seems like I've tried that some time ago. It's easily convertible. You
may want to take a look at Code Conversion Guide in the wiki. If I'm
not mistaken, projects from those websites use Windows API quite
heavily, so you can skip out things about portability in the
conversion guide (it won't work easily on other platforms).

----------------------------------------------------------------------
ZsurzsaLaszlo · 2012-08-29 09:49

Huuuuuuuuuh, i omitted this site, or never look on it. Thanks for the
info i shall look into it looks nice.

Thank you for the info.

----------------------------------------------------------------------
v.denis · 2012-08-29 10:23

Here you are:
http://rghost.net/40072171

Amazing, convesion took about 10 minutes. Though I've dropped loading
jpg textures.
Also reorganized file sturcture a bit.

Converting this project you should consider:

- OpenGL in Delphi -> GL in FPC
- Some functions in FPC are not overloaded like in Delphi, i.e. you
have to add postfixes on your own:
  like: 1f, 1d...
- to convert faster you can set {$mode delphi} or have to manually fix
syntax differences

----------------------------------------------------------------------
ZsurzsaLaszlo · 2012-08-29 10:46

OpenGLApp.lpr(453,24) Hint: Local variable "msg" does not seem to be
initialized
OpenGLApp.lpr(469,31) Hint: Mixing signed expressions and longwords
gives a 64bit result
OpenGLApp.lpr(432,18) Hint: Parameter "hInstance" not used
OpenGLApp.lpr(432,37) Hint: Parameter "hPrevInstance" not used
OpenGLApp.lpr(433,18) Hint: Parameter "lpCmdLine" not used
OpenGLApp.lpr(433,37) Hint: Parameter "nCmdShow" not used
OpenGLApp.lpr(38,11) Hint: Local proc "glBindTexture" is not used
OpenGLApp.lpr(487,1) Error: Undefined symbol:
WSRegisterCustomImageList
OpenGLApp.lpr(487,1) Error: Undefined symbol: WSRegisterMenuItem
OpenGLApp.lpr(487,1) Error: Undefined symbol: WSRegisterMenu
OpenGLApp.lpr(487,1) Error: Undefined symbol: WSRegisterMainMenu
OpenGLApp.lpr(487,1) Error: Undefined symbol: WSRegisterPopupMenu
OpenGLApp.lpr(487,1) Error: Undefined symbol: WSRegisterDragImageList
OpenGLApp.lpr(487,1) Error: Undefined symbol: WSRegisterControl
OpenGLApp.lpr(487,1) Error: Undefined symbol: WSRegisterWinControl
OpenGLApp.lpr(487,1) Error: Undefined symbol: WSRegisterGraphicControl
OpenGLApp.lpr(487,1) Error: Undefined symbol: WSRegisterCustomControl
OpenGLApp.lpr(487,1) Error: Undefined symbol:
WSRegisterScrollingWinControl
OpenGLApp.lpr(487,1) Error: Undefined symbol: WSRegisterScrollBox
OpenGLApp.lpr(487,1) Error: Undefined symbol: WSRegisterCustomFrame
OpenGLApp.lpr(487,1) Error: Undefined symbol: WSRegisterCustomForm
OpenGLApp.lpr(487,1) Error: Undefined symbol: WSRegisterHintWindow
OpenGLApp.lpr(487,1) Fatal: There were 15 errors compiling module,
stopping


I get this messages. Thank you for the quick response!!!!

I don't realy what to do with this althought ....

----------------------------------------------------------------------
ludob · 2012-08-29 10:59

QuoteError: Undefined symbol: WSRegisterCustomImageListYou have to add
the Interfaces unit to the uses clause when using the LCL.

----------------------------------------------------------------------
ZsurzsaLaszlo · 2012-08-29 12:51

Thanks, thanks itt helped me guys!!!