Re: [fpc-pascal] unit

2008-03-17 Thread Tomas Hajny
On Sat, March 15, 2008 12:58, Marco van de Voort wrote: Why I can't to run unit - programa say: 'Illegal unit name' I try Fps 0.9.6and 0.6.4 program versions. Units are not runnable, FPC versions before 1.0 are from the 1900s. Maybe you mean the version of something else? If on Linux, your

[fpc-pascal] RE: fpc-pascal Digest, Vol 43, Issue 21

2008-03-17 Thread Crause, Christo (JC)
From: Codebue Fabio - P-Soft [EMAIL PROTECTED] I learn about all your tips... but nothing todo. I try to summarize I'm using firebird 2.0.3 in windows vista environment. pudf was compiled with fpc 2.0.4 and created with lazarus 0.9.22 Did you upgrade or installed a newer version of

Re: [fpc-pascal] How to initialize a Text variable?

2008-03-17 Thread Tomas Hajny
On Sun, March 16, 2008 12:14, Felipe Monteiro de Carvalho wrote: On Sun, Mar 16, 2008 at 8:16 AM, Michael Van Canneyt [EMAIL PROTECTED] wrote: Assign yyoutput to a dummy stream, which simply skips output. Could you explain better how can this be implemented? The only think I know about

RE: [fpc-pascal] How to initialize a Text variable?

2008-03-17 Thread Sam Liddicott
Find the definition of the text type and see that it contains pointers to read and write functions. They need replacing in yor instance to pointers to functions that do nothing. The original Pascal file access is object oriented after all! Sam -Original Message- From: Tomas Hajny

Re: [fpc-pascal] Looking for a increment time function

2008-03-17 Thread Graeme Geldenhuys
On 17/03/2008, ik [EMAIL PROTECTED] wrote: sorry dateutils.pp Idiot me, I also never thought that TDateTime's time portion is milliseconds from midnight. I could have calculated 30 minutes in milliseconds and keep adding that to the time portion of TDateTime. But IncMinute() is so much easier!

Re: [fpc-pascal] Looking for a increment time function

2008-03-17 Thread ik
Yes, look at dates.pp :) Ido On Mon, Mar 17, 2008 at 11:43 AM, Graeme Geldenhuys [EMAIL PROTECTED] wrote: Hi, Does FPC contain a increment time function? Something like IncMonth(). I know I can use DocodeDate/EncodeDate, but that seems such an inefficient way of doing it. Basically

Re: [fpc-pascal] Looking for a increment time function

2008-03-17 Thread Rainer Stratmann
Hello Graeme, may be this is interisting for you... ger_timeoutreset - resets the timer ger_timeoutget_usec - gets µsec's after resetting regards Rainer var global_gertv:timeval; global_gertvold:timeval; const secusec:=100; procedure ger_timeoutreset; begin

Re: [fpc-pascal] Firebird UDF

2008-03-17 Thread zaher dirkey
May be you UDF depend on external library try to View Dependency. On Sat, Mar 15, 2008 at 4:05 PM, Stephano [EMAIL PROTECTED] wrote: nothing todo... ok restart: library pudf; {$mode objfpc}{$H+} uses Classes, p_func in 'p_func.pas'; exports pround name 'p_round';

Re: [fpc-pascal] Looking for a increment time function

2008-03-17 Thread Rainer Stratmann
+ var global_timezone:timezone; Am Montag, 17. März 2008 10:54 schrieb Graeme Geldenhuys: On 17/03/2008, ik [EMAIL PROTECTED] wrote: sorry dateutils.pp Idiot me, I also never thought that TDateTime's time portion is milliseconds from midnight. I could have calculated 30 minutes in

Re: [fpc-pascal] Looking for a increment time function

2008-03-17 Thread ik
sorry dateutils.pp On Mon, Mar 17, 2008 at 11:45 AM, ik [EMAIL PROTECTED] wrote: Yes, look at dates.pp :) Ido On Mon, Mar 17, 2008 at 11:43 AM, Graeme Geldenhuys [EMAIL PROTECTED] wrote: Hi, Does FPC contain a increment time function? Something like IncMonth(). I know

[fpc-pascal] Looking for a increment time function

2008-03-17 Thread Graeme Geldenhuys
Hi, Does FPC contain a increment time function? Something like IncMonth(). I know I can use DocodeDate/EncodeDate, but that seems such an inefficient way of doing it. Basically I want to increment the time by 15 or 30 minutes to populate rows in a grid. Regards, - Graeme -

[fpc-pascal] unit system;  procedure move();

2008-03-17 Thread fpc
Hi I need more informations about the move() procedure  form unit system. I want to shift an array (values:array[0..Maximum-1] of single) like the following lines: for i:=Maximum-1 downto 1 do values[i]:=values[i-1]; values[0]:=sameothervalue; I found the move procedure (unit system) and wrote

Re: [fpc-pascal] unit system;  procedure move ();

2008-03-17 Thread Jonas Maebe
On 17 Mar 2008, at 12:34, [EMAIL PROTECTED] wrote: I need more informations about the move() procedure form unit system. I want to shift an array (values:array[0..Maximum-1] of single) like the following lines: for i:=Maximum-1 downto 1 do values[i]:=values[i-1];

[fpc-pascal] transparent windows on X11

2008-03-17 Thread Graeme Geldenhuys
Hi, Anybody know how to use Xlib API to create transparent windows? This is for use with fpGUI Toolkit. For example. I have a Label component (which is actually a mini window) and have to always specify and paint a background color. If I don't, I see all kinds of rubbish as the background. I

Re: [fpc-pascal] transparent windows on X11

2008-03-17 Thread Eduardo Morras
At 15:17 17/03/2008, you wrote: Hi, Anybody know how to use Xlib API to create transparent windows? This is for use with fpGUI Toolkit. For example. I have a Label component (which is actually a mini window) and have to always specify and paint a background color. If I don't, I see all kinds

Re: [fpc-pascal] transparent windows on X11

2008-03-17 Thread ik
Copy paste from : http://www.faqs.org/faqs/x-faq/part7/ Subject: 175) How do I create a transparent window? A completely transparent window is easy to get -- use an InputOnly window. In order to create a window which is *mostly* transparent, you have several choices: -

Re: [fpc-pascal] unit system;  procedure move();

2008-03-17 Thread Pete Cervasio
On Monday 17 March 2008 06:40:51 Jonas Maebe wrote: On 17 Mar 2008, at 12:34, [EMAIL PROTECTED] wrote: Is the use of the move procedure right? The array length is Maximum-1. When I put this length on value[1], the last entry value[Maximum-1] would be deleted or would be shifted in an