387       str(ChangeVolume(cVolumeDelta), s);

   387       str(ChangeVolume(cVolumeDelta), s);

   388       AddCaption(Format(trmsg[sidVolume], s), $FFFFFF, capgrpVolume)

   388       AddCaption(Format(trmsg[sidVolume], s), $FFFFFF, capgrpVolume)

   389       end

   389       end

   390    end;

   390    end;

   391 

   391 

   392 glDisable(GL_TEXTURE_2D);

   394 glDisable(GL_TEXTURE_2D);

   393 glDisable(GL_BLEND)

   395 glDisable(GL_BLEND)

   394 end;

   396 end;

   395 

   397 

   396 procedure AddCaption(s: string; Color: Longword; Group: TCapGroup);

   398 procedure AddCaption(s: string; Color: Longword; Group: TCapGroup);