Re: [lazarus] ColorToRGB in console app
Graeme Geldenhuys wrote: On 11/02/2008, Giuliano Colla [EMAIL PROTECTED] wrote: Our Linux based company servers have KDE running 24/7, so that unskilled people can check daily backups, and do other minor things, clicking on a few dedicated icons on the desktop. No problem whatsoever. Uptime depends only on kernel updates. We run a Windows 2003 server and Ubuntu 6.06 LTS (Linux) server side by side. The Linux server has no GUI. All maintenance on the Linux server is done via scripts and works beautifully. I'm thinking of rewriting some of those scripts into a single maintenance application using FPC's console GUI framework (that Turbo Pascal look - I can't remember the name now). The Linux server does about four times the work compared to the Windows server, and it's uptime is also way higher (as in months). Start-up time is also impressive. The Windows server takes about 5-7 minutes to boot - Linux is up in 30 seconds (and it's a slower machine). The latter drives the windows administrators nuts! :-) Based on our company servers I think non-GUI servers kick ass. but now I'm way off-topic again Regards, - Graeme - Hi Graeme, I don't doubt anything you have said, but you are mistaking the difference between windows and *nix for the difference between gui and non-gui. I ran HP-UX servers for years without any problems, despite always having the CDE GUI environment available. cheers, John _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] sqldb query parameter properties not loaded?
Joost van der Sluis wrote:
Op donderdag 24-01-2008 om 20:56 uur [tijdzone +1100], schreef John:
Joost van der Sluis wrote:
Op donderdag 24-01-2008 om 00:09 uur [tijdzone +1100], schreef John:
Snip
It does, in so far as the parameter specs are now retained, but now the
database property of sqlquery is not read, so it still can't work
properly. In fact, I can't even set the database from the Lazarus
object inspector.
Huh? Are you sure? Did you recompile everything correclty?
You won't often catch me saying Yes I am *sure* I compiled everything
correctly ! I think I did, though.
Quick test is to add a new writeln, see if it is triggered. If so you
have rebuild it properly.
This is my version of set database:
It doesn't contain a call to Inherited.SetDatabase. I think that that is
your problem now.
procedure TCustomSQLQuery.SetDatabase(Value : TDatabase);
var db : tsqlconnection;
begin
if (Database Value) then
begin
{$IFDEF DBDEBUG}
if dbdbgOn then
Writeln(dbdbg, 'TCustomSQLQuery.database is being set to ',
Value.DatabaseName, '.');
{$ENDIF}
if assigned(value) and not (Value is TSQLConnection) then
DatabaseErrorFmt(SErrNotASQLConnection,[value.Name],self);
Add ' inherited setdatabase(value);'
if not (csLoading in ComponentState) then
begin
UnPrepare;
if assigned(FCursor) then
TSQLConnection(DataBase).DeAllocateCursorHandle(FCursor);
db := TSQLConnection(Value);
if assigned(value) and (Transaction = nil) and
(Assigned(db.Transaction)) then
transaction := Db.Transaction;
{$IFDEF DBDEBUG}
if dbdbgOn then
Writeln(dbdbg, 'Calling TCustomSQLQuery.OnChangeSQL because ',
'TCustomSQLQuery.database has been set to ',
Value.DatabaseName, '.');
{$ENDIF}
OnChangeSQL(Self);
end;
end;
end;
Joost
YES! It works!
I was tempted to write down the details of my adventures and why it took
so long to get to this point, but I guess that will just bore everyone.
Suffice to say that most were about learning to use the SVN environment,
and not much to do with the above problem. I think I may have achieved
a functioning SVN environment now.
So now I have the parameter query opening when the form opens, and also
have a master/client link between two sqlqueries, without requiring
code. (Previously I always seemed to need an 'AfterScroll' handler to
get it to work).
I will see what further trouble I can get into.
Thanks,
John Sunderland
_
To unsubscribe: mail [EMAIL PROTECTED] with
unsubscribe as the Subject
archives at http://www.lazarus.freepascal.org/mailarchives
Re[2]: [lazarus] Analog Twebrowser in delphi?
-Original Message- From: Graeme Geldenhuys [EMAIL PROTECTED] To: lazarus@miraclec.com Date: Mon, 4 Feb 2008 10:33:47 +0200 Subject: Re: [lazarus] Analog Twebrowser in delphi? On 03/02/2008, John Johnson [EMAIL PROTECTED] wrote: How can I implement an html page into my lazarus app?? I need a component like TWebBrowser in delphi? I think the lNet package includes a basic html viewer component. I also think the TurboPower iPro (lazarus/componens/turbopower_ipro/) package contains a basic html viewer. I believe the latter one is used for the Lazarus lhelp application (CHM help viewer). Regards, - Graeme - ___ fpGUI - a cross-platform Free Pascal GUI toolkit http://opensoft.homeip.net/fpgui/ _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives Hi. Yeah, I found some lhelp examples in Lazarus dir. But I cannot understand how it's work! Could you give me some instructions how I can show an html page in my app? _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: Re: Re[2]: [lazarus] Analog Twebrowser in delphi?
Hmm, I should try it! Thanks for advise... _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] DataBase Queries
el stamatakos wrote: Hi, I am working with a database and I am doing the following tFile:string; tFileName:=mainForm.SQLQuery1.FieldValues['tFileName']; where tFileName is in a database and is a string. I keep getting a EVariant error on this line. Is there any way to force mainForm.SQLQuery1.FieldValues['tFileName'] to return a string or at least be less restrictive so as to run with a warning. Any ways around this would be very helful. Thanks Lefti Hi Lefti, Is the first declaration meant to be tFileNAME: String ? If not, what is tFileName ? I presume you have a field called tFileName ? ps. You nay have a good reason for the names tFileName and tFile, but it seems to me you are asking for confusion, because they look so much like types. TFileName was a type (string[80} ?) somewhere back in the borland pascal or early Delphi days, I don't know if it is still defined. cheers, John Sunderland _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] Analog Twebrowser in delphi?
How can I implement an html page into my lazarus app?? I need a component like TWebBrowser in delphi? _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Wider use case for gamepack ?
A.J., Don't worry about Beelzebub's negative comments, I've already noted that your gamepack has a valid place and that I have plans for using it exclusively in one of my projects. Who cares if it doesn't meet someone's expectations of what they want from a package that maximizes OpenGL-whatnots and GPU-excelerometebobs? It meets your expectations, and I've said it meets mine (exceeds it, actually), and I'm sure it will do so for others as well. -- _| () |-| |\| _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] nice blog article: Why I use (object) Pascal
Might be of interest to both mailing lists. He plugs FPC and Lazarus, and it's nicely written. CodeGear of course makes an appearance in the comments (which are a fun read :) http://www.screamingduck.com/Article.php?ArticleID=43Show=ABCE -- _| () |-| |\| _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] Form icon in lazarus
Hello! I'm using fpc 2.3.1 with Lazarus 0.9.25 beta on Windows XP. When I insert a picture into property icon of form1, my app displays it not correctly (sometimes I can see icon of form1 and in the taskbar and sometimes not!)! But in Delphi this always works perfect. Help me please to fix this bug! _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] may I get a demo?
On Jan 31, 2008 2:18 AM, Tanuwijaya [EMAIL PROTECTED] wrote: Hi, I just join this list several days ago, because someone on Delphindo mention about this. Welcome to the list, and Lazarus! I really want to know the performance of this lazarus, may be there is someone here willing to give me a little application demo which compile to run on linux? It comes with lots of demos and examples (the IDE itself is a great example of a commercial quality Lazarus program). I want to port my application to run on linux, and seems this lazarus is the shortest path can be taken. Take a look at http://wiki.lazarus.freepascal.org/Lazarus_For_Delphi_Users Lazarus is supposed to be similar to Delphi, but not an exact clone. Some things written for Delphi will compile with Lazarus, but most things will need some changes. When you're ready to convert your code to Lazarus, take a look at http://wiki.lazarus.freepascal.org/Code_Conversion_Guide _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Wider use case for gamepack ?
On Jan 30, 2008 1:00 AM, A.J. Venter [EMAIL PROTECTED] wrote: [...] Anyway, I think I explained now what makes it special in depth. Either the dev's will think it's cool, or they won't. I won't feel bad if they don't - it's their prerogative, but at least let it be judged fairly. Well, *I* think it's very cool. In fact, when I get back around to my life-long pet project (a chess engine extraordinaire :) this will be the first library I look at for the board UI. _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Wider use case for gamepack ?
On Jan 30, 2008 9:05 AM, A.J. Venter [EMAIL PROTECTED] wrote: 2) THIS is the tricky one so I would like some advice on how I should do it. TDoubleBuffer needs to have OnKeyDown,OnKeyUp and OnKeypressed events. Being a TCustomControl descendent, it doesn't have them - TControl does - but it doesn't have a paint handler. ... The other way I can think of is to just code the keyboardEvents in, by copying and pasting from one of the components that do have it - that seems like clutter though - code duplication is never a good idea right. How about a middle ground: create a new TKeyboardEvents unit using code from one of the components that already has it. Yes you will have the initial code duplication in creating the unit in the first place, but this would allow adding keyboard events to other controls simply by inheriting from the base class. In fact, this may be something that the LCL could use and incorporate itself in the future, if you get it working property. _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] why do delphi users hate lazarus so much?
On Jan 29, 2008 2:57 AM, A.J. Venter [EMAIL PROTECTED] wrote: [snipping well thoughtout, highly interesting background] I run a highly successful business (profitable in it's first year - almost unheard of) using lazarus Wow, this is a great success story! I hope you don't mind, but I've added your project to the wiki of 3rd-party projects developed with Lazarus (feel free to edit it): http://wiki.lazarus.freepascal.org/Projects_using_Lazarus#OutKafe Maybe you could add a screenshot or two here: http://wiki.lazarus.freepascal.org/Lazarus_Application_Gallery _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] TDbf + TDataModule
milan wrote: Vincent Snijders wrote / napísal(a): milan schreef: Hello, Does TDbf work with TDataModule ? (in generally). Yes. Vincent So I have new project with Form1 and DataModule1. Inside Form1 is DbGrid1 and inside DataModule1 is Datasource1 and Dbf1. What's the DataSource property of DbGrid1? The property field is blank, without possibilities. Everything I wrote inside is invalid parameter. I thought that is DataModule1.Datasource1. Thanks. You cannot set data aware components to use datasources from datamodules at design time the way you can in Delphi (yet). Yes, I know, really big pain for those used to using Delphi that way, which includes me. I understand you can do it at run time (in code), but I haven't tried. This is a well known bit of Lazarus that still needs to be done. One of my dreams is to learn enough about FPC/Lazarus to fix this (but it is just a dream at this stage). One of my other dreams is that someone else will beat me to it. cheers, John Sunderland _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Nokia acquires Trolltech
On Jan 28, 2008 2:05 AM, willem [EMAIL PROTECTED] wrote: Trolltech gets acquired by Nokia. The key motivation of Nokia is CrossPlatform development. That also a kyey interest of Lazarus. So I think the Qt interface is becoming more important in the future. Regards Wim Well, it's not quite official yet. 90% of shareholders still have to approve the deal and only 66% have so far, and it has to get regulatory approval as well. But it looks like it's just a formality at this point, and they say it will be completed some time in the second quarter. As for the cross-platform motivation, this is probably true but not because of the desktop platforms. I believe Nokia is much more interested in Qtopia (the embedded version of Qt). Now, as to what this means for Qt's future, I don't know. Remember what happened to BeOS when it was acquired by Palm? I have a gut feeling that Nokia is not so interested in the open source side of things regardless of what they may say in press releases, and will try to close that aspect up as soon as it can. As I recall, Trolltech only made Qt open source very reluctantly and only after much pressure from linux open-source advocates. The Windows GPL version is still pretty restrictive. I now expect the current version of Qt to be the last GPL'd version, although a fork seems likely at this point which will probably be lead by the KDE team. _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Nokia acquires Trolltech
On Jan 28, 2008 5:25 AM, Ales Katona [EMAIL PROTECTED] wrote: Qt4 cannot be closed. Development can be stopped from the Trolltech/Nokia side, but the GPL v4 which was released will remain. Moreover, the foundation has rights to continue Qt development should Trolltech be bought. Right, this is what I meant by a fork (although that might not be the right word), and this is what I think will happen. I don't doubt that the KDE/Qt foundation that was formed some time ago will make sure that the current version of Qt continues to be developed so that KDE will live on. However, I doubt very seriously that Qt in its current GPL form will continue to be developed by Trolltech. I may be wrong, but I don't believe for a minute that Nokia is going to want to be developing software for their phones and proprietary platforms that has to be released under the GPL, and they will close that hole very quickly. _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] why do delphi users hate lazarus so much?
On Jan 28, 2008 11:48 AM, Warren Postma [EMAIL PROTECTED] wrote: My reason for complaining about Lazarus, and calling it unusable, is that it suffers from worse usability defects (for what I want to use it for) than even the worst-ever versions of Delphi such as Delphi 2005. And these are...? I notice you didn't say bugs. Are you talking about design flaws or bug? And if they are bugs, have you reported them? If Lazarus could be as useful to me as Delphi 7, I would change my opinion from nice little toy, to amazing open source platform pretty quickly. In what ways is not as useful as D7? I find it much more usable, myself. It's not that I hate Lazarus. I am deeply disappointed with it. In what ways? Please be specific. All the whiners who stopped buying from CodeGear because of low quality, seem to have no problem with the low quality and the missing basic features of Lazarus that Delphi has had since Delphi 3.0. Which are...? You still can't install packages in Lazarus because the underlying FPC compiler lacks a runtime package system that could support a more delphi-like designtime/runtime packages installation system. Which by the way is the worst part of Delphi. Everyone complains about Delphi component installation headaches. Wait, I'm confused. You complain about not being able to install packages in Lazarus (which isn't true, BTW, it's just different than Delphi), but then you say that's the worst part about Delphi. So which is it? If Lazarus develops ANY package support whatsoever, I'll contribute and help make it better. They have, and you haven't. I think what you mean is dynamic package loading. Why is that a make-or-break feature? You *can* still use packages. In fact, because they aren't dynamically loaded, it doesn't break the debugger (which happens on Delphi all the time). Cross platform matters to me. So I'm not like most of the lazarus haters. I'm not a hater at all. But I am a critic. Vague criticism without details is simply hate draped in deceptive clothing. _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] Why do Delphi users hate Lazarus so much?
Well, I guess the term Delphi users is a little broad, but it seems that every post that mentions Lazarus on borland.public.delphi.non-technical gets BLASTED by Delphi fanboys. I mean, it's really amazing to see the outright hostility towards a free software package that might very well save Pascal as a language in the future (since it sure seems that CodeGear and Borland are heading down the drain pretty fast these days). Some of these guys even start entire threads with subjects like Quit talking about Lazarus here or If you think you need cross-platform you don't need Delphi or some other nonsense. Why do they hate Lazarus so much?? As a (former) Delphi user, I just can't understand this. Delphi 7 was the last version I purchased -- which was some 6 or 7 years ago -- and I refused to purchase a newer version because they refused to fix a very serious bug in D7* (here's a link to one of my complaints about it on the newsgroup, where I describe it in more detail than I care to here: http://tinyurl.com/2ws5gw ). Of course, they *claimed* it was fixed -- in fact, the QS bug listing showed it as closed and fixed because it was fixed in D8. Well it may have been fixed in D8, but I didn't buy D8, I bought D7. They really expected us to pay for an upgrade to get this bug-fix! That was the last straw for me, and I swore I'd never purchase another Delphi product. Anyway, the point I'm trying to make is that I see Lazarus as salvation for the Delphi community, not something to be reviled and hated. So what if it's not as polished as Delphi! At least the FPC and Lazarus teams respond to bug reports!! And if it's something I really need fixed, I can always do it myself because it's open source. I just hope the Lazarus community isn't discouraged by those negative comments. -- John [*] It was actually two bugs. The main one was integer math optimization. But when they fixed that bug they broke Cardinal multiplication. So I had a choice, to use optimized integer math and making sure I didn't use any Cardinals, or not worry about the Cardinals and stick with un-optimized integer math. In my opinion, this was completely unacceptable, since I was developing a simulation package that made heavy use of both Cardinals and integer math, and it needed to be optimized. _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Why do Delphi users hate Lazarus so much?
On Jan 27, 2008 7:05 AM, [EMAIL PROTECTED] wrote: BTW: the cardinal mul/div overflow bug still exists in Delphi 2007 ;-) Wow, that's weird! They fixed it in the 7.1 update, but that update broke the integer optimization, which in my opinion was just as serious a bug. I guess they re-broke the overflow bug in a later fix! Whew, I'm glad I got out of that terrible loop. _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] sqldb query parameter properties not loaded?
Joost van der Sluis wrote:
Op donderdag 24-01-2008 om 00:09 uur [tijdzone +1100], schreef John:
Snip
It does, in so far as the parameter specs are now retained, but now the
database property of sqlquery is not read, so it still can't work
properly. In fact, I can't even set the database from the Lazarus
object inspector.
Huh? Are you sure? Did you recompile everything correclty?
You won't often catch me saying Yes I am *sure* I compiled everything
correctly ! I think I did, though.
This is my version of set database:
procedure TCustomSQLQuery.SetDatabase(Value : TDatabase);
var db : tsqlconnection;
begin
if (Database Value) then
begin
{$IFDEF DBDEBUG}
if dbdbgOn then
Writeln(dbdbg, 'TCustomSQLQuery.database is being set to ',
Value.DatabaseName, '.');
{$ENDIF}
if assigned(value) and not (Value is TSQLConnection) then
DatabaseErrorFmt(SErrNotASQLConnection,[value.Name],self);
if not (csLoading in ComponentState) then
begin
UnPrepare;
if assigned(FCursor) then
TSQLConnection(DataBase).DeAllocateCursorHandle(FCursor);
db := TSQLConnection(Value);
if assigned(value) and (Transaction = nil) and
(Assigned(db.Transaction)) then
transaction := Db.Transaction;
{$IFDEF DBDEBUG}
if dbdbgOn then
Writeln(dbdbg, 'Calling TCustomSQLQuery.OnChangeSQL because ',
'TCustomSQLQuery.database has been set to ',
Value.DatabaseName, '.');
{$ENDIF}
OnChangeSQL(Self);
end;
end;
end;
The bits in the {$IFDEF DBDEBUG} are what I have been using to trace the
execution. (Just tracing is not helpful, as I can't read the
properties, so I can't tell where I am). According to this, SetDatabase
gets called once only, from inside DoFixupReferences. At this point the
component state indeed includes csLoading, so db never gets assigned.
(I have also checked this with breakpoints). This makes sense according
to my (limited) understanding of the loader, which is that if a property
that is being loaded is a class, it is always pushed into the fixups
list, not set at the time.
Caveats:
I am rather behind in my svn version, 9468, compared to the one you
generated the diff for. Once I started adding the debug lines, I was
reticent to update and have them all wiped out. Also, I have had to add
the diff in manually, as I am not sure about applying a diff to my
working copy.
I will take just the 'if not (csLoading in ComponentState) then begin'
(and 'end') out and see if I get the original behaviour again.
cheers,
John Sunderland
_
To unsubscribe: mail [EMAIL PROTECTED] with
unsubscribe as the Subject
archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] TSpinEdit problem (maybe a bug?)
I have only tested this on Windows XP with 0.9.24 (fpc 2.2.0), so I
don't know if it affects the other widget sets (gtk1/2, qt, etc) or
not, or if it's even really a bug and not just standard (but bizarre)
behavior. Here's the scenario. When manually editing a tspinedit
control (i.e., by clicking in the edit box and typing in a value,
instead of simply clicking on the up/down buttons or using the up/down
arrow keys to change the value), it is possible to enter a value
outside the min/max range of the control. BUT, and this is the weird
part, the TSpinEdit.Value field is still constrained by the min/max
settings and now holds the correct min or max value, however the edit
box itself is not updated properly to reflect this and still shows the
invalid value.
This is probably a bug, and if so I will report it. But read on to see
the exact description of the problem and tell me if it's really a bug
or if it's supposed to behave this way. I hope it's a bug, because in
my current project I've got several TSpinEdit controls that I need the
user to be able to manually edit in addition to using the spin
buttons, but I still need to enforce the constraints and have the user
see that the constraint is enforced.
To demonstrate what I'm talking about, create a new project with an
empty form and place a single TSpinEdit control on it, with
SpinEdit1Change as the callback for the OnChange event. The procedure
should only contain one statement:
ShowMessage('SpinEdit1.Value = ' + IntToStr(SpinEdit1.Value));
This will pop up a message box showing the value of the control
whenever the OnChange event is triggered.
Now, when the program is compiled and run, click in the edit box,
place the cursor in front of the 0 and type a 1 (to manually input
a value of 10). The message box will pop up saying SpinEdit1.Value =
10. Now click in the edit box again, place the cursor at the front of
the 10 and type a - (a negative or minus sign). The message box
will respond with SpinEdit1.Value = 0, since the bounds are by
default 0 to 100. This means that the constraints kicked in and
prevented the control from having a value of -10 and instead limited
it to 0. However, the edit box will still display -10. You can move
focus away from the form and then return to it, minimize and restore
it, and if there are more controls on the form you can move focus to
them and away from the spin edit, but the control will still show
-10. So how can you tell it's Value field is really 0? Click on
the up button (or press the up arrow). The message box will now say
SpinEdit1.Value = 1, and the control will now correctly display 1.
The complete unit1.pas file to demonstrate the above example is:
begin unit1.pas
unit Unit1;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils, LResources, Forms, Spin;
type
{ TForm1 }
TForm1 = class(TForm)
SpinEdit1: TSpinEdit;
procedure SpinEdit1Change(Sender: TObject);
private
{ private declarations }
public
{ public declarations }
end;
var
Form1: TForm1;
implementation
{ TForm1 }
procedure TForm1.SpinEdit1Change(Sender: TObject);
begin
ShowMessage('SpinEdit1.Value = ' + IntToStr(SpinEdit1.Value));
end;
initialization
{$I unit1.lrs}
end.
end unit1.pas
_
To unsubscribe: mail [EMAIL PROTECTED] with
unsubscribe as the Subject
archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] sqldb query parameter properties not loaded?
Joost van der Sluis wrote: Op woensdag 23-01-2008 om 10:28 uur [tijdzone +1100], schreef John: John wrote: Hi, Environment: win32, Lazarus SVN 13347, fpc SVN 9468 In Lazarus, I have a simple query that uses a parameter: select * from test_cld where code = :code; I am defining it at design time using the object inspector. I set the property parameters to ftString and ptInput, save everything, and close the form, and open it again. If I view the lfm source, it get: Params = item DataType = ftString Name = 'code' ParamType = ptInput end as expected, but in the object inspector, the datatype and Paramtype are back to ftUnknown and ptUnknown. Further, even if I fix them and run the app, I get an error 'unknown field type for parameter code', which implies that the same thing is happening. (With the correct values in the parameter I can open the query at design time). I can't find any reference to this in mantis - has anyone else had the problem ? I posted this about a month ago. After much tracing, adding debug lines, (and general chasing of wild geese,) it appears to me that the following is happening: (So far so good) At the end of TReader.ReadData for the form, DoFixupReferences is called. This sets the database to which the SQLQuery is attached by calling TCustomSQLQuery.SetDatabase, which: Calls TCustomSQLQuery.OnChangeSQL, which: Calls Fparams.ParseSQL(FSQL.Text,True, ,psInterbase) However, the second parameter, true tells Fparams.ParseSQL to DoCreate, which means dropping all the existing parameters and recreating them from the sql text. This means that the param field type is lost, as the new parameters are created with ftUnknown. Can you try if the attached patch fixes this? It does, in so far as the parameter specs are now retained, but now the database property of sqlquery is not read, so it still can't work properly. In fact, I can't even set the database from the Lazarus object inspector. (Note also that the parameters are always created as psinterbase type params. I am not sure if this causes a problem, as it may be overwritten somewhere, but it looks strange as there is a 'case' in ParseSQL to cover the different types of parameter styles.) That's no problem, since the parameter style is only used to re-write the query in a format which the db-engine understands. The call to ParseSQL in OnChangeSQL doesn't use this result from the ParseSQL function. (The code is runned, though. So there is room for a optimization here) Joost. If OnChangeSql doesn't care what sort of database it is connecting to, why is it necessary to call OnChangeSQL to from SetDatabase even though the sqltext hasn't changed ? Would it be sufficient to just unprepare it ? I guess not, you still want some of the other effects of running OnChangeSQL. I wondered about putting the contents of OnChangeSQL into another (private) function, and passing it a parameter as to whether the SQL had really changed (= DoCreate must be true) or not. Then OnChangeSQL could call NewFunction(True) and SetDatabase could call NewFunction(false), and NewFunction would pass the parameter into DoCreate when it called Fparams.ParseSQL. In this case, does SetDatabase really need the call to Fparams.ParseSQL ? Thanks, John Sunderland _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [fpc-pascal] Re: FCL-DB/SQLDB docs started
Chris Kirkpatrick wrote: Hi John, Joost and Adrian - snip So I should very much like to collaborate with you guys in improving the documentation of sqldb and fc-db, as well as the stuff in the LCL. I agree we should try to use the FPDoc approach as suggested by Joost. snip _ I agree with FPDoc in principle, but I haven't been able to get any sort of handle on how it works. And I HAVE downloaded the documentation for it and tried to read it. It was a while ago, but my memory is that, like most IT documentation, it assumes you know basically what you are trying to do, and just need to be reminded of the details. I am also confused about the difference/connection between fpdoc, lazdoc and lazde (have I even got the names right ? I think there have been others mentioned as well on this list). I'll try to have another read. :-) cheers, John Sunderland _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] sqldb query parameter properties not loaded?
John wrote: Hi, Environment: win32, Lazarus SVN 13347, fpc SVN 9468 In Lazarus, I have a simple query that uses a parameter: select * from test_cld where code = :code; I am defining it at design time using the object inspector. I set the property parameters to ftString and ptInput, save everything, and close the form, and open it again. If I view the lfm source, it get: Params = item DataType = ftString Name = 'code' ParamType = ptInput end as expected, but in the object inspector, the datatype and Paramtype are back to ftUnknown and ptUnknown. Further, even if I fix them and run the app, I get an error 'unknown field type for parameter code', which implies that the same thing is happening. (With the correct values in the parameter I can open the query at design time). I can't find any reference to this in mantis - has anyone else had the problem ? I posted this about a month ago. After much tracing, adding debug lines, (and general chasing of wild geese,) it appears to me that the following is happening: TReader.ReadData is called for the form. It reads the form components, eventually getting to SQLQuery, and reads the SQL.strings property. At this point, FParams.ParseSQL is called, which reads the SQL text and creates the parameters. The parameter properties are then read, and properties of matching parameters are set (So far so good) At the end of TReader.ReadData for the form, DoFixupReferences is called. This sets the database to which the SQLQuery is attached by calling TCustomSQLQuery.SetDatabase, which: Calls TCustomSQLQuery.OnChangeSQL, which: Calls Fparams.ParseSQL(FSQL.Text,True, ,psInterbase) However, the second parameter, true tells Fparams.ParseSQL to DoCreate, which means dropping all the existing parameters and recreating them from the sql text. This means that the param field type is lost, as the new parameters are created with ftUnknown. (Note also that the parameters are always created as psinterbase type params. I am not sure if this causes a problem, as it may be overwritten somewhere, but it looks strange as there is a 'case' in ParseSQL to cover the different types of parameter styles.) All this is likely to not be a problem if the sql and parameters are set at runtime, as one would typically set the database link before the sql text and parameters. I was originally trying to set up a parent/child link at design time. I have not put this in mantis yet, I thought someone might like to check my analysis - this is my first venture into the component loading code, and I may be on the wrong track entirely. cheers, John Sunderland _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] SVN
Stephano wrote: Paul Ishenin wrote: I suppose you have the same problem as me. I cannot access mantis website as well. I am using free proxy servers to access them. This is due to some router problem of idefix server. I have no problem accessing mantis. The problem is only with Lazarus FPC svn. I can access other svn sites. I know how to access webpages through proxy servers, but how do you do it for svn? I don't know about SVN, but with TortoiseSVN open the settings panel and go to the network item, and there is a sheet to fill in just like browser settings. Works for me via a squid proxy cache. (But not necessarily at the moment, I haven't updated for a few weeks). cheers, John Sunderland _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] Weird context-menu popup in WinCE
Hi, I had 4 menu-items on a wince-application under the RIGHT-side menu-button. After I inserted a 5th one between number 3 and 4, the now 5th menu-item didn't work anymore. Its onclickcode didn't no longer get fired. Instead, a wince context-menu (a sort of New... submenu) with items like Appointment, Contact, Message etc pops up above the LEFT-side menu-button... I added a sixth item, that worked OK. I deleted the fifth item, so that the sixth item became the fifth item. And there was that WinCE context-menu again! Circumvented the problem by setting the 5th item to Invisible. Could not find anything in the bugtracker about it, but I'm too new on WinCE to be sure it's a bug. Is it? Using Lazarus 0.9.24 John _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] Howto connect an Onclick-event to an existing procedure?
Hi all, I have several TUpDown buttons created at runtime. I have a general event for the onclick: procedure UpDownClick(Sender:TObject; Button:TUDBtnType) begin ... DoMyStuff; ... end; Now at runtime I like to connect the updown.Onclick to this procedure: With MyUpdown do begin Parent:= ... Top := ... Left := ... OnClick := UpDownClick; end; But the last assignment gives me an error: Wrong number of parameters specified This works ok in Delphi. How to connect at runtime? I don't know parameters at designtime... I am using 0.9.24 and target is WinCE tia! John _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Howto connect an Onclick-event to an existing procedure?
Like a charm! Thank you both! kind regards, John _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] New icon for lazarus
wile64 wrote: I propose a new icon for lazarus, It can be used for whatever you want :) (I have svg source) In principle it is fine, but it just looks like a grey blob on my screen. What colour background are you designing your icons against ? I have just a traditional mid grey, default on win32. While most of your icons look very good, quite a few lack contrast. Example - the toggle form/unit button isn't very clear, yet in its depressed state, it is fine. Also, using a paw print as an icon is fine (the current cheetah on the column is also completely unintelligible unless you know what it is), but if you replace ALL the cheetahs with paw prints every one will forget what it means. The new splash screen is fine as a watermark, and could be used as such in many places, but at least on the splash screen I think you should keep the cheetah on the column (on top of your background). It is nice and cheeky, and really is a good graphical statement of purpose. cheers, John Sunderland _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] debugging - tracing into .inc files
Mattias Gaertner wrote: On Wed, 19 Dec 2007 11:28:09 +1100 John [EMAIL PROTECTED] wrote: Using gdb from the lazarus (recent SVN) IDE: I have fpc compiled (from SVN) with the OPT='-gl' switch, and I can trace into .pas .pp source in fpc units OK, but it doesn't find .inc files. The file something.inc was not found, do you want to find it yourself ?. If I do, it then traces into it. Sometimes if a .inc file is already open in the editor, it is found, but I think not always. snip Can you create a feature request in the bug tracker? # 0010448 For the time being, the only solution is: you must search the FPC file yourself and add it to the debug path. Mattias cheers, John Sunderland _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] sqldb query parameter properties not loaded?
Hi, Environment: win32, Lazarus SVN 13347, fpc SVN 9468 In Lazarus, I have a simple query that uses a parameter: select * from test_cld where code = :code; I am defining it at design time using the object inspector. I set the property parameters to ftString and ptInput, save everything, and close the form, and open it again. If I view the lfm source, it get: Params = item DataType = ftString Name = 'code' ParamType = ptInput end as expected, but in the object inspector, the datatype and Paramtype are back to ftUnknown and ptUnknown. Further, even if I fix them and run the app, I get an error 'unknown field type for parameter code', which implies that the same thing is happening. (With the correct values in the parameter I can open the query at design time). I can't find any reference to this in mantis - has anyone else had the problem ? thanks, John Sunderland _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] vote for bdd related component icon
wile64 wrote: If I count *3 votes for tdatasource.png **4 votes for tdatasource1.png **6 votes for tdatasource2.png* I propose a test with discs -- Laurent. My Components: http://wiki.lazarus.freepascal.org/Wile64 French Forum : http://lazforum-fr.tuxfamily.org/index.php I don't mind which you use as a dataset base, but the database / dataset / datasource relationship really needs to be maintained. If you use the disks as a database, perhaps you could have a section of the disks coloured ( for example ) red to indicate a dataset, ie a selection of the database. (No arrows). You could add the text to show specific dataset types, as is done currently. You then have the same thing with the arrows (but not the text) to show a datasource. Does that make sense ? I can try to draw it if you like, but I am no graphic designer. To use one of the suggested icons as a dataset and another as a datasource would not keep the relationship at all - they would look like alternative ways of performing the same function cheers, John Sunderland. _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] MySQL Queries using Lazarus
ik wrote: One small note, you have an SQL injection at your code. I recommend you to use parameters as how to add the values, but prior to that, you should check to see if there are invalid chars, and trim them. That way, you can avoid a lot of problems. Ido Perhaps you should explain what is so terrible about a SQL injection ? I have heard of this before, but not the reason. I do this regularly and it seems to work fine! I am hesitant to recommend parameters in this situation currently. It depends on whether you form everything at run time, in which they are probably OK, or try to set it up in Lazarus at design time. I have had problems with parameters set up at design time. (I am still trying to work out exactly what the issue is, or I would have posted something about it, but basically they seem to loose their type specifications. Of course, I might simply be doing something wrong !). If Lefti is just writing his first few queries, what he is doing is probably a good way to get the hang of it. cheers, John Sunderland _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] vote for bdd related component icon
wile64 wrote: Hi all, Please vote for the image of your choice Thanks, -- Laurent. Datasource1 2 are nice icons, but for me the central 'drum' object suggests a whole database, not a dataset. TDataSource connects to a dataset, not a database. That is presumably why Delphi created the icon they use - they use the table glyph (as in the TTable icon) to represent the dataset, and added the arrows to it to show the datasource connection. What have you used for a dataset base icon ? Datasource should show a connection to that. If you haven't made a new dataset base icon yet, you should probably make that first. (Pardon me if it has already floated past the list, there have been so MANY done recently it is hard to keep up! It really has brightened up Lazarus, great work!) cheers, John Sunderland _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] MySQL Queries using Lazarus
Hi Lefti,
Opening and closing the query causes the query to be re-parsed and
prepared. IF you change the sql text, there is no way round this. At
the very least, prepare has to be called, and opening a query does not
do a lot more than calling prepare. From what I can see in the code, to
prepare a query, you have to un-prepare the previous one, and that fails
unless the query is closed.
By the way, when you start a new topic, you are setting a new subject,
but still replying to a previous topic. Any threaded mail client still
sees it as a reply to a previous topic, and makes a real mess of a
threaded view! According to my email, this is still part of a
discussion that started with [lazarus] Patch for Forms in Forms or
MDI Could you send a new message, not a reply, with a new subject ?
cheers,
John Sunderland
el stamatakos wrote:
Hi All,
I have an application that connects to a MySQl database. I have found the only way to
get Lazrus to work without giving me an error Cannot access Active DataSet is
to do a Clear,Add, Open Close, like below
MainForm.SQLQuery1.SQL.Clear;
MainForm.SQLQuery1.SQL.Add('SELECT revID from rev WHERE
revName='+#39+CBProcessRev.Text+#39);
MainForm.SQLQuery1.Open;
if MainForm.SQLQuery1.SQL.Text'' then
if MainForm.SQLQuery1.RecordCount0 then
revID:=MainForm.SQLQuery1.FieldValues['revID'];
// showmessage(IntToStr(revID));
MainForm.SQLQuery1.Close;
MainForm.SQLQuery1.SQL.Clear;
MainForm.SQLQuery1.SQL.Add('SELECT * from flow WHERE
processID='+IntToStr(ProcessID)+
' AND '+IntToStr(revID)+'='+IntToStr(revID));
MainForm.SQLQuery1.Open;
if MainForm.SQLQuery1.SQL.Text'' then
while Not MainForm.SQLQuery1.EOF do begin
CBProcessFlow.Items.Add(MainForm.SQLQuery1.FieldValues['flowName']);
MainForm.SQLQuery1.Next;
end;
MainForm.SQLQuery1.Close;
My Question is why do I have to close and re open is there a better way of
doing this. Thanks
Lefti
_
To unsubscribe: mail [EMAIL PROTECTED] with
unsubscribe as the Subject
archives at http://www.lazarus.freepascal.org/mailarchives
_
To unsubscribe: mail [EMAIL PROTECTED] with
unsubscribe as the Subject
archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] FPC unit in Lazarus
SteveG wrote: Steps to use FPC svn build within Lazarus (Windows) 1 - Have a current Lazarus working binary installed (requires access to GNU utilitys within the c:\lazarus\fpc\?.?.?\bin\i386-win32 folder) 2 - Set system Path to include c:\lazarus\fpc\?.?.?\bin\i386-win32 3 - Download SVN copy from FPC (http://svn.freepascal.org/svn/fpc/trunk) - save to local folder (eg. c:\FPC) 4 - Build FPC - cd \FPC - make clean all - cd compiler - make cycle - cd .. - make install INSTALL_PREFIX=c:\directory\of\your\choice (eg. c:\pp) - run c:\pp\fpmkcfg.exe (to create fpc.cfg) just to be pedantic, fpcmkcfg.exe (note first c in fpcmkcfg) Isn't it in the bin\target subdirectory under the INSTALL_PREFIX dir ? you can run fpcmkcfg.exe -d basepath=c:\directory\of\your\choice, so you shouldn't have to do 5. Wouldn't the basepath usually be the grandparent dir of the one in which fpcmkcfg lives ? In which case, this would be a useful switch to add to fpcmkcfg ? 5 - edit c:\pp\fpc.cfg to incorporate pathings - all non-commented lines beginning with '-Fu' and '-FD' for example '-Fu/units/$FPCTARGET/' - -'Fuc:\pp\/units/$FPCTARGET/' 6 - within Lazarus / Enviroment / Environment options compiler path= c:\pp\fpc.exe FPC source directory = c:\FPC (as suits your SVN download) make install also makes a copy of the source under the compiler directory, in this case c:\pp. Is one preferable to the other ? Make path = c:\lazarus\fpc\?.?.?\bin\i386-win32\make.exe 7 - Do FULL clean and build of Lazarus NOTES - I believe these steps worked for me, but needs testing. Are the GNU utilitys available seperately as a group/package, or a list of necessary files available ? (this would change Steps 1 2 6) Good Question - I've been meaning to ask this too.. Is it possible to have the fpmkcfg.exe program create the pathing within the cfg file (saves editing) - or did I do something wrong here ? (this would eliminate Step 5 completely) see above If somebody(s) could help / verify all of this, I will add it to the wiki. cheers, John Sunderland _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] ShellApi available in Lazarus?
el stamatakos wrote: Hi John Would this work undre Linux? el stamatakos wrote: Hi All, is the ShellApi available in Lazarus? When I add it into my uses ShellApi it comes back with an error cannot find unit ShellApi. See if what you want is in the windows unit. cheers, John I wouldn't think so, it is mainly wrappers for the windows functions and supporting definitions. I thought you were using window$ from some of your previous mails. (It would help us give better answers if you provided some more information about what you are trying to do, and what system you are using :) ) I think that generally, once you start using OS APIs, (which is what I presume you mean by shell API) you have to code them separately for each OS. Probably there are equivalent units for other OSs, but I haven't used any others (yet) so I'll let those who have answer that question. cheers, John . _ To unsubscribe: mail [EMAIL PROTECTED] with "unsubscribe" as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Main Form retreiving data from Child Form
el stamatakos wrote: Hi R, Can you do this. I get an error "Circular unit reference to unit1" Thanks Lefti Date: Mon, 3 Dec 2007 21:52:08 +0100 From: [EMAIL PROTECTED] To: lazarus@miraclec.com Subject: Re: [lazarus] Main Form retreiving data from Child Form yeah, add unit1 in the "uses" clause of unit2 and add unit2 in the "uses" clause of unit1. You need to put them in the implementation section not the interface section. (You may well need to create a uses clause under implementation, as there isn't one there by default.) You can then access the other units from methods in the implementation section, without the circular reference error. cheers, John Sunderland _ To unsubscribe: mail [EMAIL PROTECTED] with "unsubscribe" as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] MySql 4.1 Database Questions
el stamatakos wrote:
1) I have an MDI application and when I clicked on a menu it would open
another form. Now it does not any idea how I can fix this.
Can you give a little more information ?
2) I want to be able to do something like
SQLQuery1.SQLSelect('SELECT * from process ORDER BY
processDisplayOrder');
Very roughly, at run time, you add the query text to SQLQuery1.SQL
SQLQuery1.SQL.clear;
SQLQuery1.SQL.add('SELECT * from process ORDER BY processDisplayOrder');
and set it active
SQLQuery1.active = true;
OR you can do this at design time in the object inspector, if the
query does not change.
WARNING:
I've been trying to work out how to use SVN, and all my up to date
lazaruses are broken (!), so I cannot check that this is exactly right
- hope it points you in the right direction.
cheers,
John Sunderland
_
To unsubscribe: mail [EMAIL PROTECTED] with
"unsubscribe" as the Subject
archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] SQLite 3 -- Capture FieldValues into a variable
Daniel Rincn Garca wrote: Hi, I need to capture the FieldValues of a SQLite database into a string variable. If I do it: while not dsTest.EOF do begin DataToSend := DataToSend + dsTest.FieldValues ['Code'] + '\' + dsTest.FieldValues['Name'] + '\' + dsTest.FieldValues['Address'] + '#'; dsTest.Next; end; I have got the next error message: Project raised exception class 'RunError(231)'. If I do it then works: while not dsTest.EOF do begin Cod := dsTest.FieldValues['Code']; Nam := dsTest.FieldValues['Name']; Addr := dsTest.FieldValues['Address']; DataToSend := DataToSend + Cod + '\' + Nam + '\' + Addr + '#'; dsTest.Next; end; But I have to declare three string variables (Cod, Nam and Addr). Can you help me? I'm not sure, but it is probably because FieldValues returns a variant. Try using FieldByName[...].AsString: DataToSend := DataToSend + dsTest.FieldByName ['Code'].AsString + '\' + dsTest.FieldByName['Name'].AsString + '\' + dsTest.FieldByName['Address'].AsString + '#'; Cheers, John Sunderland _ To unsubscribe: mail [EMAIL PROTECTED] with "unsubscribe" as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] WinCE, howto open a networkpath?
Sorry if I go a little out of the topic... but WinCE is not discussed much here so I take the occasion to ask: is there someway to manage the dialogs of WinCE? I would need, for example, a way to force the keyboard to appear and disappear... Sorry, didn't get that far yet, so I don't know. However, since Lazarus is becoming more popular, I think the discussion about WinCE will increase... regards, John Thank you for the code about the networkpath, I also needed that. Cheers, Adrian. _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] WinCE, howto open a networkpath?
Hi Adrian,
Thanks!
Looks just like the thing I need!
Do you know of a parameter I can set that hides the
Connection-in-progress dialog that comes up?
kind regards,
John
if ConnMgrEstablishConnectionSync(ConnInfo, FConnection, 6,
FStatus) S_OK
Adrian Veith wrote:
Hi,
You have to to use the connection manager api from microsoft. I have
translated some parts of it to object pascal (source is attached). The
source is not well tested now, but it works for me. For a simple
connection to the internet you can use the following code.
Cheers, Adrian.
var
ConnInfo: CONNMGR_CONNECTIONINFO;
begin
ZeroMemory(@ConnInfo, sizeof(ConnInfo));
ConnInfo.cbSize:= sizeof(ConnInfo);
ConnInfo.dwParams:= CONNMGR_PARAM_GUIDDESTNET;
ConnInfo.dwPriority:= CONNMGR_PRIORITY_USERBACKGROUND ;
ConnInfo.guidDestNet:= IID_DestNetInternet;
if ConnMgrEstablishConnectionSync(ConnInfo, FConnection, 6,
FStatus) S_OK
then
raise Exception.Create('No connection');
John vd Waeter schrieb:
Hi all,
With the INet components, I managed to use a UDP-component to
frequently ask an internetserver for some data.
However, no traffic is generated when the handheld is powered up. I
first have to initiate internet explorer, ask for some trivial page
and after that my application can continu its UDP traffic.
I guess starting IE opened a networkpath and takes care of obtaining
an ipnr etc.
What do I have to call to ensure a networkpath (GPRS, WiFi, whatever
is available) is opened the same way IE does?
tia!
John
_
To unsubscribe: mail [EMAIL PROTECTED] with
unsubscribe as the Subject
archives at http://www.lazarus.freepascal.org/mailarchives
_
To unsubscribe: mail [EMAIL PROTECTED] with
unsubscribe as the Subject
archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] WinCE, howto open a networkpath?
Hi all, With the INet components, I managed to use a UDP-component to frequently ask an internetserver for some data. However, no traffic is generated when the handheld is powered up. I first have to initiate internet explorer, ask for some trivial page and after that my application can continu its UDP traffic. I guess starting IE opened a networkpath and takes care of obtaining an ipnr etc. What do I have to call to ensure a networkpath (GPRS, WiFi, whatever is available) is opened the same way IE does? tia! John _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] svn trunk
Darius Blaszijk wrote: I would say like 30-40meg as a guestimate. The advantage though is that once you have the trunk, updating will take less than 1meg per week. But I'm on broadband, so I never pay that much attention to it. Thanks, Darius, Andrew, Mattias That's quite manageable, I'll have a go. (I'm on cheapskates broadband, only 300 Mb per month) It seems like it is no worse than downloading a snapshot. No, Mattias, I hadn't forgotten fpc. It is actually some of the database stuff in fpc I most want to get up to date. I take it in the svn world they are separate. (I'm used to snaphots that include both lazarus and fpc) I'll go and read the wiki (again), then stand by for questions thanks, John Sunderland _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] svn trunk
Hi all, Can anyone give me a rough idea of the size of the lazarus svn trunk ? I am on a limited download volume, and I was wondering if it is feasible for me. cheers, John Sunderland _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] The use of Variants?
Marco van de Voort wrote: Being generic database support (allows to have generic code to talk to databases, without having the database layout in some structure form compiled in), COM support, or PHP (www.stack.nl/~marcov/phpser.zip ) They were never meant to be used as normal variables. Quite agree. It is hard to see how you could do database support without them, with out using truly ridiculous levels of overloading. I can't see any (sensible) way of doing a key search on a complex key without passing an array of variants. On the the other hand, I never use them if I can avoid them. For example, I would always typecast a TField to a specific field type and use the value property rather than use the AsVariant property of a generic TField if I knew the Field type. cheers, John Sunderland _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] SQLdb : get last_inserted_id
Alvise Nicoletti wrote: Hi... this is the complete code I'm using to extract the last_insert_id from the table TABLE1, but it still don't works. Infact I get always 0 from the variable id_ingresso, pheraphs in the database the row is correctly inserted. Hi Alvise, I haven't gone through you example completely, but try doing the same thing by generating the sql text on the fly instead of using parameters. I was unable to get anything to work using parameters when I last tried a few months ago. cheers, John _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] crash on compiler-options
Hi all, Beginner in Lazarus, experience in Delphi since 1.0 Installed snapshot 20071005 on winXP. Open Compiler Options, click on tab Messages A lot of jittering on the tab and then: Unknow RT Error 202 OK to ignore, Cancel to kill. Cancel kills the IDE, ignoring and trying again kills the IDE without asking. Must be something simple I guess? Kind regards, John _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] mailing list feedback with to large attachments.
Michael A. Hess wrote: On Mon, 23 Jul 2007, Graeme Geldenhuys wrote: On 23/07/07, hy-soft [EMAIL PROTECTED] wrote: I received both Thanks for confirming that. What is the attachment limit on the mailing list. I'm not sure if it is 20k or 40k? I believe it is set at 50K. I'll check and if it is different then that I'll let you know. Michael, do you mind kicking the ass of the mailer at lazarus.freepascal.org as well? I can get it to send registration-password... tia, john _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Trouble registering on lazarus.freepascal.org
Hmm, anyone? Still no luck... John John vd Waeter wrote: Marc Weustink wrote: John vd Waeter wrote: Hi all, I try to register at lazarus.freepascal.org, but no emails with password are sent from the site. Can anyone take a look at it? Where did you try to register for ? Mantis ? Forum ? Site ? Marc The forums. John _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] Trouble registering on lazarus.freepascal.org
Hi all, I try to register at lazarus.freepascal.org, but no emails with password are sent from the site. Can anyone take a look at it? tia! John _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Trouble registering on lazarus.freepascal.org
Marc Weustink wrote: John vd Waeter wrote: Hi all, I try to register at lazarus.freepascal.org, but no emails with password are sent from the site. Can anyone take a look at it? Where did you try to register for ? Mantis ? Forum ? Site ? Marc The forums. John _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Another little help with databases
Bram Kuijvenhoven wrote: German C. Basisty wrote: I have now a form with a working TPQConnection, a TSQLTransaction, a TSQLQuery with a ‘select * from product’ as SQL, a TDatasource, an a TDBGrid, so you should either properly escape Edit1.Text, or use query parameters instead I recommend using query parameters. Regards, Bram I totally agree in principle, but I am trying to use pretty much the same configuration as German and I am having lots of trouble getting query parameters to behave, so perhaps that is not the best idea for first experiments ... cheers, John Sunderland _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] Debugging and property values
Hi all, Is there any way of viewing property values while tracing / debugging ? Thanks, John Sunderland _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Initialize a DBGrid
German C. Basisty wrote: Hi! Here goes another question: I have a form. This form contains a DBGrid. The DBGrid retrives information via an SQL connection from a PostgreSQL Database. How do I do to initialize parameters (like DBGrid1.Columns[1].Width := 20) when the form is shown (when the form appears)? Best Regards , German Exactly like that, I would have thought. You can do it at run time as you have suggested. Put the code in the OnShow event of the form if you want it done once when the form is first opened. Alternatively, you can set them at design time using the columns property of the dbgrid in the Object Inspector. cheers, John _ To unsubscribe: mail [EMAIL PROTECTED] with "unsubscribe" as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] files: I give up
Also, it depends on exactly what you are trying to save. There are other ways of saving strings than using the low level file routines. They may be less efficient, but involve less programming. If your strings are in a TStrings or TStringList object, you can simply use the SaveToFile and LoadFromFile methods. This gives you lots of good ways to work with the strings as well. If you just want to save odd form or control properties, there is the sessionproperties system (Congratulations to whoever invented that, by the way!). If you want to work with large slabs of text, the low level routines might be best. If you are just experimenting, don't let me put you off! cheers, John _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Another little help with databases
German C. Basisty wrote: Hi again! Well, Im still learning I have now a form with a working TPQConnection, a TSQLTransaction, a TSQLQuery with a select * from product as SQL, a TDatasource, an a TDBGrid, everithing is working fine and every product is shown on the DBGrid as expected. Now I want to add an TEdit to make posible searching products by name, for example, so when the user writes something on the Edit, the SQLQuery1.SQL should become something like select * from product where name = + Edit1.Text + Now my questions: - How do I write in pascal a inside a ? I mean, in C++ I use as string container, but in pascal I should use , so, how do I do it? Double single-quote marks: 'This is a string constant with ''quote'' in single quotes'. represents a a single quote as a string constant. - How can I do an update after I change the SQLQuery1.SQL property? I mean, if at the beginning the DBGrid shows all products, then I change the SQLQuery1.SQL property, how do I do to make the DBGrid show the new filtered content As far as I know, if you change the SQL you have close the query and reopen it. This process re-parses it, prepares it, etc. Best regards, German cheers, John Sunderland _ To unsubscribe: mail [EMAIL PROTECTED] with "unsubscribe" as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Databases on the Wiki
Felipe Monteiro de Carvalho wrote: I found this page which is directy linked from the main Documentation page: http://wiki.lazarus.freepascal.org/Lazarus_DB_Faq It looks quite a weak page. Maybe it's content could be merged into your Databases page, and then Databases would substitute it on the main Documentation page, and we can delete the old FAQ page. It isn't *my* database page, I just found it! The DB Faq page is already linked from the Databases page, so if the Database page just replaced the DB FAQ on the front documentation page then the FAQ would still be accessible. Though I agree the FAQ does not have much in it that is not covered on the Databases page or in the DB Tutorial. Graeme wrote: Why not create FPDoc/LazDoc (xml) documentation instead of a wiki page. I might do some work in LazDoc later, but I think the level of documentation I can write straight away would be more suitable to wiki, and also I need others be able to easily check that I am writing is not a lot of nonsense! cheers, John _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Question from 100000 of dollars
Guadagnini David wrote: Boys, when the next official release should be anticipated (not beta)? Are you asking when the next _major_ release should be out? Minor versions get released on a regular basis. And not to be that much of a nitpicker since your English is better than my Italian, but I think you mean The $100,000 question (adjusted for inflation). _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] Databases on the Wiki
I promised Joost that I would do some documentation of the database components, but I am uncertain where to put it. There is a page at wiki.lazarus.freepascal.org/Databases that seems to be a very good overall guide and starting point, and seems to have been started as just that. However, it doesn't seem to be linked from anywhere very obvious - only from from Lazarus_Database_Tutorial. Is there somewhere more central where it could have a link ? I can than hang my stuff from it . cheers, John _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Emulate Php Md5 (Crypt) and Sha1
Alvise Nicoletti wrote: Hi to all... did anyone never heard how to implement crypt and sha1 functions of php inside delphi/lazarus? While this isn't a cross-platform solution, have you tried the nix crypt and sha functions? _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Emulate Php Md5 (Crypt) and Sha1
Alvise Nicoletti wrote: John Meyer ha scritto: Alvise Nicoletti wrote: Hi to all... did anyone never heard how to implement crypt and sha1 functions of php inside delphi/lazarus? While this isn't a cross-platform solution, have you tried the nix crypt and sha functions? _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives Where I can find them? wich unit? Maybe it's not a cross platform solution but I can do something with their sources... 'crypt is implemented as a function in Linux/Unix. sha1 also has an implementation for perl, so you might be able to do something with that. _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Borland Kylix Trolltech
Lee Jenkins wrote: Graeme Geldenhuys wrote: Hi, I take it this is an old announcement? Thought the date of the announcement (as per the webpage) is June 2007. http://trolltech.com/company/newsroom/announcements/0054?searchterm=borland+linux Regards, - Graeme - snip We are fully committed to Linux. /snip Yeah, and Bill was fully committed to Hillary as well before he left the Presidential Seal on Ms. Lewinsky's dress. -- The NCP Revue -- http://www.ncprevue.com/blog _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: Object Inspector crash, and other interesting stuff
Mattias Gaertner wrote: On Thu, 10 May 2007 18:37:50 +0100 pineal [EMAIL PROTECTED] wrote: On Thursday 10 May 2007 17:45, Charl van Jaarsveldt wrote: I forgot to mention that I have svn r11124 and lazarus is compiled for gtk1, using Ubuntu Feisty. On 5/10/07, Charl van Jaarsveldt [EMAIL PROTECTED] wrote: Hi, I just did an update, haven't been using lazarus for a while so I don't know if it was broken before or not... I start Lazarus, and the OI/PL window has a cool transparent air to it. Looks like the background is draw but the fonts from the window behind it is still shining through. Then when I click on the property list is might make the background completely black or it might not. But finally, when I click on the Object Inspector, Lazarus crashes with some nasty errors. Thanks, Charl PS Please find the error messages generated on crash, and gdb backtrace below... snipped rest Hi Charl, I don't know whether or not this is related, but when I was running beryl, scrolling or clicking on the Object inspector crashed and logged me out of my graphical session completely. I went back to disabling those effects and no problems. -- The NCP Revue -- http://www.ncprevue.com/blog _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: Object Inspector crash, and other interesting stuff
Charl van Jaarsveldt wrote: Well, I don't know about the rest, but I am not using any cool effects. I am one of the poor ones that can't even get nVidia drivers to work and has to make do with the open source driver. That could be some of it; I am using the commercial source drivers. Just wondering if anybody's had a crash like that lately. -- The NCP Revue -- http://www.ncprevue.com/blog _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] Converting Strings to Currency
I tried a search at lazarus.freepascal.org, and it didn't get anywhere, so if somebody could help me out by telling me how I convert a string (specifically, from a TEdit control) to a currency and versey vicey, I'd appreciate it. _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Converting Strings to Currency
Lee Jenkins wrote: John Meyer wrote: I tried a search at lazarus.freepascal.org, and it didn't get anywhere, so if somebody could help me out by telling me how I convert a string (specifically, from a TEdit control) to a currency and versey vicey, I'd appreciate it. Maybe StrToFloat(AString); ?? Thanks! That worked, but I have one question. If you have a Currency type, why are you throwing it to a function named StrToFloat? Why not StrToCur or StrToCurrency? Just asking so I know not to make that mistake in the future. -- The NCP Revue -- http://www.ncprevue.com/blog _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] sign fpc and lazarus images.
Jesus Reyes wrote: Abraham Montaño (SiR-HaCk on #lazarus-es IRC channel) sent me the attached images, he wants to share them with you, he hopes you like them. _ Nice, I guess. Are they link buttons? _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] Delphi 4 PHP
I admit that I haven't kept up with this as much as I should, but I have a few questions, and if somebody can provide me with a link I am certainly grateful. 1. Is Delphi 4 PHP a product for just Delphi, or can Lazarus use it as well? 2. What exactly does it do? Something akin to the .NET components? 3. What are its advantages? 4. What are its disadvantages? _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] 0.9.20 released
When I bring up the alt+f2 command and type lazarus, it gives me the following error: KDEInit could not launch /usr/share/lazarus/startlazarus Also, the icon in the start menu won't work, but creating an icon on the desktop to run lazarus, as well as invoking it from the command line, will Running OpenSuse 10.1 with KDE 3.5 (latest version). Also the version of KDE that was bundled with OS 10.1 had the same error. Mattias Gaertner wrote: On Thu, 09 Nov 2006 05:14:40 -0700 John Meyer [EMAIL PROTECTED] wrote: I'm still getting the error that the kde/gnome lazarus icon fails to start lazarus and when I type lazarus in the alt+f2, it gives me an error. Incidentally, when I start it either from the command line or from an icon on the desktop there are no problems starting it. What error? This seems to be a different bug. I will check later. Mattias Mattias Gaertner wrote: On Wed, 8 Nov 2006 18:20:33 +0100 Sebastian Kraft [EMAIL PROTECTED] wrote: Am Mittwoch, 8. November 2006 09:52 schrieb Mattias Gaertner: The Lazarus team is glad to announce the 0.9.20 release. This release is based on fpc 2.0.4. Mhm... with new release the editor looks strange. everything is a bit squeezed. font is small and ugly. With the svn some days before it was excellent... I don't remember any such change. At least not since 0.9.18. Please create a bug report. Mattias _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] 0.9.20 released
[EMAIL PROTECTED]:~ which startlazarus /usr/bin/startlazarus [EMAIL PROTECTED]:~ which lazarus /usr/bin/lazarus [EMAIL PROTECTED]:~ Helps? Marc Santhoff wrote: Am Freitag, den 10.11.2006, 05:32 -0700 schrieb John Meyer: When I bring up the alt+f2 command and type lazarus, it gives me the following error: KDEInit could not launch /usr/share/lazarus/startlazarus Also, the icon in the start menu won't work, but creating an icon on the desktop to run lazarus, as well as invoking it from the command line, will Running OpenSuse 10.1 with KDE 3.5 (latest version). Also the version of KDE that was bundled with OS 10.1 had the same error. $ which startlazarus or $ which lazarus is your friend HTH, Marc _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] 0.9.20 released
Good catch on that, I'll look at the menu item, now as far as what KDE searches for when I bring up the alt+f2 menu, how do I change that? Marc Santhoff wrote: I don't know if this is a lazarus installation error or something in your personal setup of the kde environment, but you as user (I'm still happy with windowmaker, cannot comment on kde) and maybe system administrator can correct it. Helps? ;) Marc _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] 0.9.20 released
I'm still getting the error that the kde/gnome lazarus icon fails to start lazarus and when I type lazarus in the alt+f2, it gives me an error. Incidentally, when I start it either from the command line or from an icon on the desktop there are no problems starting it. Mattias Gaertner wrote: On Wed, 8 Nov 2006 18:20:33 +0100 Sebastian Kraft [EMAIL PROTECTED] wrote: Am Mittwoch, 8. November 2006 09:52 schrieb Mattias Gaertner: The Lazarus team is glad to announce the 0.9.20 release. This release is based on fpc 2.0.4. Mhm... with new release the editor looks strange. everything is a bit squeezed. font is small and ugly. With the svn some days before it was excellent... I don't remember any such change. At least not since 0.9.18. Please create a bug report. Mattias _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] KDE
Has anybody been able to run Lazarus under KDE (suse 10.1). I can't even get it up. _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] KDE
Felipe Monteiro de Carvalho wrote: On 10/25/06, John Meyer [EMAIL PROTECTED] wrote: Has anybody been able to run Lazarus under KDE (suse 10.1). I can't even get it up. Does it give any error message? What happens? How did you install it? Also, try running it from the command line. The command is: lazarus KDEInit could not start /usr/share/lazarus/startlazarus _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] KDE
John Meyer wrote: Felipe Monteiro de Carvalho wrote: On 10/25/06, John Meyer [EMAIL PROTECTED] wrote: Has anybody been able to run Lazarus under KDE (suse 10.1). I can't even get it up. Does it give any error message? What happens? How did you install it? Also, try running it from the command line. The command is: lazarus KDEInit could not start /usr/share/lazarus/startlazarus Oh, yeah, if I bring up a console window, it seems to launch just fine. _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] avoiding multi-instance detection
Problem when program crashes. File is not deleted. Maybe refresh file every 5 minutes or so, put a timestamp in it. If timestamp older then 5 minutes, program appearantly crashed, new instance may start. John Bogusław Brandys wrote: Alejandro Lucas Baldres wrote: My plataform i386 with Linux (ubuntu dapper 6.06), the future of program is free and opensource. I want the program disallow more then one instance. The simplest solution: let program check if /tmp/filename file exists and create it,then on exit delete.If file exists then instance is already running. More complex would be using IPC (maybe others could describe) Regards Boguslaw _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives -- John vd Waeter mailto:[EMAIL PROTECTED] http://www.jvdw.nl http://www.shotinthedark.nl _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
RE: [lazarus] Turbo explorer
You missed it: Did a search and it's there. http://www.borland.com/us/company/news/press_releases/2006/08_07_06_borlands _developer_tools_group_plans_to_rev_up_classic_turbo.html -Original Message- From: Mark Wrenn [mailto:[EMAIL PROTECTED] Sent: Wednesday, August 09, 2006 12:27 PM To: lazarus@miraclec.com Subject: Re: [lazarus] Turbo explorer Am I the only one who thinks this is a bit fishy? Something doesn't seem right about this. Why isn't this mentioned in a press release on the Borland site? Did I miss it? Why doesn't David I's blog mention it? (http://blogs.borland.com/davidi/). Even the turboexplorer web site doesn't quite have the right feel to it. Maybe I'm just a Doubting Thomas. Mark Luis R. Hilario B. wrote: Hello, CUPERTINO, Calif. - August 8, 2006 - Today, the Developer Tools Group of Borland Software Corporation (NASDAQ: BORL) announced plans to release single language versions of Borland Developer Studio, the company's development environment for Microsoft(r) Windows(r) and .NET applications. Bringing back the popular TurboT moniker, the new Borland Turbo products offer low-cost, language-specific rapid application development capabilities for students, hobbyist developers, occupational developers as well as individual professionals. http://www.turboexplorer.com/ What do you think? they're back to do it again? _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] To the guy that answered my SuSE question
I tried making those links, and they didn't seem to work in fixing lazarus to where it could link. _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Lazarus and Suse 10.1
Chris Gordon-Smith wrote: On Wednesday July 12 2006 19:41, micahel schneider wrote: Am Mittwoch, 12. Juli 2006 18:15 schrieb John Meyer: Hi, has anybody successfully installed Lazarus under SuSE 10.1. I try to, but it keeps complaining about gdk-pixbuf-devel and gtk+-devel. Where do I get those packages? I had problems with these packages when I installed Lazarus on SUSE 10.0. It turned out that the packages were not actually missing, but that there was a problem with the naming of shared library executables. I went ahead with the Lazarus installation ignoring the package dependency problem that RPM was reporting. Having done this, I found that building a program would fail at the linking stage. It turned out that the libraries that it said were missing were there, but with different names. To fix this I added the following links to my filesystem:- linux:/opt/gnome/lib # ln -s libgdk-x11-2.0.so.0libgdk-x11-2.0.so linux:/opt/gnome/lib # ln -s libgdk_pixbuf-2.0.so.0libgdk_pixbuf-2.0.so linux:/opt/gnome/lib # ln -s libgtk-x11-2.0.so.0libgtk-x11-2.0.so linux:/opt/gnome/lib # ln -s libpango-1.0.so.0libpango-1.0.so linux:/opt/gnome/lib # ln -s libatk-1.0.so.0libatk-1.0.so Hope this helps. Chris Gordon-Smith www.simsoup.info _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives I did that, but it gave me an error while creating the links error: file exists, and I got the ld -lgpk error while linking. _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] Lazarus and Suse 10.1
Hi, has anybody successfully installed Lazarus under SuSE 10.1. I try to, but it keeps complaining about gdk-pixbuf-devel and gtk+-devel. Where do I get those packages? _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Lazarus and Suse 10.1
micahel schneider wrote: Am Mittwoch, 12. Juli 2006 18:15 schrieb John Meyer: Hi, has anybody successfully installed Lazarus under SuSE 10.1. I try to, but it keeps complaining about gdk-pixbuf-devel and gtk+-devel. Where do I get those packages? Actually, I installed it, using the --nodeps option. _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] Converting strings to floats, and back again
var d_Total: Extended; d_SubTotal : Extended; d_SalesTax: Extended; s_TotalMessage: string; begin d_SubTotal := StrToFloat(edSubtotal.Text); d_SalesTax := StrToFloat(EdTax.Text); if d_SalesTax = 1.0 then d_SalesTax := d_SalesTax / 100; d_Total := d_SubTotal + (d_SubTotal * d_SalesTax); s_TotalMessage := 'Total amount is ' + FloatToStr(d_Total); lblTotal.Text := s_TotalMessage; end; This works fine with integers (i.e. if the whole amount on total is an integer), but with floats, it doesn't produce anything after 'Total amount is '. -- Online library -- http://pueblonative.110mb.com 126 books and counting. _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Converting strings to floats, and back again
Marien van Westen wrote: I cannot find any problem with that code on Win32 Marien Okay, I'm running Linux. BTW, Lazarus Editor v 0.9.10 -beta FPC 2.0.1 -- Online library -- http://pueblonative.110mb.com 126 books and counting. _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Converting strings to floats, and back again
Marien van Westen wrote: I cannot find any problem with that code on Win32 Marien One other note: I'm running the gdb. All the varaibles are set right. It's just that when it's displaying, it won't display the number. -- Online library -- http://pueblonative.110mb.com 126 books and counting. _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] Converting text strings to real numbers.
I'm trying to follow along in the tutorails, but where exactly would I locate this. _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] Not quite sure about if then construction
if i_Error 0 then begin d_SalesTax := 0; end; else ---line that is giving me the error if d_SalesTax 0 then begin d_SalesTax := d_SalesTax / 100 end; it's giving me an error unit1.pas(49,6) Fatal: Syntax error, ; expected but ELSE found _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Converting text strings to real numbers.
Mattias Gaertner wrote: On Sat, 27 May 2006 09:52:43 -0600 John Meyer [EMAIL PROTECTED] wrote: I'm trying to follow along in the tutorails, but where exactly would I locate this. http://lazarus-ccr.sourceforge.net/docs/rtl/sysutils/strtofloat.html Thanks, but does val() still work? _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] What's wrong with this code?
begin if btnTestMeClick.tag=0 then begin btnTestMeClick.Caption:='Click me Again'; btnTestMeClick.tag:=1; end else begin btnTestMeClick.Caption;='Click'; btnTestMeClick.tag:=0; end end; On the if line, I'm getting this error: unit1.pas(32,6) Error: Wrong number of parameters specified This is copied almost word for word from the wiki tutorial. _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] What's wrong with this code?
Rob wrote: Op dinsdag 23 mei 2006 20:23, schreef John Meyer: begin if btnTestMeClick.tag=0 then begin btnTestMeClick.Caption:='Click me Again'; btnTestMeClick.tag:=1; end else begin btnTestMeClick.Caption;='Click'; btnTestMeClick.tag:=0; end end; On the if line, I'm getting this error: unit1.pas(32,6) Error: Wrong number of parameters specified Okay, let me make this a little clearer. if btnTestMeClick.tag=0 then This is the line that is causing the error. _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] What's wrong with this code?
Vincent Snijders wrote: What wiki tutorial, can you give a link? Then we have a complete compilable source. Vincent http://wiki.lazarus.freepascal.org/index.php/Lazarus_Tutorial _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] DesignIntf and DesignEditors Units
Mattias Gaertner wrote: On Sat, 22 Apr 2006 09:49:30 -1000 John Mitson [EMAIL PROTECTED] wrote: I am porting a Kylix component that I created to Lazarus that used DesignIntf and DesignEditor units. Does Lazarus have the equivalent units and if so what are they named. Add the IDEIntf package to your dependencies of your package. Many things of DesignEditor are in PropEdits and ComponentEditors. DesignIntf has no equivalent. What do you need from this unit? Mattias _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives The component uses TIntegerProperty and TPropertyAttributes (see below): TCardValueProperty = class(TIntegerProperty) public function GetAttributes: TPropertyAttributes; override; function GetValue: string; override; procedure GetValues(Proc: TGetStrProc); override; procedure SetValue(const Value: string); override; end; _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] compile lazarus on opensuse 10.0
Any hint? I have /opt/gnome/lib/libgdk-1.2.so.0 . What am i missing? Any help on this, please? Uwe Hi Uwe, For me there are major problems setting up the correct programming/developement environment in OpenSuSe 10.0. I am currently using the OpenSuSE10.0 x86_64 distribution and to me this distribution is crippled. Perhaps you may get the answers to your specific distro questions by asking them in an OpenSuSE forum. Regards John _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] Lazarus and MySQL
Thanks guys, figured it out finally. BTW, is there an easy way to make a connection to a MySQL server? _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] gtk+-develop problems
-BEGIN PGP SIGNED MESSAGE- Hash: SHA1 Hi, I'm trying to install lazarus on my system (OpenSuse 10.0), but I'm getting a gtk+-develop required. Where do I get this? -BEGIN PGP SIGNATURE- Version: GnuPG v1.4.2 (GNU/Linux) Comment: Using GnuPG with Mozilla - http://enigmail.mozdev.org iD8DBQFDzw60j60GAoLuoDkRAoGPAKChhwqcGR1D3Qj42H8JrNc/sXiq1QCeLy4m c1HWFUqPbs4QQWda/PiGpNM= =1R4O -END PGP SIGNATURE- _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Error: Failed to create bitmap
Micha Nelissen wrote: On Mon, 11 Jul 2005 16:15:42 -0300 Andreas Berger [EMAIL PROTECTED] wrote: I am using Window 98 SE, and yes I rebooted between each install. Even compiling Lazarus from source and running the newly compiled version gives me this error. It must be something in the registry that is forcing it to load some bitmaps it can not find. Before every instalation I am completely deleting the directory of the old instalation. I have got no further hints, sorry. Micha Hi Micha, I am experiencing the same problem, same platform, did you find a solution? Regards, John _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Error: Failed to create bitmap
I am experiencing the same problem, same platform, did you find a solution? Regards, John _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives Ok, set colours to 256 and lazarus works fine! (did not have the same problem on Linux!) Quick question, why do I see a 'dos-box' when running a lazarus built app. on win98? Cheers, John _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Re: Error: Failed to create bitmap
Felipe Monteiro de Carvalho wrote:
John Jewitt wrote:
Quick question, why do I see a 'dos-box' when running a lazarus built
app. on win98?
Did you include {$APPTYPE Console} ?
I don't experience this on Windows 98.
Felipe
I've just installed Lazarus on a Win98 box.
Build All on the example\imageviewer\imgview. When I double click the
imgview.exe in win explorer I get the app. but also a dos box.
I have not use laz on windoze, this is my first try out. I'm asking
questions that would probably apply to any 'newbie'.
afaik, doesn't the {$APPTYPE Console} directive make an app. a non-gui app.?
Cheers,
John
_
To unsubscribe: mail [EMAIL PROTECTED] with
unsubscribe as the Subject
archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Re: Error: Failed to create bitmap
Felipe Monteiro de Carvalho wrote: I'm not sure if APPTYPE Console prohibits GUI, but I do know that it shows a dos box for the application. I means that you should not include it... thanks, Felipe Ah, thanks for the info! I am using laz 0.9.10 (0.9.10-20051002 binaries). Later versions may have solved this. I will try them now that I know it can work. 'All' I need to do now is port an app. from Delphi to Lazarus, Win32 to Linux and all will be well with the world :-) again, thanks. regards, John _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Re: Error: Failed to create bitmap
Just to re-iterate, Project-Compiler Options-Linking(4th tab)-Win32 gui application(-WG) checkbox needs to be checked to NOT show a dos-box when running a lazarus app. Good luck to all you FOSS hackers, JJ _ To unsubscribe: mail [EMAIL PROTECTED] with unsubscribe as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
