Re: [fpc-pascal] PDF generator

[Michael Van Canneyt]

On Fri, 18 Mar 2016, Peter wrote:


On 05/03/16 17:27, Michael Van Canneyt wrote:

Hi,

I have committed a PDF generator to FPC Subversion: fcl-pdf.



Hi Michael,

What's the input format?  html?


Object Pascal Code.

Michael.
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] How do I test the testfppdf on Windows?

[Graeme Geldenhuys]

On 2016-03-05 20:24, Ralf Quint wrote:
> "The font 'Times' contains a bad /BBox"...


I found the problem and fixed this locally. I'm busy cleaning up the
fix, then test against all available PDF viewers I have. This fix should
be in the repo in a day or two.


Regards,
  - Graeme -

-- 
fpGUI Toolkit - a cross-platform GUI toolkit using Free Pascal
http://fpgui.sourceforge.net/

My public PGP key:  http://tinyurl.com/graeme-pgp
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Mangle name in fpc-FreeBSD ?

[Sven Barth]

Am 20.03.2016 00:57 schrieb "fredvs" :
> PS: This is a great victory who will solve (I hope) other library-related
> problems.
> PS2: Are there limitations of using dlsym() vs GetProcedureAdress() ?
> PS3: If dlsym() is cross-platform too, should I update all my codes that
use
> GetProcedureAdress() ?

LoadLibrary and GetProcedureAddress internally use dlopen and dlsym
respectively on Unix-like platforms. So it might be that either LoadLibrary
or GetProcedureAddress calls its respective internal function incorrectly
on FreeBSD and that needs to be fixed then.
And no, dlopen and dlsym are not cross platform (e.g. not on Windows)
that's.why the LoadLibrary and GetProcedureAddress functions exist in the
first place.

Regards,
Sven
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

[fpc-pascal] Smartphone apps in FPC

[donald . pedder]

Hi all,

   I was on this list years ago, and then fell off at some point for
some reason, but back again now. :-)

   Having written for DOS all those years ago, I am now just getting
into making smartphone apps, and it would be good to be able to use my
old friend FPC for it. :-) I have some familiarity with Java, so
learning Android not too difficult (just gotta get around the
smartphone-specific knowledge), but I don't know Apple's language at
all, and I do want to make my apps available in both Google and Apple
stores. I understand Apple have relaxed their attitude towards
third-party developer tools in recent years, though I have also heard
they frown on some (plus doing it with FPC may be taking me into an
area where not so much tutorials available as there are for
Java/Swift). Want to be sure my apps don't get rejected from Apple
store for such a reason.

   So, just looking for some feedback from anyone on this list who
may have used FPC for Android/Apple apps. i.e. have you written in FPC
and succeeded in getting into Apple store, etc.? I'm looking to make
my decision soon as to which language to use soon, and if FPC is
suitable then that saves me having to learn a new language for the
project. :-)

thanks,
  Donald.

-
Email sent using Optus Webmail
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Mangle name in fpc-FreeBSD ?

[fredvs]

Re-hello (and last for tonight).

Yep, yep, yep.

Replacing all GetProcedureAdress() with dlsym()

DOES THE TRICK ! ;-)

(but dlopen() is needed in place of Loadlibrary())

Excellent tip.

Many, many, many thanks for help.

(And, maybe, a check for DynLibs.GetProcedureAdress() is needed for
FreeBSD).

And re-thanks for your bright light.

PS: This is a great victory who will solve (I hope) other library-related
problems.
PS2: Are there limitations of using dlsym() vs GetProcedureAdress() ?
PS3: If dlsym() is cross-platform too, should I update all my codes that use
GetProcedureAdress() ?

Fre;D




-
Many thanks ;-)
--
View this message in context: 
http://free-pascal-general.1045716.n5.nabble.com/Mangle-name-in-fpc-FreeBSD-tp5724528p5724588.html
Sent from the Free Pascal - General mailing list archive at Nabble.com.
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Smartphone apps in FPC

[donald . pedder]

Hi Michael,

   I remember your name from when I was here before.

> I can send a URL for the articles if you want.

That would be great. I would love to read them (I am at the soaking-up
information stage :-) ).
thanks,  Donald.

-
Email sent using Optus Webmail
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Mangle name in fpc-FreeBSD ?

[fredvs]

Just quick before they cut the signal...

Could dlsym(ap1, Pchar('mp4ff_open_read') be used in place of
getprocedureaddress(hn, Pchar('mp4ff_open_read')  ?

Because, if dlsym() works, maybe replacing all getprocedureaddress() with
dlsym() will work?

And can loadlibrary() be used by dlsym()  ( or dlsym() needs dlopen() ) ?

Thanks.

Fre;D



-
Many thanks ;-)
--
View this message in context: 
http://free-pascal-general.1045716.n5.nabble.com/Mangle-name-in-fpc-FreeBSD-tp5724528p5724587.html
Sent from the Free Pascal - General mailing list archive at Nabble.com.
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Mangle name in fpc-FreeBSD ?

[fredvs]

OOOps, in previos mail:
Thanks to Ewald, Marco and Marc.

Fre;D



-
Many thanks ;-)
--
View this message in context: 
http://free-pascal-general.1045716.n5.nabble.com/Mangle-name-in-fpc-FreeBSD-tp5724528p5724586.html
Sent from the Free Pascal - General mailing list archive at Nabble.com.
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Mangle name in fpc-FreeBSD ?

