Re: [fpc-pascal] performance when resizing a dynamic array

Graeme Geldenhuys wrote: Martin Schreiber wrote: That happens with every reallocmem() with FPC memory manager so using a getmem() block instead of a dynamic array has no advantage in this Maybe a good old linked list implementation is the best performer then. Back to the Pascal of the 80's

Re: [fpc-pascal] inherited interfaces not seen by queryinterface / supports

On 10/27/2016 06:01 AM, Tony Whyman wrote: That is you can build an object hierarchy to parallel an interface hierarchy. I don't use the "Supports" primitive. - so maybe there is a bug in this feature but otherwise, what is the problem with interface inheritance? Yes, the problem is with

Re: [fpc-pascal] inherited interfaces not seen by queryinterface / supports

On 10/27/2016 05:18 AM, Graeme Geldenhuys wrote: On 2016-10-27 12:42, Marcos Douglas B. Santos wrote: It is a "bug by design". The worst kind! Actually, I think this is should be corrected in both modes (COM and CORBA). Indeed, and even if it is fixed in FPC, it shouldn’t break any

[fpc-pascal] inherited interfaces not seen by queryinterface / supports

Hi all, I am a bit perplexed / disappointed to see that the Supports / QueryInterface functions for interfaces are not behaving the way I would expect them to behave, when using an interface that inherits from another interface. note, _obj_type_ might be TObject, TInterfacedObject, or

Re: [fpc-pascal] 3.1.1 documentation in html on the website?

Michael Van Canneyt wrote: David Emerson wrote: Can the 3.1.1 documentation be viewed as html on the website? where? No. The 3.0.0 version is easy to find... but I'd like to see the one under development It is not under development. I only document released material. I guess I should

[fpc-pascal] 3.1.1 documentation in html on the website?

Can the 3.1.1 documentation be viewed as html on the website? where? The 3.0.0 version is easy to find... but I'd like to see the one under development Thanks! David. ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org

Re: [fpc-pascal] corba interfaces - is/as not working properly

On 09/29/2016 06:06 AM, Sven Barth wrote: Am 29.09.2016 11:34 schrieb "Martin Schreiber" >: On Thursday 29 September 2016 10:49:03 Graeme Geldenhuys wrote: > On 2016-09-29 06:42, Martin Schreiber wrote: > > abcintf:= iabc(abc); > > " > > which

Re: [fpc-pascal] corba interfaces - is/as not working properly

On 09/28/2016 10:42 PM, Martin Schreiber wrote: Corba-style interfaces can use any string as ID so for local interfaces it is possible to use shorter ID-strings for better performance. Is this described anywhere in the documentation? > MSEide constructs such ID's by RightClick-'Insert UID'.

Re: [fpc-pascal] corba interfaces - is/as not working properly

On 09/28/2016 03:31 PM, Graeme Geldenhuys wrote: On 2016-09-28 22:59, David Emerson wrote: Alternately, if I give a GUID does an interface not automatically become COM + managed? No definitely not! The GUID just helps the compiler or RTL identify an Interface. Oh fabulous! Thanks much. I

[fpc-pascal] corba interfaces - is/as not working properly

Hi all, I'm testing out CORBA interfaces before changing all my code to use them (I would prefer not to have managed types for interfaces). However I am running into a glitch. Testing "if (my_object is i_some_interface)" is always returning true, even when the object does not implement the

Re: [fpc-pascal] changes to include file do not trigger recompilation of unit

On 09/09/2016 01:03 AM, Graeme Geldenhuys wrote: On 2016-09-08 22:57, David Emerson wrote: I'm wondering if anyone else has run into it, and if there might be a workaround. Yes, it has been happening here for years. No workaround that I know of, except to do a Build All after you make changes

[fpc-pascal] changes to include file do not trigger recompilation of unit

Hi all, a couple days ago I filed this: http://mantis.freepascal.org/view.php?id=30569 In a particular situation (common in my project), making changes to an include file does not trigger recompilation of the unit(s) where it is included. I'm wondering if anyone else has run into it, and if

Re: [fpc-pascal] Does MACRO work in this case?

On 09/08/2016 10:08 AM, silvioprog wrote: Hello, Looking an alternative to solve the problem I've talked at this topic , I've tried to solve it declaring a macro named "TIStringComparer.Ordinal": Macros can only replace

Re: [fpc-pascal] reference-counted function results not initialized to nil

