mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-17 10:49:09 +02:00
fixed types
git-svn-id: trunk@4571 -
This commit is contained in:
parent
0707ddae9f
commit
9bf858734d
41
docs/FAQ
41
docs/FAQ
@ -17,7 +17,8 @@ How do I compile lazarus?
|
|||||||
Do something like this:
|
Do something like this:
|
||||||
$ cd lazarus
|
$ cd lazarus
|
||||||
$ make
|
$ make
|
||||||
Top
|
|
||||||
|
|
||||||
How do I build other projects based upon the LCL
|
How do I build other projects based upon the LCL
|
||||||
Add the following lines to the end of your fpc.cfg
|
Add the following lines to the end of your fpc.cfg
|
||||||
# Add Lazarus libs
|
# Add Lazarus libs
|
||||||
@ -32,7 +33,7 @@ ppc386 your.project.pp
|
|||||||
|
|
||||||
--------------------------------------------------------------------------------
|
--------------------------------------------------------------------------------
|
||||||
What version of FPC is required?
|
What version of FPC is required?
|
||||||
Currently you need to use 1.0.7 of the FPC compiler. You can find the URL in
|
Currently you need to use 1.0.10 of the FPC compiler. You can find the URL in
|
||||||
the downloads section of this site.
|
the downloads section of this site.
|
||||||
|
|
||||||
|
|
||||||
@ -46,7 +47,8 @@ I can't compile Lazarus
|
|||||||
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
--------------------------------------------------------------------------------
|
||||||
When I try to compile delphi projects under lazarus, I have an error at the line :
|
When I try to compile delphi projects under lazarus, I have an error at the
|
||||||
|
line:
|
||||||
{$R *.DFM}
|
{$R *.DFM}
|
||||||
|
|
||||||
How can I solve this problem ?
|
How can I solve this problem ?
|
||||||
@ -55,16 +57,12 @@ in the way Delphi/win32 does. However Lazarus uses a method pretty compatible
|
|||||||
with this.
|
with this.
|
||||||
You can still use your Delphi layouts if you use the following steps:
|
You can still use your Delphi layouts if you use the following steps:
|
||||||
|
|
||||||
1.
|
1. You need a textual version of all form files (dfm)
|
||||||
|
|
||||||
You need a textual version of
|
|
||||||
D4: created by copy/paste from ALT-F12
|
D4: created by copy/paste from ALT-F12
|
||||||
D5: Native
|
D5: Native
|
||||||
2. Create a file with lazres (in lazarus/tools)
|
2. Create a file with lazres (in lazarus/tools)
|
||||||
lazres yourform.lrs yourform.dfm
|
lazres yourform.lrs yourform.dfm
|
||||||
3.
|
3. Add the following initialization section to every unit with a form:
|
||||||
|
|
||||||
Add the following initialization section to
|
|
||||||
|
|
||||||
initialization
|
initialization
|
||||||
{$I yourform.lrs}
|
{$I yourform.lrs}
|
||||||
@ -97,21 +95,6 @@ under Win32?
|
|||||||
Yes, LGPL.
|
Yes, LGPL.
|
||||||
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
How I can include lcl component in lazarus?
|
|
||||||
see <lazarusdir>/components/custom/README
|
|
||||||
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
How to add a component to the IDE component palette?
|
|
||||||
Lazarus has no package system, because the freepascal compiler does not yet
|
|
||||||
fully support dynamic libraries. And without the package system, the only way
|
|
||||||
to add components to the IDE is to compile them in.
|
|
||||||
In other words: you have to change the IDE source. But it is easy.
|
|
||||||
See /components/custom/README
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
--------------------------------------------------------------------------------
|
||||||
================================================================================
|
================================================================================
|
||||||
|
|
||||||
@ -194,7 +177,7 @@ Fatal: Can't find unit GLIB
|
|||||||
|
|
||||||
1. Check a clean rebuild: do a 'make clean all'
|
1. Check a clean rebuild: do a 'make clean all'
|
||||||
|
|
||||||
2. Check if the compiler has the correct version (1.0.7 or 1.1)
|
2. Check if the compiler has the correct version (1.0.10 or 1.1)
|
||||||
|
|
||||||
3. Check if the compiler is using the right config file. The normal
|
3. Check if the compiler is using the right config file. The normal
|
||||||
installation creates /etc/fpc.cfg. But fpc also searches for
|
installation creates /etc/fpc.cfg. But fpc also searches for
|
||||||
@ -204,9 +187,9 @@ Fatal: Can't find unit GLIB
|
|||||||
|
|
||||||
4. Check if the config file (/etc/fpc.cfg) contains the right paths to your
|
4. Check if the config file (/etc/fpc.cfg) contains the right paths to your
|
||||||
fpc libs. There must be three lines like this:
|
fpc libs. There must be three lines like this:
|
||||||
-Fu/usr/lib/fpc/1.0.7/units/$target
|
-Fu/usr/lib/fpc/$version/units/$target
|
||||||
-Fu/usr/lib/fpc/1.0.7/units/$target/*
|
-Fu/usr/lib/fpc/$version/units/$target/*
|
||||||
-Fu/usr/lib/fpc/1.0.7/units/$target/rtl
|
-Fu/usr/lib/fpc/$version/units/$target/rtl
|
||||||
The first part of these paths (/usr/lib/fpc) depends on your system. On
|
The first part of these paths (/usr/lib/fpc) depends on your system. On
|
||||||
some systems this can be for example /usr/local/lib/fpc/... .
|
some systems this can be for example /usr/local/lib/fpc/... .
|
||||||
Hint: You can see your searchpaths with 'ppc386 -vt bogus'
|
Hint: You can see your searchpaths with 'ppc386 -vt bogus'
|
||||||
@ -224,7 +207,7 @@ Fatal: Can't find unit GLIB
|
|||||||
|
|
||||||
6. Check if the missing unit (glib.ppu) exists in your fpc lib directory.
|
6. Check if the missing unit (glib.ppu) exists in your fpc lib directory.
|
||||||
For example the gtk.ppu can be found in
|
For example the gtk.ppu can be found in
|
||||||
/usr/lib/fpc/1.0.7/units/linux/gtk/.
|
/usr/lib/fpc/$version/units/linux/gtk/.
|
||||||
If it does not exists, the fpc lib is corrupt and should be reinstalled.
|
If it does not exists, the fpc lib is corrupt and should be reinstalled.
|
||||||
|
|
||||||
7. Check if the sources are in a NFS mounted directory. In some cases the
|
7. Check if the sources are in a NFS mounted directory. In some cases the
|
||||||
|
@ -965,10 +965,10 @@ function ColorToString(Color: TColor): AnsiString;
|
|||||||
function StringToColor(const S: shortstring): TColor;
|
function StringToColor(const S: shortstring): TColor;
|
||||||
procedure GetColorValues(Proc: TGetColorStringProc);
|
procedure GetColorValues(Proc: TGetColorStringProc);
|
||||||
|
|
||||||
Function Blue(rgb: longint) : BYTE;
|
Function Blue(rgb: TColor) : BYTE;
|
||||||
Function Green(rgb: longint) : BYTE;
|
Function Green(rgb: TColor) : BYTE;
|
||||||
Function Red(rgb: longint) : BYTE;
|
Function Red(rgb: TColor) : BYTE;
|
||||||
procedure RedGreenBlue(rgb: longint; var Red, Green, Blue: Byte);
|
procedure RedGreenBlue(rgb: TColor; Red, Green, Blue: Byte);
|
||||||
|
|
||||||
procedure GetCharsetValues(Proc: TGetStrProc);
|
procedure GetCharsetValues(Proc: TGetStrProc);
|
||||||
function CharsetToIdent(Charset: Longint; var Ident: string): Boolean;
|
function CharsetToIdent(Charset: Longint; var Ident: string): Boolean;
|
||||||
@ -1138,22 +1138,22 @@ begin
|
|||||||
for I := Low(Colors) to High(Colors) do Proc(Colors[I].Name);
|
for I := Low(Colors) to High(Colors) do Proc(Colors[I].Name);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
Function Blue(rgb : longint) : BYTE;
|
Function Blue(rgb : TColor) : BYTE;
|
||||||
begin
|
begin
|
||||||
Result := (rgb shr 16) and $000000ff;
|
Result := (rgb shr 16) and $000000ff;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
Function Green(rgb : longint) : BYTE;
|
Function Green(rgb : TColor) : BYTE;
|
||||||
begin
|
begin
|
||||||
Result := (rgb shr 8) and $000000ff;
|
Result := (rgb shr 8) and $000000ff;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
Function Red(rgb : longint) : BYTE;
|
Function Red(rgb : TColor) : BYTE;
|
||||||
begin
|
begin
|
||||||
Result := rgb and $000000ff;
|
Result := rgb and $000000ff;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure RedGreenBlue(rgb: longint; var Red, Green, Blue: Byte);
|
procedure RedGreenBlue(rgb: TColor; Red, Green, Blue: Byte);
|
||||||
begin
|
begin
|
||||||
Red := rgb and $000000ff;
|
Red := rgb and $000000ff;
|
||||||
Green := (rgb shr 8) and $000000ff;
|
Green := (rgb shr 8) and $000000ff;
|
||||||
@ -1194,6 +1194,9 @@ end.
|
|||||||
{ =============================================================================
|
{ =============================================================================
|
||||||
|
|
||||||
$Log$
|
$Log$
|
||||||
|
Revision 1.87 2003/09/05 21:27:28 mattias
|
||||||
|
fixed types
|
||||||
|
|
||||||
Revision 1.86 2003/09/02 21:32:56 mattias
|
Revision 1.86 2003/09/02 21:32:56 mattias
|
||||||
implemented TOpenPictureDialog
|
implemented TOpenPictureDialog
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user