[fredvs]

@ Marco and Marc thanks for help.

Sorry I do not have easy internet connection so I worked by my side.

I will try your tips.

By the way, here are my investigations:



Hello.

Ok, ok, understood and wow.

Added in code:

Function dlopen(filename: PChar; flags: cint): Pointer; cdecl; external;
Function dlclose(handle: Pointer): cint; cdecl; external;
Function dlsym(handle: Pointer; Name: PChar): Pointer; cdecl; external;
Function dlerror: PChar; cdecl; external;

and, magic, it works. ;-)

Now the result:

In code:

procedure loadmylib(lib : pchar);
var
ap1, ap2, ap3 : pointer;
'
begin
/// FreeBSD functions:
ap1 := dlopen(Pchar(lib), 0);
if ap1 <> nil then
writeln('dlopen() is OK') else
writeln('dlopen() is NOT OK') ;

ap2 := dlsym(ap1, Pchar('mp4ff_open_read');
if ap2 <> nil then
writeln('dlsym() is OK') else
writeln('dlsym() is NOT OK') ;

writeln(dlerror());

end;

---> result:
writeln('dlopen() is OK')
writeln('dlsym() is OK')
_ (no error)

--
Now with DynLibs:

procedure loadmylib(lib : pchar);
var
ap1: pointer;
hn : integer;
'
begin
/// with dynlibs
hn := dynlibs.loadlibrary(Pchar(lib));

if hn <> 0 then
writeln('loadlibrary() is OK') else
writeln('loadlibrary() is NOT OK') ;

ap1 := getprocedureaddress(hn, Pchar('mp4ff_open_read');

if ap1 <> nil then
writeln('getprocedureaddress() is OK') else
writeln('getprocedureaddress() is NOT OK') ;

end;

--> result:

loadlibrary() is OK
getprocedureaddress() is NOT OK


 
Conclusion: Maybe getprocedureaddress() has problems.

PS: Other tips are welcome.

Fre;D


















-
Many thanks ;-)
--
View this message in context: 
http://free-pascal-general.1045716.n5.nabble.com/Mangle-name-in-fpc-FreeBSD-tp5724528p5724585.html
Sent from the Free Pascal - General mailing list archive at Nabble.com.
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] [Lazarus] PDF generator

[Graeme Geldenhuys]

On 2016-03-06 07:35, Roberto P. wrote:
> Are metadata included ?

If you mean information like Author, Creation Date, PDF Producer,
Application Name, Title etc then the answer is yes.

Regards,
  - Graeme -

___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Mangle name in fpc-FreeBSD ?

[Marc Santhoff]

On Mo, 2016-03-14 at 08:15 -0700, fredvs wrote:
> Hello.
> 
> I have problem to access methods from a C library.
> 
> For FreeBSD, the methods cannot be accessed (but ok for Linux and Windows).
> 
> In FreeBSD, LoadLibrary(aac.so) is working but all GetProcAdress() for each
> method fail.

> Does anybody have a idea why GetProcAdress() fail in FreeBSD (but ok for
> Linux and Windows) ?
> 
> Or must the library-code be compiled with some special instructions for fpc
> ?
> 
> Every comment or light is highly welcome (tips, must-know, etc,...).

It would be helpful to see the code fragments in question. The
declaration of the external functions if any and the code calling
LoadLibrary() and GetProcAddress().

-- 
Marc Santhoff 

___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Codepage + class helper raises "Error identifier idents no member ..."

[silvioprog]

On Wed, Mar 16, 2016 at 8:53 PM, Bart  wrote:
[...]

> @Silvio: Sven fixed it in trunk.
> Can you test and report back in
> http://bugs.freepascal.org/view.php?id=29745
> (I don't have fpc trunk)


Now it is working like a charm. Thank you Bart and Sven! :-D

(you can close the issue ^^ )

-- 
Silvio Clécio
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Smartphone apps in FPC

[Maciej Izak]

2016-03-17 14:58 GMT+01:00 Felipe Monteiro de Carvalho <
felipemonteiro.carva...@gmail.com>:

> Well, yes, it works fine, but you still need a Java part otherwise a
> lot of APIs cannot be accessed. In particular APIs that require
> creating interfaces.
>

I can confirm too :)


>
> > even is possible visual remote-debugging
> > from Lazarus (but that requires many IDE modifications).
>
> wow, any link describing how to achieve that?


Work in progress.

-- 
Best regards,
Maciej Izak
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Mangle name in fpc-FreeBSD ?

[Ewald]

On 03/19/2016 08:53 PM, Marco van de Voort wrote:
> In our previous episode, Ewald said:
>>> Re-huh..., it should be a great plus if a dlerror() was implemented in fpc
>>> too.
>>>
>>> But maybe I am missing something, maybe dlopen(), dlsym() and dlerror() can
>>> be done by pascal code (and not via console, like I try).
>>>
>> dlopen, dlsym and dlerror are *functions*, not console commands. Well, I
>> never tried the latter, but it appears they are not on your system ;-)
>>
>> Now, I don't know where exactly these functions are declared (in which
>> unit, that is), but for debugging purposes, just add
>>
>> Function dlopen(filename: PChar; flags: cint): Pointer; cdecl; external;
>> Function dlclose(handle: Pointer): cint; cdecl; external;
>> Function dlsym(handle: Pointer; Name: PChar): Pointer; cdecl; external;
>> Function dlerror: PChar; cdecl; external;
>>
>> Somewhere in your code before you call them.
> ... or use unit dl.

