Re: [Lazarus] Easiest way to case strings

2009-03-26 Thread Vincent Snijders
2009/3/26, Alexander Klenin kle...@gmail.com: Have a look at: http://www.stack.nl/~marcov/delphilater.txt Thanks, that is interesting discussion. I will post my thoughts on that in a separate mail. On the fpc-pascal mailing list or maybe the fpc-decel mailing list, I presume. Vincent

Re: [Lazarus] Easiest way to case strings

2009-03-26 Thread Hans-Peter Diettrich
Flávio Etrusco schrieb: What is the function of being able to add methods to records? Not much, I agree, given the existence of objects. It would be better to do that instead of introducing 'object' keyword, but that decision was made back in the days of Borland Pascal. Indeed, not

Re: [Lazarus] Easiest way to case strings

2009-03-26 Thread Florian Klaempfl
Marco van de Voort schrieb: And string-case for my feeling belongs in neither. It is just about racking up bullet lists in language wars. Well, there is another important design principle. It is sometimes called orthogonality -- it means that existing language features can be combined in any

Re: [Lazarus] Easiest way to case strings

2009-03-26 Thread Alexander Klenin
On Thu, Mar 26, 2009 at 17:56, Hans-Peter Diettrich drdiettri...@aol.com wrote: Alexander Klenin schrieb: Since string was introduced as built-in scalar type with defined equality, lack of 'case' support can be viewed as a design bug. IMO strings are similarly scalar as are floating point

Re: [Lazarus] Easiest way to case strings

2009-03-26 Thread Alexander Klenin
On Thu, Mar 26, 2009 at 18:59, Marco van de Voort mar...@stack.nl wrote: On Thu, Mar 26, 2009 at 10:28:50AM +1000, Alexander Klenin wrote: What problem does for in really solve? Lack of iterators. No it doesn't IMHO. This is really nice argument ;-) Well, it _should_ solve it. If it does

Re: [Lazarus] Easiest way to case strings

2009-03-26 Thread Martin Friebe
Marco van de Voort wrote: On Thu, Mar 26, 2009 at 10:28:50AM +1000, Alexander Klenin wrote: Since string was introduced as built-in scalar type with defined equality, lack of 'case' support can be viewed as a design bug. I don't see string as a scalar type. It is an array or complex

Re: [Lazarus] Easiest way to case strings

2009-03-26 Thread Reenen Laurie
Getting back to the original question... I implemented it with (as Michael van Canneyt suggested) function wcase(Needle:string;Haystack:array of string):integer; begin Result:=High(HayStack); While (Result=0) and (CompareText(Needle,Haystack[Result])0) do Dec(Result); end; case

Re: [Lazarus] Easiest way to case strings

2009-03-26 Thread Graeme Geldenhuys
On Thu, Mar 26, 2009 at 10:59 AM, Marco van de Voort mar...@stack.nl wrote: What problem does for in really solve? Lack of iterators. No it doesn't IMHO. And I assume that by lack of iterators you mean in-language iterators? Iterators are quite doable with all the base list/container

Re: [Lazarus] Easiest way to case strings

2009-03-26 Thread Graeme Geldenhuys
On Thu, Mar 26, 2009 at 12:29 PM, Alexander Klenin kle...@gmail.com wrote: And I assume that by lack of iterators you mean in-language iterators? Of course. What else? External iterators without the need for implementing descendants. But I must agree, it would really be nice if we can

Re: [Lazarus] Easiest way to case strings

2009-03-26 Thread Marco van de Voort
On Thu, Mar 26, 2009 at 08:29:42PM +1000, Alexander Klenin wrote: Lack of iterators. No it doesn't IMHO. This is really nice argument ;-) Well, it _should_ solve it. If it does not, it must be extended of implemented differently. I definitely do not argue in favor of blindly copying

Re: [Lazarus] Easiest way to case strings

2009-03-26 Thread Marco van de Voort
On Thu, Mar 26, 2009 at 11:06:03AM +, Martin Friebe wrote: Marco van de Voort wrote: Since string was introduced as built-in scalar type with defined equality, lack of 'case' support can be viewed as a design bug. I don't see string as a scalar type. It is an array or complex type

Re: [Lazarus] Easiest way to case strings

2009-03-26 Thread Graeme Geldenhuys
On Thu, Mar 26, 2009 at 2:21 PM, Marco van de Voort mar...@stack.nl wrote: var   i: integer; item: TItem; ... for i := 0 to obj.ItemCount do begin   item := Items[i];   ... item ... item ... end; Minus one btw. And my iterator case is proven. :-) Like I said earlier - one of the

