My Immediate Mode GUI (IMGUI) class for Jarrod's HGE

**paul_nicholls** · 29-09-2010, 06:30 AM

Hi all,
I have been working on a GUI system that I can use in The Probe (or other Hadron Game Engine programs)...

Here is a screenshot of the currently working GUI that I am using to control the audio options in The Probe

I have been chopping out GUI elements (elements inside the window) from a controls VGScene demo I downloaded here:

http://ksdev.com/vgscene/download.html

I got the elements for the window itself (after some editing) from this project:

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

I used my image packer program to jam all the elements together and am reading them into my GUI class.

I have based my GUI class from a Immediate Mode GUI tutorial here (and converting it to Pascal obviously):

http://sol.gfxile.net/imgui/index.html

When it is finished, I will probably share the GUI code (hey, perhaps it will be included in Jarrod's HGE itself)

Here is how the code currently looks to create the GUI you see in the above screenshot:

Code:

procedure TTheProbe.RenderAudioOptions;
var
  x,y: Integer;
  GuiFont: Integer;
  ValueF: Single;
begin
  GuiFont := FGUIFont;

  FGUI.Prepare;
    FGUI.SetFontColor(255,255,255,255);
    FGUI.SetBackgroundColor(64,64,64,255);
    FGUI.StartWindow(100,100,270,218,'Audio Options',App_SysFont);
      x := 8;
      y := 16;

      // music options
      if FGUI.DoCheckBox(FMusicEnabled,x,y,'music enabled',GuiFont) then
      begin
        if not FMusicEnabled then
        begin
          FMusicVolume := 0;
          Audio_SetMusicVol(FMusicVolume)
        end;
      end;

      y := 44;
      FGUI.DoLabel(x,y,'music volume',GuiFont,White);

      y := 72;
      ValueF := FMusicVolume;
      if FGUI.DoHorizontalTrackBar(x,
                                   y,
                                   255,
                                   0,1,
                                   ValueF) then
      begin
        if (ValueF > 0) and not FMusicEnabled then
          FMusicEnabled := True;
          
        FMusicVolume := ValueF;
        Audio_SetMusicVol(FMusicVolume);
      end;

      y := 124;
      // sfx options
      if FGUI.DoCheckBox(FSfxEnabled,x,y,'sfx enabled',GuiFont) then
      begin
        if not FSfxEnabled then
          FSfxVolume := 0;
      end;

      y := 152;
      FGUI.DoLabel(x,y,'sfx volume',GuiFont,White);

      y := 180;
      ValueF := FSfxVolume;
      if FGUI.DoHorizontalTrackBar(x,
                                   y,
                                   255,
                                   0,1,
                                   ValueF) then
      begin
        if (ValueF > 0) and not FSfxEnabled then
          FSfxEnabled := True;

        FSfxVolume := ValueF;
      end;

    FGUI.EndWindow;
  FGUI.Finish;
end;

cheers,
Paul

**paul_nicholls** · 30-09-2010, 05:22 AM

Bump

cheers,
Paul

**chronozphere** · 30-09-2010, 08:33 AM

That looks pretty easy to use. Nice work.

I probably won't use it since I'm not using HGE. Also, I'd encourage you to use VBO's instead. They are the future.

**paul_nicholls** · 30-09-2010, 11:04 AM

Originally Posted by chronozphere

That looks pretty easy to use. Nice work.

I probably won't use it since I'm not using HGE. Also, I'd encourage you to use VBO's instead. They are the future.

Thanks

Well, as I'm using HGE (uses DirectX behind the scenes) for The Probe, I will be using the HGE sprites, etc. for my GUI until things change

cheers,
Paul

**WILL** · 30-09-2010, 05:11 PM

GUI system is lookin' nice Paul.

**paul_nicholls** · 30-09-2010, 08:30 PM

Thanks WILL

cheers,
Paul

**virtual** · 01-10-2010, 05:13 PM

nice graphics , looks like FL Studio ,lol

**phibermon** · 02-10-2010, 12:35 PM

Nice work Paul, looking nice! although I've seen the image used for the window before somewhere

**Nitrogen** · 02-10-2010, 04:48 PM

Originally Posted by virtual

nice graphics , looks like FL Studio ,lol

Hehe, thats because it is from an early version of FL Studio! I'm pretty sure either Jan Horn or I did that window skin a very very long time ago

You may want to change your window borders if you use it for anything commercial as many people will recognise it.

What are you using for your font rendering - it looks a bit blurry? You can always try Font Studio if you need a good bitmap font generator.