I knew they were in some unit somewhere ;-) Thanks for the pointer!

-- 

Ewald

___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Mangle name in fpc-FreeBSD ?

[Ewald]

On 03/19/2016 08:29 PM, fredvs wrote:
>> dlopen, dlsym and dlerror are *functions*, not console commands. Well, I
>> never tried the latter, but it appears they are not on your system ;-)
>> Now, I don't know where exactly these functions are declared (in which
>> unit, that is), but for debugging purposes, just add
>>Function dlopen(filename: PChar; flags: cint): Pointer; cdecl;
>> external;
>>Function dlclose(handle: Pointer): cint; cdecl; external;
>>Function dlsym(handle: Pointer; Name: PChar): Pointer; cdecl; external;
>>Function dlerror: PChar; cdecl; external;
>> Somewhere in your code before you call them. 
> Ooops, thanks for answer but now I am completely loosed... ;-(
>
> So  those functions can be used in fpc code?
> If so, must a library be loaded to access that functions (and what library)?
> Or are those functions defined in a fpc unit ?

See Marco's answer. So instead of using the above declarations, a simple
`Uses dl;` should do the trick.

As to how to use them, now you do something like this:
X:= GetProcedureAddress(...);
Y:= GetProcedureAddress(...);
Z:= GetProcedureAddress(...);

When one of these fails, a nil pointer is returned. dlerror will give
you more info on what failed where. So, if you know X returns nil for
some-yet-to-be-determined-reason, place the dlerror immediately after that:
X:= GetProcedureAddress(...);
WriteLn(dlerror);
Y:= GetProcedureAddress(...);
Z:= GetProcedureAddress(...);

Of course, you could choose to do something like this if you do not know
which call exactly fails:
X:= GetProcedureAddress(...);
If X = nil Then
WriteLn('Z: ', dlerror);
Y:= GetProcedureAddress(...);
If Y = nil Then
WriteLn('Y: ', dlerror);
Z:= GetProcedureAddress(...);
If Z = nil Then
WriteLn('Z: ', dlerror);

It is really nothing more than a function call, quite similar to fpGetErrNo.


> I am in the dark.

Being in the dark is positive, as one can always turn on the lights :-)

-- 
Ewald


___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Smartphone apps in FPC

[Reimar Grabowski]

On Thu, 17 Mar 2016 11:08:01 +0100 (CET)
Michael Van Canneyt  wrote:

> - Use the Android SDK, using the JVM compiler.
> I have written several articles on how to use the latter approach; 
> I wrote a real-world app with it. 
But you don't own a smart phone and have never heard of 'long click'
like in android.view.View.OnLongClickListener ^^

R.
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] How do I test the testfppdf on Windows?

[Graeme Geldenhuys]

On 2016-03-18 10:51, Michael Van Canneyt wrote:
> Please, only fpcunit tests.

I was maybe unclear in my request. The unit tests are implemented with
the FPCUnit API - and always will be (even though both FPCUnit and
FPTest have compatibility interfaces with each other). I'm simply asking
for the two program files to be added - for convenience. Similar to what
the *.lpi files are added to FCL, even though Free Pascal doesn't
include Lazarus IDE.

Regards,
  - Graeme -

-- 
fpGUI Toolkit - a cross-platform GUI toolkit using Free Pascal
http://fpgui.sourceforge.net/

My public PGP key:  http://tinyurl.com/graeme-pgp
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] How do I test the testfppdf on Windows?

[Graeme Geldenhuys]

On 2016-03-18 10:16, Michael Van Canneyt wrote:
> There is already a test added, see my private mail to you from this morning.

Ah, I see it now. Thanks. At the time of my message I was still
kick-starting my brain with my first cup of coffee. ;-)


ps:
  What is FPC's policy on using unittest frameworks? Does it only allow
  FPCUnit based test projects in FCL. The unittest units for fcl-pdf
  are already FPCUnit and FPTest compatible. All that is missing is the
  Console and GUI project files for FPTest support (located in the Wisa
  repository). Adding those two files, if possible, would be greatly
  appreciated.

Regards,
  - Graeme -

-- 
fpGUI Toolkit - a cross-platform GUI toolkit using Free Pascal
http://fpgui.sourceforge.net/

My public PGP key:  http://tinyurl.com/graeme-pgp
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Mangle name in fpc-FreeBSD ?

[Marco van de Voort]

In our previous episode, Ewald said:
> > Re-huh..., it should be a great plus if a dlerror() was implemented in fpc
> > too.
> >
> > But maybe I am missing something, maybe dlopen(), dlsym() and dlerror() can
> > be done by pascal code (and not via console, like I try).
> >
> dlopen, dlsym and dlerror are *functions*, not console commands. Well, I
> never tried the latter, but it appears they are not on your system ;-)
> 
> Now, I don't know where exactly these functions are declared (in which
> unit, that is), but for debugging purposes, just add
> 
> Function dlopen(filename: PChar; flags: cint): Pointer; cdecl; external;
> Function dlclose(handle: Pointer): cint; cdecl; external;
> Function dlsym(handle: Pointer; Name: PChar): Pointer; cdecl; external;
> Function dlerror: PChar; cdecl; external;
> 
> Somewhere in your code before you call them.

