> I think that you have to configure the console to use UTF-8 output (but I
> don't know how this is done on Windows).
I think that should be:
SetConsoleOutputCP(CP_UTF8);
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepasc
On 05.03.2021 20:34, Sven Barth wrote:
Am 28.02.2021 um 23:11 schrieb Mattias Gaertner via fpc-pascal:
[...]
I can't find this change in
https://wiki.lazarus.freepascal.org/User_Changes_3.2.0
@Ondrej: you had supplied the patch back then. Would you be able to
describe what exactly ch
On 06.03.2021 4:29, Ondrej Pokorny wrote:
On 05.03.2021 20:34, Sven Barth wrote:
Am 28.02.2021 um 23:11 schrieb Mattias Gaertner via fpc-pascal:
[...]
I can't find this change in
https://wiki.lazarus.freepascal.org/User_Changes_3.2.0
@Ondrej: you had supplied the patch back then. Woul
r function declaration.
Const parameters don't accept const expressions?
You need:
const
DefaultDelta = 1E-8;
function F(const x:extended; const delta:extended=DefaultDelta):extended;
Ondrej
___
fpc-pascal maillist - fpc-pascal@lists.freep
used since Unicode Delphi because Char=UnicodeChar.
Ondrej
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
k you, and thank you to the entire Free Pascal team for
everything you've all built.
Sven & Blaise,
I thank you for this enormous achievement as well!
Ondrej
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
https://lists.freepascal.
:= fCertificateFileName;
fServer.CertificateData.PrivateKey.FileName := fCertificatePrivateKey;
end;
That should be sufficient. FPC 3.2.2 should do it.
Ondrej
Am 23.08.2022 um 22:26 schrieb Fabio Luis Girardi via fpc-pascal:
Hi Michael!
Thanks for replying so fast.
You're telling me that is pos
TProcLongInt = interface(IInterface)
procedure Invoke(aArg: LongInt); stdcall; overload;
end;
You should be able to get the Invoke procedure pointer from the RTTI.
Ondrej
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
https
nested;
function TestNested: TProc;
begin
result := procedure // why is this possible?
begin
writeln(data);
end;
It is not a nested function but an anonymous one.
Ondrej
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
https://lists.f
Am 11.09.2022 um 14:22 schrieb Sven Barth via fpc-pascal:
Ondrej Pokorny via fpc-pascal
schrieb am So., 11. Sep. 2022, 12:18:
Shouldn't this assignment be forbidden?
type
TProc = procedure is nested;
function TestNested: TProc;
begin
result := procedure /
meTwo, meThree, meUnused2, meFive);
2.) publish their ordinal value
public
property MyEnum: TMyEnum read FMyEnum write FMyEnum;
published
property MyEnumOrd: Integer read GetMyEnumOrd write SetEnumOrd; //
gets/sets MyEnum as ordinal value
Ondrej
___
?
Though I am not Mattias and cannot comment on his preferences:
CodeTools are part of the Lazarus project, hence the question belongs to
the Lazarus mailing list https://lists.lazarus-ide.org/listinfo/lazarus
or one of the IDE categories in the forum.
Ondrej
isn't changed anyway. Do I need
to run ApplyUpdates as well? Isn't a commit enough?
I'll check it again.
Ondrej
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
umAttr;
constructor Create(Values: array of string);
---
Or, if the enum values are valid identifiers, you can simple use scoped
enums:
{$SCOPEDENUMS ON}
TMyEnum = (YES, NO, COULD_BE);
and the usual TypeInfo methods.
Ondrej
On 23.12.2022 06:35, Andrew Haines via fpc-pascal wrote:
So, I
On 23.12.2022 15:50, Andrew Haines via fpc-pascal wrote:
On 12/23/22 5:24 AM, Ondrej Pokorny via fpc-pascal wrote:
This may be simpler:
[TEnumAttr(['YES', 'NO', 'COULD_BE'])]
TMyEnum = (meYes, meNo, meCouldBe);
TEnumAttr = class(TCustomAttribute)
prote
mpiler warns you with an error when you add
a new value to the enum and you don't declare a string value for it.
Ondrej
program EnumAttrTest;
{$mode objfpc}{$H+}
{$modeswitch prefixedattributes}
uses
SysUtils, TypInfo;
type
EnumValues = class(TCustomAttribute)
public
function OrdT
d old "fppkg.cfg" to "fppkg.bak"
Writing sample configuration file to /etc/fppkg/default
Saved old "default" to "default.bak"
End of installation.
Do you know what I am missing to build FPC main from Git? Btw. I can
build pas2js with a simple "make" just fine... I am lost :(
Thanks
Ondrej
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
On 27.04.2023 15:54, Ondrej Pokorny via fpc-pascal wrote:
OK, I searched for the error and found this page:
https://wiki.freepascal.org/FPMake#Could_not_find_unit_directory_for_dependency_package_.22rtl.22
Even if I do
export FPCDIR=/usr/lib/fpc/3.2.2
before make (where the installer installed
On 27.04.2023 17:54, Ondrej Pokorny via fpc-pascal wrote:
On 27.04.2023 15:54, Ondrej Pokorny via fpc-pascal wrote:
OK, I searched for the error and found this page:
https://wiki.freepascal.org/FPMake#Could_not_find_unit_directory_for_dependency_package_.22rtl.22
OK, I made the fpmake command
On 27.04.2023 17:54, Ondrej Pokorny via fpc-pascal wrote:
# number of threads
set usethreads=4
I found it...
I copied&pasted it from windows, on Linux it must be:
# number of threads
usethreads=4
Thanks anyway
Ondrej
___
fpc-pascal mail
than pascal.
Search for "delphi set display settings" or "winapi set display
settings" in google to find some resources.
E.g.
https://stackoverflow.com/questions/956870/using-changedisplaysettingsex-in-delphi-to-set-primary-monitor
Ondrej
___
t mingw32 binaries and registered the search path
with:
-Xe -XRp:\software\MinGW\mingw32\bin
But it didn't not help - still the same error.
Can anybody help please?
Delphi can link the OBJ file without problems.
Thanks
Ondrej
___
f
writeln() converts the ordinal value to the value name and if the entry
is not found, the 107 error is raised.
Ondrej
On 06.06.2024 06:22, Hairy Pixels via fpc-pascal wrote:
This program below crashes because the value 12 is not in the enum. I was curious though,
how does it know this? Does
On 06.06.2024 09:19, Ondrej Pokorny via fpc-pascal wrote:
writeln() converts the ordinal value to the value name and if the
entry is not found, the 107 error is raised.
Ondrej
On 06.06.2024 06:22, Hairy Pixels via fpc-pascal wrote:
[ ... ]
how this works at runtime is another question.
To
On 06.06.2024 11:16, Sven Barth via fpc-pascal wrote:
Ondrej Pokorny via fpc-pascal
schrieb am Do., 6. Juni 2024, 09:30:
Hello,
I am on Windows 64bit, but using the i386 compiler.
I have to link a 3rd party OBJ file with {$L 'xyz.obj'}.
With the internal linker I
25 matches
Mail list logo