Philosophical arguments aside, I filed a bug against the documentation, since one thing is clear-- that I and others were previously misled into believing something that is not true. http://mantis.freepascal.org/view.php?id=30321 In the report, I included several references where the

Re: [fpc-pascal] which "managed" result types require extra work?

On 06/26/2016 10:51 PM, Jonas Maebe wrote: > PS: there is an intrinsic that can help you in this process: the > "default" intrinsic. Default(TSomeType) returns an instance of a > particular type completely initialised to "empty" (0 for ordinal and > floating point types, empty for strings, nil

Re: [fpc-pascal] which "managed" result types require extra work?

Addendum - what about a return value which is a class that implements an interface? ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

[fpc-pascal] which "managed" result types require extra work?

Okay, making a new thread here, to ask one question: Which types do we need to initialize to null/nil/zero/'' when they are a function result? - dynamic arrays - ansistring - unicodestring - string, with {$H+} (but not string[length]) - records containing any of them - anything else??? I

Re: [fpc-pascal] reference-counted function results not initialized to nil

On 06/24/2016 08:19 PM, Michalis Kamburelis wrote: After upgrading fpc 2.6.4 -> 3.0.0, I'm seeing a bug where (as noted in subject) reference-counted function results are not being initialized to nil. They were never guaranteed to be initialized to nil. Reference-counted types (unlike other

[fpc-pascal] reference-counted function results not initialized to nil

Hi all, After upgrading fpc 2.6.4 -> 3.0.0, I'm seeing a bug where (as noted in subject) reference-counted function results are not being initialized to nil. Is this a known bug? I am seeing it in ansistrings and also dynamic arrays. Here is an example program to see it with ansistrings:

Re: [fpc-pascal] default parameter single = NaN

On 06/20/2016 02:53 PM, Martin wrote: On 20/06/2016 22:45, David Emerson wrote: I found a workaround, which is to use Infinity as the default value, instead of NaN. It's acceptable for my use, though a little awkward. there is another workaround. Do not repeat the default value

Re: [fpc-pascal] default parameter single = NaN

On 06/20/2016 02:43 PM, Jonas Maebe wrote: On 20/06/16 22:59, David Emerson wrote: Error: function header doesn't match the previous declaration for a (non-method) function that does exactly match its previous declaration: function make_scale_matrix (zx:single; zy:single=NaN):t_2d_affine

Re: [fpc-pascal] default parameter single = NaN

I found a workaround, which is to use Infinity as the default value, instead of NaN. It's acceptable for my use, though a little awkward. ~David ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org

[fpc-pascal] default parameter single = NaN

Hey all, After installing fpc 3.0.0, I'm getting an... Error: function header doesn't match the previous declaration for a (non-method) function that does exactly match its previous declaration: function make_scale_matrix (zx:single; zy:single=NaN):t_2d_affine; I use "NaN" extensively to

Re: [fpc-pascal] interface inheritance implementation

On 10/12/2015 03:13 AM, Graeme Geldenhuys wrote: t_multiplier_and_adder = class (tbase, i_adder, i_multiplier) Thanks for this recommendation-- the problem is that I have a list whose elements are each i_multiplier_and_adder, and I want to be able to take an element of that list and have the

[fpc-pascal] interface inheritance implementation

Not sure what subject line to use to summarize what I'm trying to do here, but that is kind of related :) So I would like to use an interface that inherits from another interface, and ... well rather than describe what I'm trying to do, I think code speaks best. type // here is the first

[fpc-pascal] detect implementation / interface sections

I tried sending this message two days ago, but it seems not to have gone through. Trying again. I like using include files, to break up big units into multiple files, and also as macro-based templates. One thing I do frequently is to put both the interface and the implementation into one

Re: [fpc-pascal] question with interfaces, hooks

Thanks, Graeme and Sven! On 07/14/2015 11:05 PM, Sven Barth wrote: Not related to your problem, but important nevertheless: you don't need to free interface variables. They are reference counted and freed automatically at least if you don't mix a class reference (in your case to t_foo_base) and

[fpc-pascal] question with interfaces, hooks

Hi list! I'm just starting in with interfaces, and am happy to see there is something similar to multiple inheritence available. But it seems to be limited in a way I will show below, so I am wondering if there is something I am missing. Example code says it best... program test_interfaces;

[fpc-pascal] record helpers how they effect records

using a simple record, e.g. some_record_type = record a, b : longint; end; If I declare a record helper, does this change the record in any way? i.e. does the record take any more space when passed as a function parameter? Does it become somehow like an object, and need to be allocated?

[fpc-pascal] valgrind: invalid read

Hi all, I have just started using valgrind, and I was surprised that I got a lot of errors, particularly in places that look like clean code. So I whittled things down and created a test program. Here is the error I am seeing (I've removed the procid, ==11180==): Invalid read of size 16

[fpc-pascal] aggpas examples

I am trying to compile some of the aggpas examples included with lazarus, but I am getting errors upon errors. I have also tried compiling examples against the aggpas sources as downloaded from the aggpas website, outside lazarus, and again, errors and more errors. Is there a recommended

Re: [fpc-pascal] aggpas examples

I have also tried compiling examples against the aggpas sources as downloaded from the aggpas website, outside lazarus, and again, errors and more errors. Start by naming one error. Thanks very much for your encouragement Matthias! I managed to resolve everything by moving the $include

Re: [fpc-pascal] math round vs banker's round

Thanks for the suggestions, guys! José Mejuto wrote: SimpleRoundTo I think. But I want an integer result, and this returns a floating point. Sven Barth wrote: Take a look at SetRoundMode in unit Math: http://www.freepascal.org/docs-html/rtl/math/setroundmode.html After calling

[fpc-pascal] math round vs banker's round

Hi all, I have just discovered that the system.round function has this very odd behavior of rounding towards an even number when the fractional part is .5 -- in the system.round documentation this is described as banker's rounding I do not like this behavior. How can I use a more

[fpc-pascal] bootstrapping from svn

Well, I decided to make another attempt at running from the svn fixes_2_6 branch The first problem I encountered was that I could not compile from fpc 2.4.4. It sure would be nice if a compatible ppc386 executable was included in the repository, so I wouldn't have to go download it from

[fpc-pascal] debian control files for fpc

I'd like to roll my own fpc-2.4.4 .deb for in-house development The lazarus sources seem to include a debian directory with all the control files, which is wonderful! Where can I find debian control files for fpc? Thanks, David ___ fpc-pascal

Re: [fpc-pascal] debian control files for fpc

Where can I find debian control files for fpc? In the fpcbuild svn repository: http://svn.freepascal.org/svn/fpcbuild/trunk/install/debian/ Vincent Thanks much!! I wish it worked :( I copied all the debian control files from the 2.4.4 release:

Re: [fpc-pascal] alias a function + overload 'in'

Thank you, Tomas, those are all excellent suggestions! I am glad I asked. On Sun 18 Dec 2011, Tomas Hajny wrote: On 17 Dec 11, at 21:07, David Emerson wrote: two little questions 1. Is it possible to make an alias to a function ... so rather than just re-calling with the same

Re: [fpc-pascal] alias a function + overload 'in'

On Sun 18 Dec 2011, Jürgen Hestermann wrote: David Emerson schrieb: 2. is it possible to overload the 'in' operator, so that it may work (using supplied code) on things that are not a pascal set? I do not know whether it is possible but I hate such overloading. An operator defined

Re: [fpc-pascal] News from MSEide+MSEgui

Congratulations, Martin! Keep up the good work. (is that your own custom-built git gui?) On Mon 12 Dec 2011, Martin Schreiber wrote: Hi, MSEide+MSEgui 2.8rc1 for FPC 2.6 has been released: http://sourceforge.net/projects/mseide-msegui/files/mseide-msegui/2.8rc1/ There is also a new

Re: [fpc-pascal] debian control files for fpc

I solved this problem by downloading the sources from debian, which apparently have a different directory structure layout. ~D. On Sun 18 Dec 2011, David Emerson wrote: Where can I find debian control files for fpc? In the fpcbuild svn repository: http://svn.freepascal.org/svn

[fpc-pascal] alias a function + overload 'in'

two little questions 1. Is it possible to make an alias to a function ... so rather than just re-calling with the same parameters, it's actually the same thing? like the way we can do, e.g., type natural = cardinal, or const GG = 6, but with a function? 2. is it possible to overload the 'in'

Re: [fpc-pascal] Reading and writing char

On Wed 5 Oct 2011, Thomas Young wrote: Hi, I'm trying to read and write ascii characters using FPC. I had no problems doing this years ago with Think Pascal Code Warrior. For some reason I'm not able to read and write ascii characters above ascii 127 with FPC. Can someone explain this

Re: [fpc-pascal] freetype unit + unicode

On Thu 6 Oct 2011, michael.vancann...@wisa.be wrote: On Wed, 5 Oct 2011, David Emerson wrote: On Tue 4 Oct 2011, michael.vancann...@wisa.be wrote: If you need some UTF8 extensions to the freetype unit, feel free to make some suggestions, and we'll see what we can do. I copied a few UTF8

Re: [fpc-pascal] freetype unit + unicode

On Tue 4 Oct 2011, michael.vancann...@wisa.be wrote: If you need some UTF8 extensions to the freetype unit, feel free to make some suggestions, and we'll see what we can do. When the unit was made, unicode support was a thing of the distant future. (a future which of course crept up on us

Re: [fpc-pascal] freetype unit + unicode

On Mon 3 Oct 2011, Graeme Geldenhuys wrote: On 03/10/2011 21:51, David Emerson wrote: I am using the freetype unit (with linux) and would like to display some interesting unicode characters. However when I pass a string containing say U+2265 to GetStringGray, it doesn't display

Re: [fpc-pascal] freetype unit + unicode

What freetype API function are you calling? Not sure if it applies to freetype, but with Xft (as implemented and used in fpGUI), there are various versions of the same API. You need to call the correct one based on the encoding type of you text. freetype.GetStringGray I've tried

Re: [fpc-pascal] freetype unit + unicode

On Tue 4 Oct 2011, michael.vancann...@wisa.be wrote: Is there some secret, hidden documentation for fpc's freetype unit? (and so many other units?) :P No. But you are in luck: this is open source, and the Lazarus IDE lets you jump and look around in the FPC code very easily :-) If

[fpc-pascal] freetype unit + unicode

I am using the freetype unit (with linux) and would like to display some interesting unicode characters. However when I pass a string containing say U+2265 to GetStringGray, it doesn't display the unicode character at all; it shows 3 other characters in its place. What to do? btw I'm still

Re: [fpc-pascal] AnsiString

Luis Fernando Del Aguila Mejía wrote: The documentation (http://www.freepascal.org/docs-html/prog/progsu146.html#x189-1990008.2.7) says: -8 Longint current string with size. -4 Longint with reference count. But, when I want access to that structure, I have to do it backwards.

Re: [fpc-pascal] constant records as default parameters

AFAIK default parameters can only be simple types, not complex types like records. Well... it certainly appears to be so... Although, I did get the following program using a default class parameter to compile and run. Kinda defeats the purpose (low overhead). I'll stick with two simple

Re: [fpc-pascal] commutative operators

On Wed 29 Dec 2010, Jetcheng Chu wrote: I think you need to make sure that `a' and `b' are in the same algebraic system before making the commutativity of the operator meaningful. You know, that makes a lot of sense. I should have thought about it that way before asking. Thanks. ~David.

[fpc-pascal] constant records as default parameters

I'd like to use a constant record as a default parameter. Is there some way to do this? Here's my use case: type lt_ints = record left, top : longint; end; const lt_zero : lt_ints = (left:0; top:0); procedure do_something (const offset_lt : lt_ints = lt_zero); The procedure

Re: [fpc-pascal] commutative operators

Mark Morgan Lloyd wrote: Can I have a reality check on this please: in this context is the overloaded := effectively an implicit cast as well as an explicit operator? looks like. Below is some sample code which illustrates the fact. Is the availability of overloaded + and := operators

[fpc-pascal] commutative operators

suppose I define an operator: operator + (a: one_type; b: another_type) : one_type; Is there any way to specify that it should be commutative, so I don't have to additionally define the reverse: operator + (a: another_type; b: one_type) : one_type; Thanks ~David.

Re: [fpc-pascal] commutative operators

On Wed 29 Dec 2010, Honza wrote: 2010/12/29 David Emerson dle...@angelbase.com: suppose I define an operator: operator + (a: one_type; b: another_type) : one_type; Is there any way to specify that it should be commutative, so I don't have to additionally define the reverse

Re: [fpc-pascal] generics class hierarchy

On Sat 18 Dec 2010, Honza wrote: 2010/12/19 David Emerson dle...@angelbase.com: type  generic gt_box_t_point,_num = class (_t_point)   // FAILS :-( f_width, f_height : _num; end; I think it should fail according to the docs, see: http://www.freepascal.org/docs-html/ref/refse42

Re: [fpc-pascal] generics class hierarchy

@David: Maybe you can restructure your class hierarchy to something like this (you'll need to be a bit creative here ^^): heh, no, my solution is to abandon generics :-) I used a find/replace script to make alternate classes with real values. Thanks for all your input, though. Thanks to you,

Re: [fpc-pascal] generics class hierarchy

Would you please state your FPC version the next time? (If you have stated I, but I haven't seen it: I'm sorry) Some problems might be fixed in the development version while they aren't in the latest release. I tried with both 2.4.2 and 2.5.1 (fetched via svn and compiled. Took me quite

Re: [fpc-pascal] generics class hierarchy

Sven Barth wrote: I've now looked at your example code in more detail (I was working the last time I wrote you). Where did you define _t_point? I only found a t_point in your second mail. _t_point is part of the template list. I guess it's a limitation. Conceptually it doesn't seem that

[fpc-pascal] generics class hierarchy

Hi all, How can I use inheritance with generics? e.g. type generic gt_point_num = class ... end; generic gt_box_tpoint,_num = class (_tpoint) ... end; The above gives me an error; I've tried some other variations but haven't yet found anything that works Thanks, David

Re: [fpc-pascal] generics class hierarchy

I'll give a little more detail... Right now I have these non-generic types: t_point = class f_left, f_top : longint; // so named for descendents // several fields and methods to manage it as I need end; t_box = class (t_point) f_width, f_height : longint; // more fields and methods

Re: [fpc-pascal] generics class hierarchy

Well, I'm guessing generics aren't really ready to be fully used... I'm getting an error There is no method in an ancestor class to be overridden where the ancestor class was a specialized generic. Doesn't seem very promising for actual use. So I'm abandoning generics for now. Hopefully

Re: [fpc-pascal] generics class hierarchy

err... my mistake. the error message was referring to a different problem, which I was blind to in my hurry. Sorry for all the messages. I'll shut up now. :) On Thu 16 Dec 2010, David Emerson wrote: Well, I'm guessing generics aren't really ready to be fully used... I'm getting an error

[fpc-pascal] crash in tobject.free

Hi all, I'm encountering a consistent crash, and I'm not sure how to address the problem. using: - laz 0.9.28.2-8 beta, svn 22277, from debian testing -- a rather outdated one, because at this point upgrading lazarus requires updating debian - fpc 2.4.0-2 [2010/02/20] for i386 - fpgui commit

Re: [fpc-pascal] crash in tobject.free

Thanks Matthias, FreeAndNil solved my problem! I was assuming that calling Free would also nil out the variable holding the reference to the object, but obviously it does not. Cheers, David On Thu 9 Dec 2010, Matthias Klumpp wrote: Hi! On Thu, 9 Dec 2010 11:42:20 -0800, David Emerson dle

Re: [fpc-pascal] methods of an object to create others objects

Wouldn't it be nice if we had a try..except..finally statement supported in FPC. All-in-one. We do: it is called try try try try // ... except // ... finally // ... Okay, so maybe that's slightly nonstandard, but I'd rather use this awkwardness than add an even more awkward extra

Re: [fpc-pascal] linking name issue

Try deleting testunit.o and/or testunit.a, testunit.ppu ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Crosscompile FPC from Win32 to Linux

Andreas Berger wrote: I have a stable cgi program running in windows (no libraries - simple writeln). However, our web host is in linux. Is there a simple way for me to cross-compile the app? I haven't ever cross-compiled anything, but here's a start... Looking here:

Re: [fpc-pascal] PChar AnsiString

This is not correct. Many strings are simply referenced several times. May I ask in which typical cases? In an earlier version of our database (before we had things properly typed) many things were stored as strings. Thus a common ansistring may have had a reference count in the

Re: [fpc-pascal] {SOLVED} casting back a pointer to original type

OK, I lurred myself by taking words too literally. I thought virtual meant unimplemented, to be implemented in sub-classes. unimplemented = abstract virtual method type something = class procedure do_something; virtual; abstract; end; ___

Re: [fpc-pascal] flexible record design

Spir wrote: I need the simplest and most efficient version, because the type I'm now designing will be the elementary building block of a rather big system. If you design your class hierarchy well, it ought to be possible to switch the base later on. Personally, I reinvented the wheel by

Re: [fpc-pascal] casting back a pointer to original type

element := C(list[index]); // casting back text := element.text; I cannot do that, even if elements all are *indirect* instances of C, because this calls C.text instead of the element's own proper text method. If you use virtual methods then C.text should call the descendant's

Re: [fpc-pascal] casting back a pointer to original type

On Sat 29 May 2010, spir ☣ wrote: I cannot do that. C0 (and all classes) instances need a text method. I also cannot have 2 methods (one static, one virtual) with different names. So make a virtual method called text. Don't use a static method at all. In my example I was trying to demonstrate

Re: [fpc-pascal] question about class

I'm no expert so these answers may be a bit off, but I figure any help is nice during US business hours... Are there somewhere more or less pedagogic examples of class code? I've never found any. I've learned largely by studying (and occasionally fixing) fpgui code. *self* Do i need to

Re: [fpc-pascal] identifier scope problem

On Mon 3 May 2010, leledumbo wrote: In the code above, equals will refer to tobject.equals instead of equals defined in the unit. How can I refer to that one instead? I'm unable to reproduce your error. Real code that I could actually compile and run would make this a lot easier. That said,

Re: [fpc-pascal] IDE and programming woes

First, a descriptive subject header is much appreciated. As for your IDE troubles, I don't know how many people actually use that old FreeVision-based IDE... many of us use either Lazarus or some other more modern editor. Is there some reason you can't or don't want to try Lazarus? Tirdly,

Re: [fpc-pascal] dynamic array contents and system.move

Jürgen Hestermann wrote: Although I would have expected that special procedures exist to insert and remove array elements so that there is no need to do such things manually ... These must be written on a case-by-case basis, for each type of array element. Perhaps I'll tackle this someday as

Re: [fpc-pascal] dynamic array contents and system.move

Jürgen Hestermann wrote: Where are the usage, internals and purpose of dyn. arrays documented? I dunno. But I find them incredibly useful. they have some quirks, and over the years I've been using dynarrays, I've documented these on my own computer -- I even have a dynamic array test program

Re: [fpc-pascal] Question about Deleting elements in Dynamic Array

Vincent Snijders wrote: Bihar Anwar schreef: I've tried to use Move() instead of Copy(). Any objection with the following code? Yes, at first glance without much thinking, I don't think it is safe. Did you think through the consequences of copying reference counted types (ansistring in

Re: [fpc-pascal] State of FPC docs.rant

On Mon 26 Apr 2010, Graeme Geldenhuys wrote: Florian Klaempfl het geskryf: No git mirror ;)? I think the docs are one of the fpc related repositories where using a dvcs might be useful. Apparently I am banned for life mentioning the product that may not be named in FPC or Lazarus

Re: [fpc-pascal] dynamic array contents and system.move

Florian Klaempfl wrote: If you mess with move and have no clue about internals, then you get burned. Period. Proper dyn. array code uses copy(...) instead of move. I wish there was a type-checked equivalent to what move does. copy creates a new array, and I don't want to do that: I already

[fpc-pascal] dynamic array contents and system.move

I have a class that has a field, f_data : array of byte; // a dynamic array Within a method of this class (which takes as a parameter src, another instance of the class) I have the following code: move (src.f_data, self.f_data, length(self.f_data) * sizeof(byte)); It appears that this move

Re: [fpc-pascal] dynamic array contents and system.move

cobines wrote: David Emerson wrote: move (src.f_data, self.f_data, length(self.f_data) * sizeof(byte)); I think it should be: SetLength(self.f_data, length(src.f_data)); move (src.f_data[0], self.f_data[0], length(self.f_data) * sizeof(byte)); Well, the setlength is not necessary

Re: [fpc-pascal] dynamic array contents and system.move

: David Emerson wrote: move (src.f_data, self.f_data, length(self.f_data) * sizeof(byte)); I think it should be: SetLength(self.f_data, length(src.f_data)); move (src.f_data[0], self.f_data[0], length(self.f_data) * sizeof(byte)); No he

Re: [fpc-pascal] constructor as procvar

Mar 2010, David Emerson wrote: Florian Klaempfl wrote: Constructor procvars are indeed not supported but the way to achieve what you want is to use class type variables t_mammal_class = class of t_mammal; function find_or_create_animal (color : byte; pass_mammal_type

Re: [fpc-pascal] constructor as procvar

Tobject.classtype returns TClass (class of TObject) which I first assumed would work great. However I cannot seem to do a type conversion from TClass to t_mammal_class (class of t_mammal)! So I am stuck here. well, I got this working, not sure why I had so much trouble with a simple type

[fpc-pascal] constructor as procvar

I'd like to pass a constructor as a procvar. Don't know if this is possible. Here is some silly illustrative code that doesn't work: {$mode objfpc} uses classes, sysutils; type t_mammal = class public constructor create (color : byte); virtual; end; t_pig = class (t_mammal)

Re: [fpc-pascal] constructor as procvar

Florian Klaempfl wrote: Constructor procvars are indeed not supported but the way to achieve what you want is to use class type variables t_mammal_class = class of t_mammal;   function find_or_create_animal (color : byte;     pass_mammal_type : t_mammal_class) : t_mammal;  

Re: [fpc-pascal] error on compilation

On Tue 16 Mar 2010, leledumbo wrote: How do you install fpc? Do you instal the rtl as well? Yes, you definitely need the rtl. Nowadays I install everything, as required by lazarus. In the past I used to install the barebones minimum, which if I recall correctly was the compiler and the rtl,

Re: [fpc-pascal] fpGUI Toolkit v0.7-rc1 for FPC 2.4

On Tue 16 Mar 2010, Schindler Karl-Michael wrote: Hi has there been already been work on a carbon backend of fpGUI? Michael The best place to ask about this is on the fpgui newsgroups, which are hosted by opensoft.homeip.net Discussions took place in the fpgui.support group in 2008 (June

Re: [fpc-pascal] some new features to delphi prisem

On Sat 20 Feb 2010, Jürgen Hestermann wrote: y := case Other of bla : 'hello'; foo : 'bye'; baz : 'adius'; end; What do you gain with this? Doesn't look much different to case Other of bla : y := 'hello'; foo : y := 'bye'; baz : y :=

Re: [fpc-pascal] Pointers

On Thu 11 Feb 2010, Rainer Stratmann wrote: How can I have access to position 4 of a pointer? var p : pbyte; c : char; s : ansistring; x : longint; s := 'Hello'; p := @s; x := 4; // 4th position c := [p+x]^ ??? how to get access to the 'o' c := (p+x)^; // why would

Re: [fpc-pascal] Unsolicited messages

Jonas Maebe wrote: Of course, this remedy will only work for a short while, since nothing prevents the spammers to set up similar new domains... I don't know a real remedy against this sort of stuff, unless some people start setting up blacklists for these things too and we get a way to

Re: [fpc-pascal] Hardware information: Linux and Windows

in linux... just google list hardware linux. Below are some results. Probably not all of them will be available, but you should be able to work with whatever is available on your machine. lshal lshw lspci lsusb lsscsi systool fdisk -l dmidecode cat /proc/cpuinfo cat /proc/meminfo dmesg | egrep

Re: [fpc-pascal] FPC class syntax was extended to support delphi code

Thank you for this message! This stuff sounds really cool. In particular, I have been itching for class constants. A few questions come to mind: a. 'var' sections -- I assume that 'var' is optional when declaring fields that occur first (i.e. directly after private, public, etc) b. What does

Re: [fpc-pascal] FPC class syntax was extended to support delphi code

Doug Chamberlin wrote: Class methods allow you to call the method without instantiating the class first. For example, Result := TMyClass.MyClassFunction; Oh, that is so cool! I suppose that probably means that class methods can only reference class variables/methods/properties. Cheers, David

Re: [fpc-pascal] [OT] which editor - emacs?

It took me a couple years to take that plunge (of course a couple years ago Lazarus was not as robust as it is today) but I will never go back! Lazarus does have the distinct disadvantage that it's cumbersome to work on multiple projects at once. Especially, e.g., if I want to test some

Re: [fpc-pascal] Debugger for the fpc available?

I used fpc for a while before starting to use Lazarus. Of course back then, lazarus was not as stable as it is now... Now that I have gotten accustomed to using lazarus, I will never go back! Lazarus is a wonderful tool. I believe it relies upon the gnu debugger (gdb) although I am not at all

Re: [fpc-pascal] array [boolean] and typecasting fail

On Fri 23 Oct 2009, ik wrote: The use of 'array[boolean]' does not mean that the array is true or false, but rather '0..1'. You indicate a range, not a boolean behavior. Well, pascal is a typed language, so while I do realize that the information is stored as false=0 and true=1, and that's

  1   2   >