... or use unit dl.
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Mangle name in fpc-FreeBSD ?

[fredvs]

> dlopen, dlsym and dlerror are *functions*, not console commands. Well, I
> never tried the latter, but it appears they are not on your system ;-)

> Now, I don't know where exactly these functions are declared (in which
> unit, that is), but for debugging purposes, just add

>Function dlopen(filename: PChar; flags: cint): Pointer; cdecl;
> external;
>Function dlclose(handle: Pointer): cint; cdecl; external;
>Function dlsym(handle: Pointer; Name: PChar): Pointer; cdecl; external;
>Function dlerror: PChar; cdecl; external;

> Somewhere in your code before you call them. 

Ooops, thanks for answer but now I am completely loosed... ;-(

So  those functions can be used in fpc code?
If so, must a library be loaded to access that functions (and what library)?
Or are those functions defined in a fpc unit ?

I am in the dark.

Fre;D






-
Many thanks ;-)
--
View this message in context: 
http://free-pascal-general.1045716.n5.nabble.com/Mangle-name-in-fpc-FreeBSD-tp5724528p5724581.html
Sent from the Free Pascal - General mailing list archive at Nabble.com.
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] crosscompiling problem (.a file)

[Jonas Maebe]

ulrich wrote:

Dne 16.3.2016 v 15:23 Jonas Maebe napsal(a):

ulrich wrote:

In Ming32 I ran the following command:
$ pwd
/c/lazarus16/fpc/3.0.0

$ make crossinstall CPU_TARGET=arm OS_TARGET=linux
CROSSBINDIR=/c/lazarus16/FPC/3.0.0/bin OPT=-dFPC_ARMEL
INSTALL_PREFIX=/c/lazarus16/FPC FPC=/c/lazarus16/FPC/3.0.0/bin/X86_
64-win64/FPC.

The result is:
system.pp (620) Error: Can not create archive file:
\c\lazarus16\fpc\3.0.0\RTL\units\x86_64-win64\libimpsystem.a



I have not installed the cygwin. Running a compilation from mingw terminal.


Try from a plain cmd.exe prompt instead then.


Jonas
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Mangle name in fpc-FreeBSD ?

[Ewald]

On 03/19/2016 07:49 PM, fredvs wrote:
> Hello Marc.
>
> Huh, I have a dummy question...
>
> How do you use dlopen(), dlsym() and dlerror() ?
>
> On console, with ->
>
> fred@freebsd> dlopen('/root/mylib.so')
>
> Result = "Illegal command name..."
>
>> call dlerror() after the failing dlsym(). It should tell _why_ the call
>> failed. 
> Re-huh..., it should be a great plus if a dlerror() was implemented in fpc
> too.
>
> But maybe I am missing something, maybe dlopen(), dlsym() and dlerror() can
> be done by pascal code (and not via console, like I try).
>
dlopen, dlsym and dlerror are *functions*, not console commands. Well, I
never tried the latter, but it appears they are not on your system ;-)

Now, I don't know where exactly these functions are declared (in which
unit, that is), but for debugging purposes, just add

Function dlopen(filename: PChar; flags: cint): Pointer; cdecl; external;
Function dlclose(handle: Pointer): cint; cdecl; external;
Function dlsym(handle: Pointer; Name: PChar): Pointer; cdecl; external;
Function dlerror: PChar; cdecl; external;

Somewhere in your code before you call them.

-- 
Ewald

___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Mangle name in fpc-FreeBSD ?

[fredvs]

Hello Marc.

Huh, I have a dummy question...

How do you use dlopen(), dlsym() and dlerror() ?

On console, with ->

fred@freebsd> dlopen('/root/mylib.so')

Result = "Illegal command name..."

> call dlerror() after the failing dlsym(). It should tell _why_ the call
> failed. 

Re-huh..., it should be a great plus if a dlerror() was implemented in fpc
too.

But maybe I am missing something, maybe dlopen(), dlsym() and dlerror() can
be done by pascal code (and not via console, like I try).

Thanks.

Fre;D



-
Many thanks ;-)
--
View this message in context: 
http://free-pascal-general.1045716.n5.nabble.com/Mangle-name-in-fpc-FreeBSD-tp5724528p5724579.html
Sent from the Free Pascal - General mailing list archive at Nabble.com.
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] PDF generator

[Michael Van Canneyt]

On Fri, 18 Mar 2016, Graeme Geldenhuys wrote:


On 2016-03-05 17:27, Michael Van Canneyt wrote:


I have committed a PDF generator to FPC Subversion: fcl-pdf.