Re: [Lazarus] Easiest way to case strings

2009-03-26 Thread Marc Weustink
Alexander Klenin wrote: 1) Iterating over array property, where and item should be stored in a temporary variable to avoid rereated calls to GetItem method inside the loop iteration: var i: integer; item: TItem; ... for i := 0 to obj.ItemCount do begin item := Items[i]; ... item

Re: [Lazarus] Easiest way to case strings

2009-03-26 Thread Alexander Klenin
On Thu, Mar 26, 2009 at 23:07, Marc Weustink marc.weust...@cuperus.nl wrote: Alexander Klenin wrote: 1) Iterating over array property, where and item should be stored in a   temporary variable   to avoid rereated calls to GetItem method inside the loop iteration: var   i: integer; item:

Re: [Lazarus] Easiest way to case strings

2009-03-26 Thread Graeme Geldenhuys
On Thu, Mar 26, 2009 at 3:33 PM, Alexander Klenin kle...@gmail.com wrote: ... for item in obj.Items do begin   ... item ... item ... end; the latter is safer, simpler and more clear code. ehm, what if I want it reversed ? Reverse iteration might be common enough to warrant a special

Re: [Lazarus] Easiest way to case strings

2009-03-26 Thread Paul Ishenin
Alexander Klenin wrote: Reverse iteration might be common enough to warrant a special syntax, but in general all non-standard iteration orders should fall back to indexing. Then better to extend sintax: using default iterator = delphi compatible FOR s IN list DO WriteLn(s); extended:

Re: [Lazarus] Easiest way to case strings

2009-03-26 Thread Alexander Klenin
On Fri, Mar 27, 2009 at 00:22, Paul Ishenin webpi...@mail.ru wrote: FOR s IN list DO  WriteLn(s); extended: FOR s IN list USING my_reverse_iterator DO  WriteLn(s); In upper case I wrote keywords and in lower case identifiers. I think the extension can be avoided like so: FOR s IN

Re: [Lazarus] Easiest way to case strings

2009-03-26 Thread Richard Ward
On Mar 26, 2009, at 8:22 AM, lazarus-requ...@lazarus.freepascal.org wrote: No, since for all common usage patterns based the IDE codetools creates the pattern for you. - I don't currently use an IDE which performs these types of things. I've just peeked at the Lazarus IDE

Re: [Lazarus] Easiest way to case strings - other proposition

2009-03-26 Thread Dariusz Mazur
HI Sorry, this shuld be new topic on pascal devel list, but on other side this is reply on those post. On Thu, Mar 26, 2009 at 12:29 PM, Alexander Klenin kle...@gmail.com wrote: And I assume that by lack of iterators you mean in-language iterators? Of course. What else?

[Lazarus] About the Trim Spaces Style modes. Which one should be the default mode?

2009-03-26 Thread Sayyid Ibnu Husein Al-'Aththÿffffffffffffffffe2s
With regard to my 0013298report ( http://bugs.freepascal.org/view.php?id=13298#c26380 ), this is my comment about the Trim Spaces Style located in the editor options. In my opinion, the Caret or Edit mode should be the default mode although each mode listed there is reasonable/logical to be

Re: [Lazarus] About the Trim Spaces Style modes. Which one should be the default mode?

2009-03-26 Thread Martin Friebe
Sayyid Ibnu Husein Al-'Aththÿe2s wrote: With regard to my 0013298 http://bugs.freepascal.org/view.php?id=13298#c26380 report ( http://bugs.freepascal..org/view.php?id=13298#c26380 http://bugs.freepascal.org/view.php?id=13298#c26380 ), this is my comment about the Trim

Re: [Lazarus] About the Trim Spaces Style modes. Which one should be the default mode?

2009-03-26 Thread Martin Friebe
Sayyid Ibnu Husein Al-'Aththÿe2s wrote: With regard to my 0013298 http://bugs.freepascal.org/view.php?id=13298#c26380 report ( http://bugs.freepascal..org/view.php?id=13298#c26380 http://bugs.freepascal.org/view.php?id=13298#c26380 ), this is my comment about the Trim

Re: [Lazarus] Mac OS X or iPhone applications created with Lazarus

2009-03-26 Thread Graeme Geldenhuys
On Mon, Mar 23, 2009 at 7:38 PM, Felipe Monteiro de Carvalho felipemonteiro.carva...@gmail.com wrote: No, Lazarus now has an excelent support for Carbon, which uses the native Aqua look from Macs. Here a screenshot of Lazarus running in Mac OS X:

Re: [Lazarus] Mac OS X or iPhone applications created with Lazarus

2009-03-26 Thread dmitry boyarintsev
OK, so that means there is only a Visual Forms Designer for Carbon apps and not for Cocoa apps because LCL-Cocoa doesn't exist yet?  Is this correct? LCL-Cocoa does exists. http://wiki.lazarus.freepascal.org/PasCocoa It's about 2% done, but it exists :) working with OS-X Leopard because

Re: [Lazarus] Easiest way to case strings

2009-03-26 Thread Lord Satan
On Thu, 26 Mar 2009 13:32:10 +0100 Marco van de Voort mar...@stack.nl wrote: If anybody would like to read the article or see the code, it is on a request basis - I may not publicly publish the article. I would like to yes. Containertypes is one of my interests. I am interested, too. It

Re: [Lazarus] Easiest way to case strings

2009-03-26 Thread Marco van de Voort
On Thu, Mar 26, 2009 at 02:41:13PM +0200, Graeme Geldenhuys wrote: ?? i: integer; item: TItem; ... for i := 0 to obj.ItemCount do begin ?? item := Items[i]; ?? ... item ... item ... end; Minus one btw. And my iterator case is proven. :-) Like I said earlier - one of the

[Lazarus] Stored Procedure and Returning Values

2009-03-26 Thread Kamil Walas
Hi, I have stored procedure in FireBird: EXECUTE PROCEDURE ZnajdzKodKreskowy (:Kod, 0, 0, 0, :IleCyfrSprawdzac) RETURNING_VALUES (:Jest, :Zlecenie, :I1, :I2, :I3, :I4, :D, :I5, :S); I was trying to get returning values to lazarus code, but I couldn't. I find out that there is no StoredProcedure

[Lazarus] a bit off topic documentation for Firebird explain plan

2009-03-26 Thread ik
Hello, I'm looking for a documentation about explain plan in Firebird, and I wonder if anyone here knows a good documentation about it, or can point to good examples that explain all of the possibilities and how it works. I read few examples in forums etc... but I think that I'm missing something

Re: [Lazarus] Valladolid Programming Contest simple test fails at compile?

2009-03-26 Thread JoshyFun
Hello Thierry, Thursday, March 26, 2009, 10:16:32 PM, you wrote: TEST PROGRAM TC program Test1; {$MODE OBJFPC} -- Best regards, JoshyFun ___ Lazarus mailing list Lazarus@lazarus.freepascal.org

Re: [Lazarus] Valladolid Programming Contest simple test fails at compile?

2009-03-26 Thread Mehmet Erol Sanliturk
On Thursday 26 March 2009 05:16:32 pm Thierry Coq wrote: TEST PROGRAM program Test1; var i, j : integer; //input data k, l : integer; //interval m: integer; //index maxCycles : integer; //max number of cycles for the interval Cycles: integer; // This function

Re: [Lazarus] Valladolid Programming Contest simple test fails at compile?

2009-03-26 Thread Mehmet Erol Sanliturk
On Thursday 26 March 2009 06:47:45 pm Mehmet Erol Sanliturk wrote: On Thursday 26 March 2009 05:16:32 pm Thierry Coq wrote: TEST PROGRAM program Test1; var i, j : integer; //input data k, l : integer; //interval m: integer; //index maxCycles : integer; //max number

Re: [Lazarus] Easiest way to case strings

2009-03-26 Thread Hans-Peter Diettrich
Graeme Geldenhuys schrieb: HasNext() Returns true if the collection has more items when traversing the collection in the forward direction. This (and the Peek methods) require that the collection is organized strictly sequential, for Previous in

Re: [Lazarus] Easiest way to case strings

2009-03-26 Thread Hans-Peter Diettrich
Alexander Klenin schrieb: Since string was introduced as built-in scalar type with defined equality, lack of 'case' support can be viewed as a design bug. IMO strings are similarly scalar as are floating point numbers, with regards to 'case'. Note that I said with defined equality. The

Re: [Lazarus] About the Trim Spaces Style modes. Which one should be the default mode?

2009-03-26 Thread Sayyid Ibnu Husein Alatas
From: Martin Friebe laza...@mfriebe.de Sent: Friday, March 27, 2009 1:21:27 AM Subject: Re: [Lazarus] About the Trim Spaces Style modes. Which one should be the default mode? Sayyid Ibnu Husein Alatas wrote: ... ... In my opinion, the Caret or Edit mode should