Hello,
I have two problems with Lazarus.
1, I have no text on BitmapButtons in Lazarus in DialogBoxes (except Open/Save file). There are only small icons on it. I tried to change Environment - Environment Options - Desktop to other languagues and to change these options (Hints for components palette and Hints for main speed buttons) but no success. 2, When I write procedure or function with parameter String[31] it doesn't work. It writes Forward declaration not solved, however it is.

My project worked fine, these two problems started when I upgraded from Lazarus 0.9.22 to 0.9.26.

I use Windows Vista 32bit, fpc 2.2.2, lazarus 0.9.26.

If you have any idea pls write me.

Vojtech Cihak

Hi Vojtěch,

First, I would like to point you that you have to send your Lazarus questions to the Lazarus mailinglist and not to the FPC-devel please.

Having that said,

At what stage do your captions disappear? Do you see any in the IDE? Did you try to create a new project and put some buttons on there? What do you see?

2, When I write procedure or function with parameter String[31] it doesn't work. It writes Forward declaration not solved, however it is.

Please provide a minimal example. You probably have some syntax problem.

Darius

Looks that you have duplicated http://bugs.freepascal.org/view.php?id=11184

Vincent

Hi Vincent,
thank you, I changed Windows Vista theme and it works - I have text on mz buttons :-). On the other side, Vista design is now terrible. It seems that I will have to look out for some more serious OS. But I still don't know how about functions and procedures. I see no syntax error there. It worked in Laz. 0.9.22 I tried this simple test in new application, it writes Forward declaration not solved.

unit Unit1;
{$mode objfpc}{$H+}
interface
uses
  Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs;
type
  TForm1 = class(TForm)
  private
    { private declarations }
  public
    { public declarations }
  end;
function Test(s: string[31]): boolean;
var
  Form1: TForm1;
implementation
function Test(s: string[31]): boolean;
begin
s:='dfdf';
s:=s+'rty';
result:=true;
end;
initialization
  {$I unit1.lrs}
end.

If you or someone else have any idea, pls write me. Thank you

Vojtech

> > 2, When I write procedure or function with parameter String[31] it > > doesn't work. It writes Forward declaration not solved, however it is. > Please provide a minimal example. You probably have some syntax problem.

What you would like to do in this case is to declare a custom type:

MyStringType = string[31];

And replace your code by :

function Test(s: MyStringType): boolean;

HTH Darius