Michael. Is the fcl-pdf/utils/* really needed? As far as I can see that
code is obsolete now that fpPDF can embedding TTF files directly. The
usage of .fnt files are not used any more.

If that directory gets removed, then the associated unit test for
DejaVuSans.fnt should be removed too.


Good point. I will remove it.

Michael.
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Smartphone apps in FPC

[Maciej Izak]

2016-03-18 10:57 GMT+01:00 Ingemar Ragnemalm :

>
>> But for completeness, surely you do NOT have to write the Java (JVM)
> parts in Java, but you can write that too in FPC, right? I mean, using the
> FPC JVM compiler. But you need to interface JVM and native code like you do
> with Java code.


Probably is possible to use FPC JVM, but I don't have time for this (yet).
Currently in my "production" project is used Java frontend and FPC backend
(communication by JNI) as client and FPC(Linux)/Delphi(Win) as Server.

Ad: in both cases (client and server) is used ofc mORMot framework

I am looking forward to more information here! :)


as a proof ;) :
https://drive.google.com/file/d/0B4PZhd929_ZRY2NmT1QtSTdlWEU/view?usp=sharing


-- 
Best regards,
Maciej Izak
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Fpc 3.0 Bug: type specialization and operator overload

[Mazola Winstrol]

2016-03-12 21:45 GMT-03:00 Sven Barth :

> It does not treat them the same, it simply picks the wrong one (as in
> "doesn't correctly respect the unit qualifier"). You should see a different
> (yet no less wrong) behavior if you turn around the units in the
> uses-clause.
>
> Please report.
>
> Regards,
> Sven
>
>
Done. #0029859. 


Regards
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Primitive Record Wrappers

[Mazola Winstrol]

2016-03-11 0:15 GMT-03:00 silvioprog :

> On Sun, Mar 6, 2016 at 7:21 PM, Mazola Winstrol 
> wrote:
> [...]
>
>> Please see the code in attachments and send your suggestions / remarks.
>>
>
> Thanks for share.
>
> How do I use the the NullableTypes.String unit?
>
> Tried:
>
> program project1;
>
> {$mode objfpc}{$H+}
>
> uses NullableTypes.String;
>
> begin
> end.
>
> Got:
>
> Fatal: Syntax error, "identifier" expected but "STRING" found
>
>
I will fix the unit names, as suggested by Sven and Michael.

The approach i used doesn't work with the current fpc 3.0 release due to
some bugs in the compiler (#0029859
  and #0029792
).

Please wait for the fixes. I will send a new version here.
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] How do I test the testfppdf on Windows?

[Michael Van Canneyt]

On Fri, 18 Mar 2016, Jesus Reyes A. wrote:

En Thu, 17 Mar 2016 21:10:03 -0600, silvioprog  
escribió:


On Tue, Mar 15, 2016 at 4:38 AM, Michael Van Canneyt 
 wrote:

[...]

I have (hopefully) fixed this. rev. 33255.


The crash was fixed after upgrade my FPC. But it still generating five 
empty pages even applying the Jesus Reyes' patch. :-/


--Silvio Clécio


I took a look at the pdf file you posted on march 5. I think I know why your 
file looks so odd, all numeric values non-integers are written in the pdf 
file using COMMA :)


Hah !

You think you've tested everything, and then this kind of thing pops up :-)

I committed a quick fix which should fix the comma issue, but it still needs to 
be adapted.

Michael.___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] How do I test the testfppdf on Windows?

[Graeme Geldenhuys]

On 2016-03-18 07:57, Michael Van Canneyt wrote:
> You think you've tested everything, and then this kind of thing pops up :-)

Indeed. If you haven't yet, I'll extend the unit tests for that too.

Regards,
  - Graeme -

-- 
fpGUI Toolkit - a cross-platform GUI toolkit using Free Pascal
http://fpgui.sourceforge.net/

My public PGP key:  http://tinyurl.com/graeme-pgp
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Smartphone apps in FPC

[Michael Van Canneyt]

On Thu, 17 Mar 2016, donald.ped...@optusnet.com.au wrote:


Hi all,

   I was on this list years ago, and then fell off at some point for
some reason, but back again now. :-)

   Having written for DOS all those years ago, I am now just getting
into making smartphone apps, and it would be good to be able to use my
old friend FPC for it. :-) I have some familiarity with Java, so
learning Android not too difficult (just gotta get around the
smartphone-specific knowledge), but I don't know Apple's language at
all, and I do want to make my apps available in both Google and Apple
stores. I understand Apple have relaxed their attitude towards
third-party developer tools in recent years, though I have also heard
they frown on some (plus doing it with FPC may be taking me into an
area where not so much tutorials available as there are for
Java/Swift). Want to be sure my apps don't get rejected from Apple
store for such a reason.

   So, just looking for some feedback from anyone on this list who
may have used FPC for Android/Apple apps. i.e. have you written in FPC
and succeeded in getting into Apple store, etc.? I'm looking to make
my decision soon as to which language to use soon, and if FPC is
suitable then that saves me having to learn a new language for the
project. :-)


There are 2 possible approaches:

- Use the NDK, and then basically you're writing a native Linux application.
  You can try to use the Android SDK through some JNI tricks; but I am
  unsure how well this works.

- Use the Android SDK, using the JVM compiler.

I have written several articles on how to use the latter approach; 
I wrote a real-world app with it. 
I can send a URL for the articles if you want.


Michael.___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] PDF generator

[Graeme Geldenhuys]

On 2016-03-05 17:27, Michael Van Canneyt wrote:
> 
> I have committed a PDF generator to FPC Subversion: fcl-pdf.

Michael. Is the fcl-pdf/utils/* really needed? As far as I can see that
code is obsolete now that fpPDF can embedding TTF files directly. The
usage of .fnt files are not used any more.

If that directory gets removed, then the associated unit test for
DejaVuSans.fnt should be removed too.


Regards,
  - Graeme -

-- 
fpGUI Toolkit - a cross-platform GUI toolkit using Free Pascal
http://fpgui.sourceforge.net/

My public PGP key:  http://tinyurl.com/graeme-pgp
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Mangle name in fpc-FreeBSD ?

[fredvs]

> Would you mind telling the result of dlerror()? 

OK, I will follow your tips.
Write you later with the result.

> There are in fact different C compilers which are all able to compile C
or C++. 

Yes and nearly all that compilers are the same (why not use sym-link?)

-> "Why not use sym-link in place of copy 8x the same compiler (+- 8 megas)
with different name " -> Dont ask this to FreeBSD forum -> It is sensible.
(I already try)

-> "Why, in the script to create-compile the kernel of FreeBSD, different
compilers are used (that are the same in fact).
Would it not be simpler to use only one compiler ? "  -> Dont ask this to
FreeBSD forum -> It is sensible.  (I already try)

PS: I will become totally fan of FreeBSD when the C-war will end and when it
will be easy to recompile the kernel (with only one compiler). 

Many thanks for your excellent tips Marc.

Write you later.

Fre;D





-
Many thanks ;-)
--
View this message in context: 
http://free-pascal-general.1045716.n5.nabble.com/Mangle-name-in-fpc-FreeBSD-tp5724528p5724576.html
Sent from the Free Pascal - General mailing list archive at Nabble.com.
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] crosscompiling problem (.a file)

[Jonas Maebe]

ulrich wrote:

In Ming32 I ran the following command:
$ pwd
/c/lazarus16/fpc/3.0.0

$ make crossinstall CPU_TARGET=arm OS_TARGET=linux
CROSSBINDIR=/c/lazarus16/FPC/3.0.0/bin OPT=-dFPC_ARMEL
INSTALL_PREFIX=/c/lazarus16/FPC FPC=/c/lazarus16/FPC/3.0.0/bin/X86_
64-win64/FPC.

The result is:
system.pp (620) Error: Can not create archive file:
\c\lazarus16\fpc\3.0.0\RTL\units\x86_64-win64\libimpsystem.a


Don't do this in a Cygwin shell, and remove any Cygwin shells/utilities 
from your path before using the FPC/Lazarus makefiles.



Jonas
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Smartphone apps in FPC

[Reimar Grabowski]

On Thu, 17 Mar 2016 17:29:23 +0100 (CET)
Michael Van Canneyt  wrote:

> Obviously they are not so essential as you seem to think ?
You are right, they are not.
They are only useful to access strange chars like "0"-"9" or "!@#$%&*?/ etc." 
which are not often used in passwords or user names. But of course it depends 
on the used virtual keyboard and the chars can be accessed in other ways.
I am sure you really never encountered 'long clicks' (no irony or sarcasm here) 
and you never really looked too deep into the API Guides about Android UI 
that's what amazes me.
 
> The biggest stumbleblock (and even so) was parsing JSON and sending JSON to a 
> server.
Jackson (external) and HttpURLConnection (part of the API) do the trick very 
easily but I know nothing about how FPC accesses API classes and even less how 
it can use external Java libs (fcl-json could not be used?).

I apologize if I did offend you.

R.

Tip of the day: There is no double click listener in Android.
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Codepage + class helper raises "Error identifier idents no member ..."

[Bart]

On 3/17/16, silvioprog  wrote:

> Now it is working like a charm. Thank you Bart and Sven! :-D

I merely reported it in Mantis.

> (you can close the issue ^^ )

Done.

Bart
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Mangle name in fpc-FreeBSD ?

[Marc Santhoff]

On Fr, 2016-03-18 at 16:34 -0700, fredvs wrote:
> > When following the procedure calls I find: 
> ...
> 
> Hello Mark.
> 
> Thanks for your light.
> 
> Huh, yes, IMO, there is something strange in dlsym/FreeBSD.

Would you mind telling the result of dlerror()?

> And asking something about C library/compiler is extremely sensible there on
> FreeBSD forum.
> (FreeBSD needs 8 (!) different C compilers (clang, c++, CC, cc, cpp, ...) to
> compile himself).

Not really. Since c++ is the same compiler as (g)cc, cpp is the C
ppreprocessor an CC is mostly only used as a variable name in Makefiles
and shell skripts set to the right compiler, that is clearly wrong.

There are in fact different C compilers which are all able to compile C
or C++. There is actually the system compiler, which has been gcc and
will be or is already clang. Some ports require newer versions of gcc,
so sometimes there are two or three of them installed. But that's it,
AFAIK.

Look:

marc@puma:/home/marc > cc -v
Using built-in specs.
Target: amd64-undermydesk-freebsd
Configured with: FreeBSD/amd64 system compiler
Thread model: posix
gcc version 4.2.1 20070831 patched [FreeBSD]

marc@puma:/home/marc > gcc -v
Using built-in specs.
Target: amd64-undermydesk-freebsd
Configured with: FreeBSD/amd64 system compiler
Thread model: posix
gcc version 4.2.1 20070831 patched [FreeBSD]

marc@puma:/home/marc > CC -v
Using built-in specs.
Target: amd64-undermydesk-freebsd
Configured with: FreeBSD/amd64 system compiler
Thread model: posix
gcc version 4.2.1 20070831 patched [FreeBSD]

marc@puma:/home/marc > c++ -v
Using built-in specs.
Target: amd64-undermydesk-freebsd
Configured with: FreeBSD/amd64 system compiler
Thread model: posix
gcc version 4.2.1 20070831 patched [FreeBSD]

marc@puma:/home/marc > cpp --version
cpp (GCC) 4.2.1 20070831 patched [FreeBSD]
Copyright (C) 2007 Free Software Foundation, Inc.
This is free software; see the source for copying conditions.  There is
NO
warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR
PURPOSE.

All the same. ;)
Only that one differs:

marc@puma:/home/marc > clang -v
FreeBSD clang version 3.0 (tags/RELEASE_30/final 145349) 20111210
Target: x86_64-unknown-freebsd9.0
Thread model: posix


You can try looking at the manual pages, type in "man cc" and the other
names.

-- 
Marc Santhoff 

___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Mangle name in fpc-FreeBSD ?

[Marc Santhoff]

On Do, 2016-03-17 at 04:27 -0700, fredvs wrote:
> > it would be helpful to see the code fragments in question.
> > The declaration of the external functions if any and the code calling
> > LoadLibrary() and GetProcAddress(). 
> 
> Hello Mark and thanks for help.
> 
> Here declaration to load-getprocess:
> -
> var
>   mp4ff_open_read: function(f : p_mp4ff_callback_t) : mp4ff_t; cdecl;
>   libpointer : {$IFDEF MSWINDOWS}longword{$ELSE}{$IFDEF
> CPU32}longword{$ELSE}PtrInt{$ENDIF}{$ENDIF};
> ...
> 
> libpointer := DynLibs.SafeLoadLibrary(PChar(mp4ff)); -> OK for FreeBSD64
> too;-)
> 
>  Pointer(mp4ff_open_read) :=
> GetProcAddress(hMp4ff, pchar('mp4ff_open_read')); -> Here always =
> nil for FreeBSD 64 ;-( (but ok for Linux + Windows)
> ...
> -

When following the procedure calls I find:


Function GetProcAddress(Lib : TlibHandle; const ProcName : AnsiString) :
Pointer;

begin
  Result:=GetProcedureAddress(Lib,Procname);
end;


Next is:


Function GetProcedureAddress(Lib : TLibHandle; const ProcName :
AnsiString) : Pointer;

begin
  Result:=dlsym(lib,pchar(ProcName));
end;


Okay, man page says:

http://www.freebsd.org/cgi/man.cgi?query=dlsym=0=0=FreeBSD+10.2-RELEASE=default=html

You could do some things, like trying to use the special handle
RTLD_NEXT, or and much more important, call dlerror() after the failing
dlsym(). It should tell _why_ the call failed.

> PS: I have the same problem for other libraries in FreeBSD 64 ->
> GetProcAddress() fail.
> PS2: It appends for some libraries in FreeBSD64, not all.

Intresting. I know there are differences in the systems dlopen() and
another similar variant installed by libtool, found in libbtdl regarding
to my notes. Dunno if it matters. Libtools implementation does
differentiate between OSs by itself (at compile time). Cold be a source
of confusion...

-- 
Marc Santhoff 

___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Smartphone apps in FPC

[Michael Van Canneyt]

On Thu, 17 Mar 2016, Reimar Grabowski wrote:


On Thu, 17 Mar 2016 15:49:50 +0100 (CET)
Michael Van Canneyt  wrote:


But, I do have an emulator, and plenty of people in the building do have a
smartpone :-)

Amazing, eh ? :)

Not really.
But it's amazing that you wrote articles and a real-world application and in 
the process never stumbled upon 'long clicks' especially as they are essential 
in Androids keyboard input.


Obviously they are not so essential as you seem to think ?


Never tried to input an Umlaut on an Android virtual keyboard?


No.


Perhaps the concept is not as clearly identifiable as I thought or Google has 
hidden the OnLongClickListener interface too well.


I honestly never encountered it. I didn't look for it either, of course.


It's also amazing that 'not owning' a smart phone was just an excuse as you 
clearly have interacted with smart phones (yes, even emulated ones count).


I really don't see that.

I have never used a smartphone, and on the emulator all I had to do was
swipe and click to test my program. Basically it was a bunch of listviews 
to select a particular list, and a listview with some checkboxes embedded. 
In the username/password dialog, I could suffice with regular keys.


Hardly a shocking interface, and as such 'long clicks' didn't enter the picture 
at any point...

The biggest stumbleblock (and even so) was parsing JSON and sending JSON to a 
server.

Michael.
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] crosscompiling problem (.a file)

[ulrich]

Dne 16.3.2016 v 15:23 Jonas Maebe napsal(a):

ulrich wrote:

In Ming32 I ran the following command:
$ pwd
/c/lazarus16/fpc/3.0.0

$ make crossinstall CPU_TARGET=arm OS_TARGET=linux
CROSSBINDIR=/c/lazarus16/FPC/3.0.0/bin OPT=-dFPC_ARMEL
INSTALL_PREFIX=/c/lazarus16/FPC FPC=/c/lazarus16/FPC/3.0.0/bin/X86_
64-win64/FPC.

The result is:
system.pp (620) Error: Can not create archive file:
\c\lazarus16\fpc\3.0.0\RTL\units\x86_64-win64\libimpsystem.a



I have not installed the cygwin. Running a compilation from mingw terminal.

Rumisek


Don't do this in a Cygwin shell, and remove any Cygwin shells/utilities
from your path before using the FPC/Lazarus makefiles.


Jonas
___
fpc-pascal maillist  -
fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal




___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Mangle name in fpc-FreeBSD ?

[fredvs]

> it would be helpful to see the code fragments in question.
> The declaration of the external functions if any and the code calling
> LoadLibrary() and GetProcAddress(). 

Hello Mark and thanks for help.

Here declaration to load-getprocess:
-
var
  mp4ff_open_read: function(f : p_mp4ff_callback_t) : mp4ff_t; cdecl;
  libpointer : {$IFDEF MSWINDOWS}longword{$ELSE}{$IFDEF
CPU32}longword{$ELSE}PtrInt{$ENDIF}{$ENDIF};
...

libpointer := DynLibs.SafeLoadLibrary(PChar(mp4ff)); -> OK for FreeBSD64
too;-)

 Pointer(mp4ff_open_read) :=
GetProcAddress(hMp4ff, pchar('mp4ff_open_read')); -> Here always =
nil for FreeBSD 64 ;-( (but ok for Linux + Windows)
...
-

Thanks.

Fre;D

PS: I have the same problem for other libraries in FreeBSD 64 ->
GetProcAddress() fail.
PS2: It appends for some libraries in FreeBSD64, not all.




-
Many thanks ;-)
--
View this message in context: 
http://free-pascal-general.1045716.n5.nabble.com/Mangle-name-in-fpc-FreeBSD-tp5724528p5724547.html
Sent from the Free Pascal - General mailing list archive at Nabble.com.
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Smartphone apps in FPC

[Michael Van Canneyt]

On Thu, 17 Mar 2016, Reimar Grabowski wrote:


On Thu, 17 Mar 2016 11:08:01 +0100 (CET)
Michael Van Canneyt  wrote:


- Use the Android SDK, using the JVM compiler.
I have written several articles on how to use the latter approach;
I wrote a real-world app with it.

But you don't own a smart phone and have never heard of 'long click'
like in android.view.View.OnLongClickListener ^^


Yes, this is all correct.

But, I do have an emulator, and plenty of people in the building do have a
smartpone :-)

Amazing, eh ? :)

Michael.
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Smartphone apps in FPC

[Paul Breneman]

I would suggest checking this out:
http://castle-engine.sourceforge.net/engine.php
https://github.com/castle-engine/castle-engine/wiki/Build-Too

Lots of links here:
http://turbocontrol.com/devoptions.htm

___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] How do I test the testfppdf on Windows?

[Michael Van Canneyt]

On Fri, 18 Mar 2016, Graeme Geldenhuys wrote:


On 2016-03-18 10:16, Michael Van Canneyt wrote:

There is already a test added, see my private mail to you from this morning.


Ah, I see it now. Thanks. At the time of my message I was still
kick-starting my brain with my first cup of coffee. ;-)


ps:
 What is FPC's policy on using unittest frameworks? Does it only allow
 FPCUnit based test projects in FCL. The unittest units for fcl-pdf
 are already FPCUnit and FPTest compatible. All that is missing is the
 Console and GUI project files for FPTest support (located in the Wisa
 repository). Adding those two files, if possible, would be greatly
 appreciated.


Please, only fpcunit tests.

Michael.
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] How do I test the testfppdf on Windows?

[Jesus Reyes A.]

En Thu, 17 Mar 2016 21:10:03 -0600, silvioprog   
escribió:


On Tue, Mar 15, 2016 at 4:38 AM, Michael Van Canneyt  
 wrote:

[...]

I have (hopefully) fixed this. rev. 33255.


The crash was fixed after upgrade my FPC. But it still generating five  
empty pages even applying the Jesus Reyes' patch. :-/


--Silvio Clécio


I took a look at the pdf file you posted on march 5. I think I know why  
your file looks so odd, all numeric values non-integers are written in the  
pdf file using COMMA :)


This is an extract of some stream on your file:


/F3 23 Tf
0 0 0 RG
BT
70,87 785,31 TD
(Basic Shapes) Tj
ET
1 0 0 RG
0,21 0,7 0,27 rg
1 J
3 w
85,04 615,23 113,39 56,69 re

An this is how it should look:


/F3 23 Tf
0 0 0 RG
BT
70.87 785.31 TD
(Basic Shapes) Tj
ET
1 0 0 RG
0.21 0.7 0.27 rg
1 J
3 w
85.04 615.23 113.39 56.69 re

so your locale is playing a role here, numeric conversions in the pdf  
library should be made locale agnostic.

try to change your decimalseparator to "." before and try again.

Jesus Reyes A.

--
Usando el cliente de correo de Opera: http://www.opera.com/mail/___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal