RE: [DUG]: Limiting Entry

2003-09-14 Thread James Low
My only concern with using beforepost would be that the user could enter all
their data then attempt to post only to find that it was a no go. If you
control the insert and append processes/ events that might be better. Ie
Counting the records on beforeinsert and aborting if 21 would be better (I
think). 

Regards


 -Original Message-
From:   vss [mailto:[EMAIL PROTECTED] 
Sent:   Monday, 15 September 2003 1:14 PM
To: Multiple recipients of list delphi
Subject:[DUG]:  Limiting Entry

Hi All.
IS ther a "Nice" way to limit how many records someone enters into a 
DBGrid?
Basically I want to limit people to only entering 20 items into a 
DBGrid, or better still tell the table to only accept 20 records, but I 
think this will be a frontend thing.
I was thinking the best way to do it is to look at the beforepost event 
and cound the records, (or even rows in the dbgrid) and say they cant 
add anymore if they already have 20.

This sound logical? or is there a nicer way to handle this?

Cheers, Jeremy

---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/

**
 This e-mail message has been swept for content and viruses. No viruses were
detected.  
 Contact the Helpdesk on extension 9CIS (9247) for assistance, if required.

Email disclaimer: This email and any attachments are confidential. If you are not the 
intended recipient, do not copy, disclose or use the contents in any way. If you 
receive this message in error, please let us know by return email and then destroy the 
message. Environment Bay of Plenty is not responsible for any changes made to this 
message and/or any attachments after sending.
**
This e-mail has been checked for viruses and no viruses were detected.
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/


RE: [DUG]: Database exists - IBX

2003-09-09 Thread James Low
Problem solved ...

Cheers

 -Original Message-
From:   James Low [mailto:[EMAIL PROTECTED] 
Sent:   Wednesday, 10 September 2003 11:20 AM
To: Multiple recipients of list delphi
Subject:[DUG]:  Database exists - IBX

This might be fairly obvious to someone - but has me beaten:
How can you tell with IBX controls whether Interbase (or Firebird - doesn't
matter) is running at a particular location?

Any ideas really appreciated

Thanks.

James

Email disclaimer: This email and any attachments are confidential. If you
are not the intended recipient, do not copy, disclose or use the contents in
any way. If you receive this message in error, please let us know by return
email and then destroy the message. Environment Bay of Plenty is not
responsible for any changes made to this message and/or any attachments
after sending.
**
This e-mail has been checked for viruses and no viruses were detected.
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/

**
 This e-mail message has been swept for content and viruses. No viruses were
detected.  
 Contact the Helpdesk on extension 9CIS (9247) for assistance, if required.

Email disclaimer: This email and any attachments are confidential. If you are not the 
intended recipient, do not copy, disclose or use the contents in any way. If you 
receive this message in error, please let us know by return email and then destroy the 
message. Environment Bay of Plenty is not responsible for any changes made to this 
message and/or any attachments after sending.
**
This e-mail has been checked for viruses and no viruses were detected.
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/


[DUG]: Database exists - IBX

2003-09-09 Thread James Low
This might be fairly obvious to someone - but has me beaten:
How can you tell with IBX controls whether Interbase (or Firebird - doesn't
matter) is running at a particular location?

Any ideas really appreciated

Thanks.

James

Email disclaimer: This email and any attachments are confidential. If you are not the 
intended recipient, do not copy, disclose or use the contents in any way. If you 
receive this message in error, please let us know by return email and then destroy the 
message. Environment Bay of Plenty is not responsible for any changes made to this 
message and/or any attachments after sending.
**
This e-mail has been checked for viruses and no viruses were detected.
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/


RE: [DUG]: TDBGid - removing gridlines.

2003-08-28 Thread James Low
Thanks Todd. New component it is then.

James
 -Original Message-
From:   Todd Martin [mailto:[EMAIL PROTECTED] 
Sent:   Friday, 29 August 2003 10:42 AM
To: Multiple recipients of list delphi
Subject:Re: [DUG]:  TDBGid - removing gridlines.

Hi James

It's not that obvious. For some reason TDBCustomGrid introduces new Options,
instead of exposing the underlying Options in TCustomGrid. Have a look at
TDBCustomGrid.SetOptions(). You'll see that removing column lines, removes
both the lines in the grid area and the fixed area. The only way around this
would be to inherit a new component from TDBCustomGrid and override Paint()
to add goFixedVertLine or goFixedHorizontal to the TCustomGrid options
before calling its inherited Paint().

Todd.


- Original Message - 
From: "James Low" <[EMAIL PROTECTED]>
To: "Multiple recipients of list delphi" <[EMAIL PROTECTED]>
Sent: Friday, August 29, 2003 8:32 AM
Subject: [DUG]: TDBGid - removing gridlines.


> I suspect this is ridiculously obvious but cannot seem to sort it:
>
> I have a vanilla TDBGrid that I would like to look like a listview (in
list
> view) - but retain its editing ability. Simple I thought, just remove the
> locator and gridlines and voila. Problem is, when I remove the gridlines,
> they are removed from the fixed column row (ie the header row) also, which
> then looks stupid. The grid has a bunch of owner-draw stuff already ...
but
> I cannot work out how to remove the gridlines (ie paint them clWindow) for
> all rows bar the fixed header. Any thoughts would be appreciated.
>
> Thanks
>
> James
>
> Email disclaimer: This email and any attachments are confidential. If you
are not the intended recipient, do not copy, disclose or use the contents in
any way. If you receive this message in error, please let us know by return
email and then destroy the message. Environment Bay of Plenty is not
responsible for any changes made to this message and/or any attachments
after sending.
> **
> This e-mail has been checked for viruses and no viruses were detected.
> --
-
> New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
>   Website: http://www.delphi.org.nz
> To UnSub, send email to: [EMAIL PROTECTED]
> with body of "unsubscribe delphi"
> Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
>


---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/

**
 This e-mail message has been swept for content and viruses. No viruses were
detected.  
 Contact the Helpdesk on extension 9CIS (9247) for assistance, if required.

Email disclaimer: This email and any attachments are confidential. If you are not the 
intended recipient, do not copy, disclose or use the contents in any way. If you 
receive this message in error, please let us know by return email and then destroy the 
message. Environment Bay of Plenty is not responsible for any changes made to this 
message and/or any attachments after sending.
**
This e-mail has been checked for viruses and no viruses were detected.
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/


[DUG]: TDBGid - removing gridlines.

2003-08-28 Thread James Low
I suspect this is ridiculously obvious but cannot seem to sort it:

I have a vanilla TDBGrid that I would like to look like a listview (in list
view) - but retain its editing ability. Simple I thought, just remove the
locator and gridlines and voila. Problem is, when I remove the gridlines,
they are removed from the fixed column row (ie the header row) also, which
then looks stupid. The grid has a bunch of owner-draw stuff already ... but
I cannot work out how to remove the gridlines (ie paint them clWindow) for
all rows bar the fixed header. Any thoughts would be appreciated.

Thanks

James

Email disclaimer: This email and any attachments are confidential. If you are not the 
intended recipient, do not copy, disclose or use the contents in any way. If you 
receive this message in error, please let us know by return email and then destroy the 
message. Environment Bay of Plenty is not responsible for any changes made to this 
message and/or any attachments after sending.
**
This e-mail has been checked for viruses and no viruses were detected.
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/


RE: [DUG]: Report tools

2003-08-28 Thread James Low
Title: Message









Not much
help I suspect, but like you I have done the rounds of report writers and
fastreports quickly emerged as a contender (given cost constraints). Have not
extensively trialled it but from what I have seen it should do the trick.

 

 

-Original
Message-
From: Jeremy Coulter
[mailto:[EMAIL PROTECTED]
Sent: Friday, 29 August 2003 8:15
AM
To: Multiple recipients of list
delphi
Subject: [DUG]: Report tools

 

Hi all.

I have
a small project I am working on ATM for myself ( a moonlighting job) that I
wanted to use ReportBuilder for, but its a bit dear for this project...i.e. I
am funding it myself etc.

I was
looking at FastReports. Saw it on a link on some website, and it says it has
the functionality of ReportBuilder etc,

Has
anyone or IS anyone using FastReports? How do they compare to Report Builder?

I would
just use QR as I own that, but I need the ability to export to different
formats like HTML, and QR just cant handle that at all well !

 

 

Cheers,

 

Jeremy Coulter

 

 



All
email scanned with Nortons Antivirus 2003



 









This
e-mail message has been swept for content and viruses. No viruses were
detected. Contact the Helpdesk on extension 9CIS (9247) for assistance, if
required. 













Email disclaimer: This email and any attachments are 
confidential. If you are not the intended recipient, do not copy, disclose or 
use the contents in any way.  If you receive this message in error, please 
let us know by return email and then destroy the message. Environment Bay of 
Plenty is not responsible for any changes made to this message and/or any 
attachments after sending.

This e-mail has been checked for viruses and no viruses were 
detected. 








RE: [DUG]: joining in update query

2003-08-14 Thread James Low
Title: Normal









Think you may have missed the select operator and some brackets ?? 

 

 

update TABLE1

set

1.updatefield = (Select 3.updatefield

FROM TABLE1 1, TABLE2 2, TABLE3 3

Where 1.idfield = 2.idfield

and
2.anotheridfield = 3.anotheridfield)

 

James
Low

 

 

 

-Original
Message-
From: Tracey Maule
[mailto:[EMAIL PROTECTED]
Sent: Wednesday, 6 August 2003
11:56 AM
To: Multiple recipients of list
delphi
Subject: [DUG]: joining in update
query

 

Hi guys

 

how do i do this in interbase??

 

update TABLE1

set

1.updatefield = (Select 3.updatefield

FROM TABLE1 1, TABLE2 2, TABLE3 3

Where 1.idfield = 2.idfield

and 2.anotheridfield = 3.anotheridfield)

 

 

Tracey
Software Developer / Web Master
Logis
[EMAIL PROTECTED]
(025) 213-1065









This
e-mail message has been swept for content and viruses. No viruses were
detected. Contact the Helpdesk on extension 9CIS (9247) for assistance, if
required. 













Email disclaimer: This email and any attachments are 
confidential. If you are not the intended recipient, do not copy, disclose or 
use the contents in any way.  If you receive this message in error, please 
let us know by return email and then destroy the message. Environment Bay of 
Plenty is not responsible for any changes made to this message and/or any 
attachments after sending.

This e-mail has been checked for viruses and no viruses were 
detected. 








RE: [DUG]: trapping mouse down messages

2003-06-30 Thread James Low
Title: RE: [DUG]:  trapping mouse down messages





Might be way of track, but a page control has an onenter event which I would imagine is fired when any of the components within one of its pages receive focus ... can you not use this event as the trigger of your color stuff? Other than that you could use the gotfocus or whatever event it is for your various controls, check their owner and set their owners colour appropriately ... just ideas I suspect you have worked through already.

-Original Message-
From: Stephen Barker [mailto:[EMAIL PROTECTED]]
Sent: Tuesday, 1 July 2003 10:53 a.m.
To: Multiple recipients of list delphi
Subject: [DUG]: trapping mouse down messages




I'm about to give up on this but maybe someone can help:


I've got a complex form split into 3 regions each with a PageControl and
loads of data aware components such as dbgrid, dbedit, dbcombo as well as
labels etc.


I want to know when the user has selected one of the 3 regions by clicking
anywhere (label, dbedit, panel, dbgrid etc), and appropriately hilight that
region by changing the color of the background panel, grid etc.


Have tried trapping WM_LBUTTONDOWN etc as well as subclassing the form's
wndproc, but this doesn't work as some controls have their own message
loops.


I even tried to loop through all controls and set their FOnMouseDown private
fields (via TControl) to a common handler, but this is causing me exceptions
in database access for some unknown reason.


Any other ideas?


thanks,
Steve
---
    New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
Notice of Legal Status and Confidential Information: This electronic mail message and any accompanying attachments may contain information that is privileged and CONFIDENTIAL.  If you are not the intended recipient you are advised that any use, review, dissemination, distribution or reproduction of the information is strictly prohibited and may be unlawful.  If you have received this document in error, please notify the sender immediately and destroy the message.




RE: [DUG]: Modulizing Apps. with Packages

2003-06-03 Thread James Low
Title: Message



Interesting you should ask ... just this very minute I 
am at the exact same juncture with my app. Dunno if this helps - has unmuddied 
the packages waters for me a bit:
 
http://bdn.borland.com/article/0,1410,27178,00.html

  -Original Message-From: Jeremy Coulter 
  [mailto:[EMAIL PROTECTED]Sent: Monday, 2 June 2003 11:33 
  a.m.To: Multiple recipients of list delphiSubject: 
  [DUG]: Modulizing Apps. with Packages
  Hi all. Yeah I 
  know, its sad to be having a day off, but still thinking about work 
  :-)
   
  Anyway, I have 
  finally got a project where I will or want to use packages to modulize the 
  app.
  I have already 
  developed the first part based on an article in the Delphi Informant 
  Mag.
  The only thing I 
  am kinda confused about is, to get the app. that looks for and loads the 
  packages at runtime, I have to set the "Compile with Runtime Support", or 
  whatever its called, switch in the project settings.
  This means that I 
  need to now supply the 6mb VCL packages and what ever else I use, like ADO, 
  etc.
  This is not going 
  to be any good for this project as it has to go to over 100 
  places.
   
  SO, can I do the 
  above slightly differently so I can just distribute the EXE without have to 
  also send out the runtime BPL's too?
  Or am I better to 
  use some 3rd party plugin tool?
   
  Cheers,
   
  Jeremy 
  Coulter
   
   
  
  All email scanned with Nortons 
  Antivurus 2002
  
   

Notice of Legal Status and Confidential Information: This electronic mail message and any accompanying attachments may contain information that is privileged and CONFIDENTIAL.  If you are not the intended recipient you are advised that any use, review, dissemination, distribution or reproduction of the information is strictly prohibited and may be unlawful.  If you have received this document in error, please notify the sender immediately and destroy the message.


RE: [DUG]: Tab across TabSheets

2003-05-27 Thread James Low
Title: Message



At a 
rought stab, I would try:
 
PageControl1.ActivePageIndex := 
1;
Then assuming the 
first control is a wincontrol:
(PageControl1.ActivePage.Controls[0] 
as Twincontrol).SetFocus;
 
... 
depending on whats what, you might need to loop through the controls to select 
the correct one. If you know its name ... then I'd just use 
that:
 
mycontrolsname.setfocus.
 
I 
recall the order counts ... don't try to set focus before the page is actually 
showing. 

  -Original Message-From: Allan, Samuel 
  [mailto:[EMAIL PROTECTED]Sent: Wednesday, 28 May 2003 3:45 
  p.m.To: Multiple recipients of list delphiSubject: 
  [DUG]: Tab across TabSheets
  I 
  have two tabsheets. When user presses tab in the last control on the first 
  tabsheet I want to go to the first control of the second 
  tabsheet.

Notice of Legal Status and Confidential Information: This electronic mail message and any accompanying attachments may contain information that is privileged and CONFIDENTIAL.  If you are not the intended recipient you are advised that any use, review, dissemination, distribution or reproduction of the information is strictly prohibited and may be unlawful.  If you have received this document in error, please notify the sender immediately and destroy the message.


RE: [DUG]: Lost Inherited functionality - forms:

2003-05-27 Thread James Low
Title: Lost Inherited functionality - forms:



Thanks. I think thats part of the solution, and I think 
the other part lies in Virtual methods and one of the Descendant forms 
destroying an action, or method or something used by another descendant form. 
Thats my take ... alls well now, a bit more fiddling and making the construction 
and destruction of the forms virtual seems to have saved the 
day...

  -Original Message-From: Todd Martin 
  [mailto:[EMAIL PROTECTED]Sent: Wednesday, 28 May 2003 1:47 
  p.m.To: Multiple recipients of list delphiSubject: Re: 
  [DUG]: Lost Inherited functionality - forms:
  Hi James
   
  It sounds like double clicking the OK button 
  reassigns the OnClick event for the button and removes a reference to the 
  action. After fiddling with the button, check the object inspector to make 
  sure its OnClick event is empty. 
   
  Todd.
   
  
- Original Message - 
From: 
James Low 
To: Multiple 
recipients of list delphi 
Sent: Wednesday, May 28, 2003 9:50 
AM
Subject: [DUG]: Lost Inherited 
functionality - forms:

This has bugged me for ages, the list is quiet, so maybe 
someone can help. 
I have a Base form with Buttons attached to an actionlist. 
In the base class I have a protected declaration as follows: 
procedure TFrmEditorAbs.aOKExecute(Sender: TObject); 
begin     
Assert(FData <> nil, 'FData not assigned');     Assert(FDataBuffer <> nil, 'FDataBuffer not 
assigned');     
FData.Assign(FDataBuffer);     
FData.Dirty := true;     ModalResult 
:= mrOK; end; 
On the Base forms create I build the actions and link them 
to the OK button: 
    FaOK := TAction.Create(FAL); 
    FaOK.ActionList := FAL;     FaOK.Caption := '&OK';     FaOK.OnExecute := aOKExecute;     btnOK.Action := FaOK; 
This works fine. If I use Delphis IDE and inherit from this 
form all goes well and I can override aOKExecute in my descendent forms as 
required. BUT, it seems (D5) is if double click on the OK button in the 
descendant form, or generally fiddle around and then try to override the 
AOKExecute I am stuffed. AOkExecute is lost. The code never gets called. All 
because at some point I have double clicked said OK button and then removed 
the references from the code (to restore the code window to its prior 
pristine state). There must be an easy fix, but I usually revert to copying 
all my code to a new form ... tedious at best.
Any ideas about how this is fixed? 
Thanks ... 
Notice of Legal Status and Confidential Information: This 
electronic mail message and any accompanying attachments may contain 
information that is privileged and CONFIDENTIAL.  If you are not the 
intended recipient you are advised that any use, review, dissemination, 
distribution or reproduction of the information is strictly prohibited and 
may be unlawful.  If you have received this document in error, please 
notify the sender immediately and destroy the 
message.

Notice of Legal Status and Confidential Information: This electronic mail message and any accompanying attachments may contain information that is privileged and CONFIDENTIAL.  If you are not the intended recipient you are advised that any use, review, dissemination, distribution or reproduction of the information is strictly prohibited and may be unlawful.  If you have received this document in error, please notify the sender immediately and destroy the message.


[DUG]: ADO components (D5)

2003-05-27 Thread James Low
Title: ADO components (D5)





A zillion years ago when I purchased D5 Pro it came sans ADO components. I would now like to test some of my code (which theoretically will run against most DB backends) against ADO. 

Does anyone know of where/ how I can get hold of the standard Delphi(5) ADO components? I realise they come with the later versions of Delphi (which I have had no need to migrate to - yet).

Thanks



Notice of Legal Status and Confidential Information: This electronic mail message and any accompanying attachments may contain information that is privileged and CONFIDENTIAL.  If you are not the intended recipient you are advised that any use, review, dissemination, distribution or reproduction of the information is strictly prohibited and may be unlawful.  If you have received this document in error, please notify the sender immediately and destroy the message.




RE: [DUG]: Lost Inherited functionality - forms:

2003-05-27 Thread James Low
Title: Lost Inherited functionality - forms:



Problem solved - seems to be a Virtual method kinda of 
thing ... a later created form is somehow stuffing up the earlier created forms 
methods ... I am sure I can sort this. Nothing to do with the fiddling (which is 
reassuring).

  -Original Message-From: James Low 
  [mailto:[EMAIL PROTECTED]Sent: Wednesday, 28 May 2003 9:50 
  a.m.To: Multiple recipients of list delphiSubject: 
  [DUG]: Lost Inherited functionality - forms:
  This has bugged me for ages, the list is quiet, so maybe 
  someone can help. 
  I have a Base form with Buttons attached to an actionlist. In 
  the base class I have a protected declaration as follows: 
  procedure TFrmEditorAbs.aOKExecute(Sender: TObject); 
  begin     Assert(FData 
  <> nil, 'FData not assigned');     Assert(FDataBuffer <> nil, 'FDataBuffer not 
  assigned');     
  FData.Assign(FDataBuffer);     
  FData.Dirty := true;     ModalResult := 
  mrOK; end; 
  On the Base forms create I build the actions and link them to 
  the OK button: 
      FaOK := TAction.Create(FAL); 
      FaOK.ActionList := FAL;     FaOK.Caption := '&OK';     FaOK.OnExecute := aOKExecute;     btnOK.Action := FaOK; 
  This works fine. If I use Delphis IDE and inherit from this 
  form all goes well and I can override aOKExecute in my descendent forms as 
  required. BUT, it seems (D5) is if double click on the OK button in the 
  descendant form, or generally fiddle around and then try to override the 
  AOKExecute I am stuffed. AOkExecute is lost. The code never gets called. All 
  because at some point I have double clicked said OK button and then removed 
  the references from the code (to restore the code window to its prior pristine 
  state). There must be an easy fix, but I usually revert to copying all my code 
  to a new form ... tedious at best.
  Any ideas about how this is fixed? 
  Thanks ... 
  Notice of Legal Status and Confidential Information: This 
  electronic mail message and any accompanying attachments may contain 
  information that is privileged and CONFIDENTIAL.  If you are not the 
  intended recipient you are advised that any use, review, dissemination, 
  distribution or reproduction of the information is strictly prohibited and may 
  be unlawful.  If you have received this document in error, please notify 
  the sender immediately and destroy the 
message.

Notice of Legal Status and Confidential Information: This electronic mail message and any accompanying attachments may contain information that is privileged and CONFIDENTIAL.  If you are not the intended recipient you are advised that any use, review, dissemination, distribution or reproduction of the information is strictly prohibited and may be unlawful.  If you have received this document in error, please notify the sender immediately and destroy the message.


[DUG]: Lost Inherited functionality - forms:

2003-05-27 Thread James Low
Title: Lost Inherited functionality - forms:





This has bugged me for ages, the list is quiet, so maybe someone can help.


I have a Base form with Buttons attached to an actionlist. In the base class I have a protected declaration as follows:


procedure TFrmEditorAbs.aOKExecute(Sender: TObject);
begin
    Assert(FData <> nil, 'FData not assigned');
    Assert(FDataBuffer <> nil, 'FDataBuffer not assigned');
    FData.Assign(FDataBuffer);
    FData.Dirty := true;
    ModalResult := mrOK;
end;


On the Base forms create I build the actions and link them to the OK button:


    FaOK := TAction.Create(FAL);
    FaOK.ActionList := FAL;
    FaOK.Caption := '&OK';
    FaOK.OnExecute := aOKExecute;
    btnOK.Action := FaOK;


This works fine. If I use Delphis IDE and inherit from this form all goes well and I can override aOKExecute in my descendent forms as required. BUT, it seems (D5) is if double click on the OK button in the descendant form, or generally fiddle around and then try to override the AOKExecute I am stuffed. AOkExecute is lost. The code never gets called. All because at some point I have double clicked said OK button and then removed the references from the code (to restore the code window to its prior pristine state). There must be an easy fix, but I usually revert to copying all my code to a new form ... tedious at best.

Any ideas about how this is fixed?


Thanks ...


Notice of Legal Status and Confidential Information: This electronic mail message and any accompanying attachments may contain information that is privileged and CONFIDENTIAL.  If you are not the intended recipient you are advised that any use, review, dissemination, distribution or reproduction of the information is strictly prohibited and may be unlawful.  If you have received this document in error, please notify the sender immediately and destroy the message.




RE: [DUG]: Syntax again please

2003-04-01 Thread James Low
Title: RE: [DUG]:  Syntax again please





Mmm. Some thoughts rather than a solution:


1) Can't fathom what sender is. What is sender (its usually a Tobject ... a pointer to a block of memory)? 
   TChecklistBox(CheckListBox12).index is probably an integer. Therefore is sender an Integer (seems odd). You can convert an Object to an Integer (an address ... but you seldom, if ever, would want to);

2) Can't see why you would TChecklistBox(CheckListBox12). CheckListBox12, I would think, is already a Tchecklistbox. The typecast is like saying Convert into an apple this apple. Why bother?

3) sender = TChecklistBox(...) is OK. That tests if the object I am working on over here, is exactly the same as the one you are working on over there. But, forget the typecast. If (sender is TChecklistBox) checks that sender is a TChecklistbox. ie This piece of fruit is a pipfruit.

Heres a translation for you:
Original: if  sender = TChecklistBox(CheckListBox12).index ..
Fruity translation: IF that_thing is_the convert_into_Pipfruit(This_banana)'s core ... 


Hope I have not completely misread your code snippet and that this helps.


Cheers.


-Original Message-
From: Alistair George [mailto:[EMAIL PROTECTED]]
Sent: Wednesday, 2 April 2003 8:24 a.m.
To: Multiple recipients of list delphi
Subject: [DUG]: Syntax again please



Hi can anyone tell me how to do this correctly:
//External procedure:
if (index = 1) then WriteSettings(Sender, '');


Writesettings:
if sender = TChecklistBox(CheckListBox12).index
//(want to check the index of the sender in above)


Cheers,
Al+


---
    New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
Notice of Legal Status and Confidential Information: This electronic mail message and any accompanying attachments may contain information that is privileged and CONFIDENTIAL.  If you are not the intended recipient you are advised that any use, review, dissemination, distribution or reproduction of the information is strictly prohibited and may be unlawful.  If you have received this document in error, please notify the sender immediately and destroy the message.




RE: [DUG]: Reporting ... D5, from TDataset

2003-03-30 Thread James Low
Title: Reporting ... D5, from TDataset



Thanks 
Stephen ... it had shone out already as a likely, so its nice to see it 
recommended.

  -Original Message-From: Stephen Barker 
  [mailto:[EMAIL PROTECTED]Sent: Monday, 31 March 2003 1:23 
  p.m.To: Multiple recipients of list delphiSubject: RE: 
  [DUG]: Reporting ... D5, from TDataset
  I 
  can recommend fastreport:
   
  http://www.fast-report.com/en/index.php
   
  regards,
  Steve
  
-Original Message-From: James Low 
[mailto:[EMAIL PROTECTED]Sent: Monday, 31 March 2003 
01:14 p.m.To: Multiple recipients of list 
delphiSubject: [DUG]: Reporting ... D5, from 
TDataset
I am stuck (happily) with D5 for an app for which I am 
wanting to build some reports (it can generate HTML, CSV reports already). I 
can supply the reporting tool with a TDataset that could be connected to 
pretty much anything as a source of its Data (CSV, XML, Interbase, MS SQL). 
I get the impression that Quickreports is worth sidestepping as its 
discontinued in D7 in favour of RAVE. RAVE seems modestly expensive alone 
(and since it comes with the next Delphi I am likely to purchase, a waste 
right now) so the question is ... what is a good, ideally cheap (cost, that 
is), reporting tool for D5 on that will be a wee bit future proof (I ask 
wistfully).
Any suggestions? 
Thanks 
James 
Notice of Legal Status and Confidential Information: This 
electronic mail message and any accompanying attachments may contain 
information that is privileged and CONFIDENTIAL.  If you are not the 
intended recipient you are advised that any use, review, dissemination, 
distribution or reproduction of the information is strictly prohibited and 
may be unlawful.  If you have received this document in error, please 
notify the sender immediately and destroy the message.
---Incoming mail is certified Virus Free.Checked by 
AVG anti-virus system (http://www.grisoft.com).Version: 6.0.465 / Virus 
Database: 263 - Release Date: 
25/03/2003

Notice of Legal Status and Confidential Information: This electronic mail message and any accompanying attachments may contain information that is privileged and CONFIDENTIAL.  If you are not the intended recipient you are advised that any use, review, dissemination, distribution or reproduction of the information is strictly prohibited and may be unlawful.  If you have received this document in error, please notify the sender immediately and destroy the message.


[DUG]: Reporting ... D5, from TDataset

2003-03-30 Thread James Low
Title: Reporting ... D5, from TDataset





I am stuck (happily) with D5 for an app for which I am wanting to build some reports (it can generate HTML, CSV reports already). I can supply the reporting tool with a TDataset that could be connected to pretty much anything as a source of its Data (CSV, XML, Interbase, MS SQL). I get the impression that Quickreports is worth sidestepping as its discontinued in D7 in favour of RAVE. RAVE seems modestly expensive alone (and since it comes with the next Delphi I am likely to purchase, a waste right now) so the question is ... what is a good, ideally cheap (cost, that is), reporting tool for D5 on that will be a wee bit future proof (I ask wistfully).

Any suggestions?


Thanks


James



Notice of Legal Status and Confidential Information: This electronic mail message and any accompanying attachments may contain information that is privileged and CONFIDENTIAL.  If you are not the intended recipient you are advised that any use, review, dissemination, distribution or reproduction of the information is strictly prohibited and may be unlawful.  If you have received this document in error, please notify the sender immediately and destroy the message.




RE: [DUG]: increment month name?

2003-03-12 Thread James Low



Ooops, 
reading more fully ... swap days for months and you're done:
 
const 
Days: array[1..7] of string 
=   ('Sunday', 
'Monday', 
'Tuesday',    
'Wednesday', 
'Thursday',    
'Friday', 'Saturday');
 
Function DayOfWeekName(inDayNumber : INteger) : 
String;Begin    Result := 
Days[inDayNumber];end;

  -Original Message-From: James Low 
  [mailto:[EMAIL PROTECTED]Sent: Thursday, 13 March 2003 1:23 
  p.m.To: Multiple recipients of list delphiSubject: RE: 
  [DUG]: increment month name?
  IncMonth (in sysutils)
  
-Original Message-From: Tracey Maule 
[mailto:[EMAIL PROTECTED]Sent: Thursday, 13 March 2003 1:09 
p.m.To: Multiple recipients of list delphiSubject: 
[DUG]: increment month name?
hi
 
Im creating an html report to show 
monthly records for the next_12_months
 
i take a couple of queries, which 
are bringing back records for a given month, starting with the current 
month
 
    
sMonthName := FormatDateTime('', Date);    //the name of 
the month for display purposes (thanks again 
ross)    
iThisMonth := MonthOf(Date);        
                
            
   //the number of the month for the querie's "extract(month 
from xx)" statement 
 
I fire one query, display the data, 
fire the other, display the data, then i need to loop round and do it all 
again for the next month.
 
so,.. i can easily increment the int 
month value, what im having trouble with is the string
 
is there a function which will take 
an int value and convert into a month 
name? OR
 
is there some smooth way to add 
exactly one month to Date() or Now()?        
            OR
 
am i going to have to do something 
tricky?
 

TraceySoftware Developer / Web 
MasterLogis[EMAIL PROTECTED](025) 
213-1065
  Notice of Legal Status and Confidential 
  Information: This electronic mail message and any accompanying attachments may 
  contain information that is privileged and CONFIDENTIAL. If you are not the 
  intended recipient you are advised that any use, review, dissemination, 
  distribution or reproduction of the information is strictly prohibited and may 
  be unlawful. If you have received this document in error, please notify the 
  sender immediately and destroy the 
message.

Notice of Legal Status and Confidential Information: This electronic mail message and any accompanying attachments may contain information that is privileged and CONFIDENTIAL.  If you are not the intended recipient you are advised that any use, review, dissemination, distribution or reproduction of the information is strictly prohibited and may be unlawful.  If you have received this document in error, please notify the sender immediately and destroy the message.


RE: [DUG]: increment month name?

2003-03-12 Thread James Low



IncMonth (in sysutils)

  -Original Message-From: Tracey Maule 
  [mailto:[EMAIL PROTECTED]Sent: Thursday, 13 March 2003 1:09 
  p.m.To: Multiple recipients of list delphiSubject: 
  [DUG]: increment month name?
  hi
   
  Im creating an html report to show 
  monthly records for the next_12_months
   
  i take a couple of queries, which are 
  bringing back records for a given month, starting with the current 
  month
   
      
  sMonthName := FormatDateTime('', Date);    //the name of 
  the month for display purposes (thanks again 
  ross)    
  iThisMonth := MonthOf(Date);        
                  
              
     //the number of the month for the querie's "extract(month 
  from xx)" statement 
   
  I fire one query, display the data, 
  fire the other, display the data, then i need to loop round and do it all 
  again for the next month.
   
  so,.. i can easily increment the int 
  month value, what im having trouble with is the string
   
  is there a function which will take an 
  int value and convert into a month 
  name? OR
   
  is there some smooth way to add 
  exactly one month to Date() or Now()?        
              OR
   
  am i going to have to do something 
  tricky?
   
  
  TraceySoftware Developer / Web 
  MasterLogis[EMAIL PROTECTED](025) 
  213-1065

Notice of Legal Status and Confidential Information: This electronic mail message and any accompanying attachments may contain information that is privileged and CONFIDENTIAL.  If you are not the intended recipient you are advised that any use, review, dissemination, distribution or reproduction of the information is strictly prohibited and may be unlawful.  If you have received this document in error, please notify the sender immediately and destroy the message.


RE: [DUG]: test - can you hear me?

2003-03-11 Thread James Low



Yep. 
That one got through.

  -Original Message-From: Tracey Maule 
  [mailto:[EMAIL PROTECTED]Sent: Wednesday, 12 March 2003 4:30 
  p.m.To: Multiple recipients of list delphiSubject: 
  [DUG]: test - can you hear me?
  im not getting any DUG mails today, 
  including the two i have sent.  Can u guys hear me??
   
  TraceySoftware Developer / Web 
  MasterLogis[EMAIL PROTECTED](025) 
  213-1065

Notice of Legal Status and Confidential Information: This electronic mail message and any accompanying attachments may contain information that is privileged and CONFIDENTIAL.  If you are not the intended recipient you are advised that any use, review, dissemination, distribution or reproduction of the information is strictly prohibited and may be unlawful.  If you have received this document in error, please notify the sender immediately and destroy the message.


RE: [DUG]: Freeing Stringlists.

2003-03-02 Thread James Low
Title: RE: [DUG]: Freeing Stringlists.



thanks 
for that ...think if I had thought about it for a moment I would have guessed as 
much :-)  .

  -Original Message-From: Andreas Toth 
  [mailto:[EMAIL PROTECTED]Sent: Monday, 3 March 2003 9:25 
  a.m.To: Multiple recipients of list delphiSubject: RE: 
  [DUG]: Freeing Stringlists.
  The 
  F-prefix has nothing to do with it being a form-level variable. The F 
  indicates that the variable is a class-level **field**, hence the 
  F-prefix. It's just a coincidence that "form" starts with 
  F.
   
   
  -Andreas
  
-Original Message-From: [EMAIL PROTECTED] 
[mailto:[EMAIL PROTECTED]On Behalf Of James 
LowSent: Monday, 3 March 2003 09:02To: Multiple 
recipients of list delphiSubject: RE: [DUG]: Freeing 
Stringlists.
The obvious questions are: 
1) What is the scope of the string lists? I am pretty sure 
that is they are form level the convention is to prefix them with an f ... 
are they form level?
2) Are you passing the string lists about and destroying 
them without knowing? 
I would pop a breakpoint on the first free and inspect the 
object prior to its destruction. Perhaps even place a watch on it. 

-Original Message- From: 
Alistair George [mailto:[EMAIL PROTECTED]] Sent: Saturday, 1 March 2003 1:17 p.m. To: 
Multiple recipients of list delphi Subject: [DUG]: 
Freeing Stringlists. 
Hi all. I have a lot of trouble 
freeing string list. they are created in formcreate: procedure TMainform.FormCreate(Sender: TObject); var fversion: string; begin   Appath := 
IncludeTrailingBackSlash(ExtractFilePath(Application.EXEName)); 
  mainform.HelpFile := appath + 
'back4winxp.hlp';   VCLzip1.DoProcessMessages 
:= true;   VCLzip1.FileOpenMode := fmOpenRead 
or fmShareDenyNone;   TheReasonSummary := 
Tstringlist.Create;   IncludeList := 
Tstringlist.Create;   ZIPfiles := 
Tstringlist.Create; 
But in either case below, they cause a memory error when I 
close the form if they have not been used (below are 
in FormClose): 
  try IncludeList.Free; except end;   try ZIPfiles.Free; except end;   
try  TheReasonSummary.Free; except end; 
  try     if 
sizeof(includelist) > 0 then IncludeList.Free;     if sizeof(ZIPfiles) > 0 then 
ZIPfiles.Free;     if 
sizeof(TheReasonSummary) > 0 then TheReasonSummary.Free;   except end; 
The only working way I find is as follows: IncludeList:=nil; ZIPfiles:=nil; 
TheReasonSummary:=nil; 
Comments 
--- 
    New Zealand Delphi Users group - Delphi 
List - [EMAIL PROTECTED]   
Website: http://www.delphi.org.nz To UnSub, 
send email to: [EMAIL PROTECTED] with body of 
"unsubscribe delphi" Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/ 
Notice of Legal Status and Confidential Information: This 
electronic mail message and any accompanying attachments may contain 
information that is privileged and CONFIDENTIAL.  If you are not the 
intended recipient you are advised that any use, review, dissemination, 
distribution or reproduction of the information is strictly prohibited and 
may be unlawful.  If you have received this document in error, please 
notify the sender immediately and destroy the 
message.

Notice of Legal Status and Confidential Information: This electronic mail message and any accompanying attachments may contain information that is privileged and CONFIDENTIAL.  If you are not the intended recipient you are advised that any use, review, dissemination, distribution or reproduction of the information is strictly prohibited and may be unlawful.  If you have received this document in error, please notify the sender immediately and destroy the message.


RE: [DUG]: Freeing Stringlists.

2003-03-02 Thread James Low
Title: RE: [DUG]:  Freeing Stringlists.





The obvious questions are:


1) What is the scope of the string lists? I am pretty sure that is they are form level the convention is to prefix them with an f ... are they form level?

2) Are you passing the string lists about and destroying them without knowing?


I would pop a breakpoint on the first free and inspect the object prior to its destruction. Perhaps even place a watch on it. 

-Original Message-
From: Alistair George [mailto:[EMAIL PROTECTED]]
Sent: Saturday, 1 March 2003 1:17 p.m.
To: Multiple recipients of list delphi
Subject: [DUG]: Freeing Stringlists.



Hi all.
I have a lot of trouble freeing string list. they are created in formcreate:
procedure TMainform.FormCreate(Sender: TObject);
var fversion: string;
begin
  Appath := IncludeTrailingBackSlash(ExtractFilePath(Application.EXEName));
  mainform.HelpFile := appath + 'back4winxp.hlp';
  VCLzip1.DoProcessMessages := true;
  VCLzip1.FileOpenMode := fmOpenRead or fmShareDenyNone;
  TheReasonSummary := Tstringlist.Create;
  IncludeList := Tstringlist.Create;
  ZIPfiles := Tstringlist.Create;


But in either case below, they cause a memory error when I close the form
if they have not been used (below are in FormClose):



  try IncludeList.Free; except end;
  try ZIPfiles.Free; except end;
  try  TheReasonSummary.Free; except end;


  try
    if sizeof(includelist) > 0 then IncludeList.Free;
    if sizeof(ZIPfiles) > 0 then ZIPfiles.Free;
    if sizeof(TheReasonSummary) > 0 then TheReasonSummary.Free;
  except end;



The only working way I find is as follows:
IncludeList:=nil;
ZIPfiles:=nil;
TheReasonSummary:=nil;



Comments


---
    New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
Notice of Legal Status and Confidential Information: This electronic mail message and any accompanying attachments may contain information that is privileged and CONFIDENTIAL.  If you are not the intended recipient you are advised that any use, review, dissemination, distribution or reproduction of the information is strictly prohibited and may be unlawful.  If you have received this document in error, please notify the sender immediately and destroy the message.




RE: [DUG]: Delphi7

2003-02-13 Thread James Low
The rxlib is alive at sourceforge (http://sourceforge.net/projects/rxlib/)
... though the packages are D6.
-Original Message-
From: Alistair George [mailto:[EMAIL PROTECTED]]
Sent: Friday, 14 February 2003 10:59 a.m.
To: Multiple recipients of list delphi
Subject: [DUG]: Delphi7


Hi. Now comes the crunch when I find for example, my rxlib does not work,
and it
wont work because the authors have stopped working on it since delphi 5.
Say I load a project and it reports missing components, please suggest a way
to
substitute those components the most expiditious way.
Thanks,
Alistair+

---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/



RE: [DUG]: uses

2003-02-12 Thread James Low
As far as I am aware the ' in ...' etc goes in the project uses clause.
Individual units have to be mentioned correctly in the project uses clause.
So:

add the Unit to the project (Project add file)
then get rid of the path stuff from the units uses clause.

regards




-Original Message-
From: Alistair George [mailto:[EMAIL PROTECTED]]
Sent: Thursday, 13 February 2003 4:06 p.m.
To: Multiple recipients of list delphi
Subject: [DUG]: uses


Hi all. What could be wrong here in the Uses:

  dfsStatusBar, mb in '../back4winxp/mb.pas';

mb throws an error: ',' or ';' expected, but 'IN' found.


thanks,
Al+

---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/



RE: [DUG]: Conditional statement

2002-12-19 Thread James Low
The button clicked is always going to be IN [mbYes, mbOK, mbCancel]. What
you are asking in your example is:

If the user clicked a button that is either (ie IN) Yes, OK, Cancel then ...

You should probably be testing if they clcked Yes, or OK only (IN [mrYes,
mrOk]).

So, from you example, just change the set to [mrYes, mrOk] and you'll
probably be right. IN is the same as 'Is a member of the set' ... the set
being the thing in the square brackets.

Regards

James

-Original Message-
From: Alistair George [mailto:[EMAIL PROTECTED]]
Sent: Friday, 20 December 2002 12:14 p.m.
To: Multiple recipients of list delphi
Subject: [DUG]: Conditional statement


Hi - is anyone still here??

I have a conditonal I have never used before. Please fill in the blank
following
lines as I cannot find any reference to using this IN

if MessageDlg('ZIPfile exists. What do you want to do', mtConfirmation,
[mbYes, mbOK, mbCancel], 0)
 in [mrYes, mrOk, mrCancel] // WHAT FOLLOWS HERE? how to use the WORD
results
example please.

---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
Notice of Legal Status and Confidential Information: This electronic mail
message and any accompanying attachments may contain information that is
privileged and CONFIDENTIAL.  If you are not the intended recipient you are
advised that any use, review, dissemination, distribution or reproduction of
the information is strictly prohibited and may be unlawful.  If you have
received this document in error, please notify the sender immediately and
destroy the message.
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/



RE: [DUG]: Docking forms to Panels in Code

2002-11-25 Thread James Low
Thanks. So simple.


-Original Message-
From: Allan Vergara [mailto:[EMAIL PROTECTED]]
Sent: 26 November 2002 10:13
To: Multiple recipients of list delphi
Subject: RE: [DUG]: Docking forms to Panels in Code


If you want to dock a form into the panel automatically, just do:

  Form1.BorderStyle:= bsNone;  //only if you want to hide the caption bar of
the form
  Form1.Parent:= Panel1;
  Form1.Show;

Gook luck!


---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
Notice of Legal Status and Confidential Information: This electronic mail
message and any accompanying attachments may contain information that is
privileged and CONFIDENTIAL.  If you are not the intended recipient you are
advised that any use, review, dissemination, distribution or reproduction of
the information is strictly prohibited and may be unlawful.  If you have
received this document in error, please notify the sender immediately and
destroy the message.
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/



[DUG]: Docking forms to Panels in Code

2002-11-25 Thread James Low

I have a form that I want to create docked inside a panel. I can create it,
drag it and have it dock, but am struggling somewhat to get it created and
docked automatically (ie all in code, no dragging by hand). 

I guess this is pretty simple stuff as the manual dragging stuff is
virtually code free ... but I cannot find an example and various attempts at
creating TDragDrop objects etc have failed. Can some help with a snippet of
code, or couple of quick pointers to get me headed in the right direction.

Thanks a lot


James

Notice of Legal Status and Confidential Information: This electronic mail
message and any accompanying attachments may contain information that is
privileged and CONFIDENTIAL.  If you are not the intended recipient you are
advised that any use, review, dissemination, distribution or reproduction of
the information is strictly prohibited and may be unlawful.  If you have
received this document in error, please notify the sender immediately and
destroy the message.
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/



RE: [DUG]: TEdit.Text

2002-11-24 Thread James Low
Ross, I tend to solve this problem by setting up form level Read, Write
properties that handle writing to the text box. ie:

Property myProperty : String Read GetmyProperty Write SetmyProperty;

myForm.SetmyProperty(Value : String);
Begin
myTextbox.text := Value;
end;

Your code example then becomes:

Readln(MyTextfile, myProperty);

Hope this helps.

Regards. 

-Original Message-
From: Ross Levis [mailto:[EMAIL PROTECTED]]
Sent: 23 November 2002 13:30
To: Multiple recipients of list delphi
Subject: [DUG]: TEdit.Text


I'm finding it a hassle that I can't pass TEdit.Text strings as Var 
parameters in procedures, and can't specify them in readln commands.

With Var parameters, I receive the compiler error "Constant Object 
cannot be passed as a var parameter.
With Readln(MyTextfile, MyEdit.Text), I receive the compiler error "Left 
side cannot be assigned to".

Is there anyway around these problems or am I stuck with using string 
variables and assigning the Text field from the string?

Cheers,
Ross.

---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
Notice of Legal Status and Confidential Information: This electronic mail
message and any accompanying attachments may contain information that is
privileged and CONFIDENTIAL.  If you are not the intended recipient you are
advised that any use, review, dissemination, distribution or reproduction of
the information is strictly prohibited and may be unlawful.  If you have
received this document in error, please notify the sender immediately and
destroy the message.
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/



RE: [DUG]: DBGRid ... which Cell is Active

2002-11-21 Thread James Low



Thanks. Infact it seems the best way to deal with 
inplace editors is to subclass a new grid with its own inplace editor. I think 
the inplace editor is a protected property. V. Simple. Alternatively, the 
OnDrawDataCell has a state parameter ... so when the cell is drawn I can check 
(gdFocused in State) and draw appropriately (using the Rect Param etc 
todetermine the bounds of my editor).
 
Thanks 
for the suggestion 
 
Regards
 

  -Original Message-From: Moises Lopez 
  [mailto:[EMAIL PROTECTED]]Sent: 21 November 2002 19:55To: 
  Multiple recipients of list delphiSubject: Re: [DUG]: DBGRid ... 
  which Cell is Active
  howdy there... 
  you could get the coordinates on the OnCellClick event sth. like 
   x := Mouse.CursorPos.X; y := Mouse.CursorPos.Y; 
  as for detecting which column.. uhh the OnCellClick event has a Column 
  parameter.. guess that works 
  hthmoises
  
  
  Do you Yahoo!?Yahoo! Mail 
  Plus - Powerful. Affordable. Sign up 
  now

Notice of Legal Status and Confidential Information: This electronic mail message and any accompanying attachments may contain information that is privileged and CONFIDENTIAL.  If you are not the intended recipient you are advised that any use, review, dissemination, distribution or reproduction of the information is strictly prohibited and may be unlawful.  If you have received this document in error, please notify the sender immediately and destroy the message.


[DUG]: DBGRid ... which Cell is Active

2002-11-20 Thread James Low
I am using a DBGrid and need to pop up a listbox in the correct location on
the OnEditButtonClick event. 
How do I get an X & Y coordinate from which to work out where my List
displays. Help suggests use the SelectedField which has an index ... but I
am sure there must be an easier way of working out where the button was
clicked?
Notice of Legal Status and Confidential Information: This electronic mail
message and any accompanying attachments may contain information that is
privileged and CONFIDENTIAL.  If you are not the intended recipient you are
advised that any use, review, dissemination, distribution or reproduction of
the information is strictly prohibited and may be unlawful.  If you have
received this document in error, please notify the sender immediately and
destroy the message.
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/



RE: [DUG]: Queer IDE behaviour Shift-Ctrl-C

2002-11-20 Thread James Low
Dunno, I am back working again ... just declaring all my new classes at the
beginning of the Interface section as opposed to the rear. It seemed to be
inserting the class implementation straight after the "I" in
"Implementation". Altogether weird, but I can work now so will ignore it
until it raises its head again.

Thanks

-Original Message-
From: Chris Reynolds [mailto:[EMAIL PROTECTED]]
Sent: 21 November 2002 15:06
To: Multiple recipients of list delphi
Subject: Re: [DUG]: Queer IDE behaviour Shift-Ctrl-C


Wild stab - something to do with Unicode?



>
>  I'm stumped. Using D5, Win 2000. Normally when I declare a class and type
>  Shift-Ctrl-C, the class implementation stub is inserted by Delphi. But
all
>  of a sudden without me doing anything (as far as I can see) I get the
>  following:
>   
>  Class Declaration:
>   
>  TVisStdFee_Create = class( TVisOwnedQryUpdate )
>private
>protected
>  functionAcceptVisitor : boolean ; override ;
>  procedure   Init; override ;
>  procedure   SetupParams ; override ;
>end ;
>   
>  Ctrl-Alt-C gives:
>   
>  Ifunction TVisStdFee_Create{ TVisStdFee_Create }
>   
>  .function TVisStdFee_Create.AcceptVisitor: boolean;
>  begin
>   
>  end;
>   
>  Aprocedure TVisStdFee_Create.Init;
>  begin
>inherited;
>   
>  end;
>   
>  ie extra Dots, and Letters stuffing things up a wee bit. Have rebooted to
no
>  avail. Any thoughts on how I might fix this without doing a reinstall?
>   
>  Thanks.
>   
>   
>
>
> Notice of Legal Status and Confidential Information: This electronic mail
> message and any accompanying attachments may contain information that is
> privileged and CONFIDENTIAL. If you are not the intended recipient you are
>
> advised that any use, review, dissemination, distribution or reproduction
of
> the information is strictly prohibited and may be unlawful. If you have
> received this document in error, please notify the sender immediately and
> destroy the message.



---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
Notice of Legal Status and Confidential Information: This electronic mail
message and any accompanying attachments may contain information that is
privileged and CONFIDENTIAL.  If you are not the intended recipient you are
advised that any use, review, dissemination, distribution or reproduction of
the information is strictly prohibited and may be unlawful.  If you have
received this document in error, please notify the sender immediately and
destroy the message.
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/



[DUG]: Queer IDE behaviour Shift-Ctrl-C

2002-11-20 Thread James Low



I'm 
stumped. Using D5, Win 2000. Normally when I declare a class and type 
Shift-Ctrl-C, the class implementation stub is inserted by Delphi. But all of a 
sudden without me doing anything (as far as I can see) I get the 
following:
 
Class 
Declaration:
 
TVisStdFee_Create = class( TVisOwnedQryUpdate 
)  private  protected    
function    AcceptVisitor : boolean ; override 
;    procedure   
Init    
; override ;    procedure   
SetupParams 
; override ;  end ;
 
Ctrl-Alt-C gives:
 
Ifunction TVisStdFee_Create{ TVisStdFee_Create 
}
 
.function TVisStdFee_Create.AcceptVisitor: 
boolean;begin
 
end;
 
Aprocedure TVisStdFee_Create.Init;begin  
inherited;
 
end;
 
ie 
extra Dots, and Letters stuffing things up a wee bit. Have rebooted to no avail. 
Any thoughts on how I might fix this without doing a 
reinstall?
 
Thanks.
 
 

Notice of Legal Status and Confidential Information: This electronic mail message and any accompanying attachments may contain information that is privileged and CONFIDENTIAL.  If you are not the intended recipient you are advised that any use, review, dissemination, distribution or reproduction of the information is strictly prohibited and may be unlawful.  If you have received this document in error, please notify the sender immediately and destroy the message.


RE: [DUG]: String equivalence?

2002-11-12 Thread James Low
Thanks ... problem solved.

'Firstname= V' <> 'Firstname=VV'

Moral ... spend the time building sensible test data!

-Original Message-
From: Paul Mckenzie [mailto:paul@;smss.org.nz]
Sent: 13 November 2002 15:46
To: Multiple recipients of list delphi
Subject: Re: [DUG]: String equivalence?


Can you view the actual characters - char by char - in the debugger
probably the best way I can think of
Are there control characters hidden in the strings (eg CR + LF in str1 & CR
in str2)
you could shove them into a byte array and check (code wise) byte be byte
are they the same type of strings WideChars vs chars etc.

HTH

Regards
Paul McKenzie
Analyst Programmer
SMSS ltd.

- Original Message -
From: "James Low" <[EMAIL PROTECTED]>
To: "Multiple recipients of list delphi" <[EMAIL PROTECTED]>
Sent: Wednesday, November 13, 2002 3:35 PM
Subject: [DUG]: String equivalence?


> I have a chunk of code protected with the assertion:
> assert(str1 = str2) ... (str1, str2 are String).
> These strings are derived by walking an object hierarchy and are pretty
big
> (each 500 odd words according to word).
>
> Problem is, visually they appear identical, word thinks they are identical
> (using compare documents ... ) but the assertion asserts they are not.
>
> If anyone know how I can work out what the difference between the strings
> actually is, and thus how I can efficiently solve this problem (the
objects
> were cloned before deriving the strings ... they should be identical).
>
> This is D5.
>
> Thanks
>
>
> James
> Notice of Legal Status and Confidential Information: This electronic mail
> message and any accompanying attachments may contain information that is
> privileged and CONFIDENTIAL.  If you are not the intended recipient you
are
> advised that any use, review, dissemination, distribution or reproduction
of
> the information is strictly prohibited and may be unlawful.  If you have
> received this document in error, please notify the sender immediately and
> destroy the message.
> --
-
> New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
>   Website: http://www.delphi.org.nz
> To UnSub, send email to: [EMAIL PROTECTED]
> with body of "unsubscribe delphi"
> Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/


---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
Notice of Legal Status and Confidential Information: This electronic mail
message and any accompanying attachments may contain information that is
privileged and CONFIDENTIAL.  If you are not the intended recipient you are
advised that any use, review, dissemination, distribution or reproduction of
the information is strictly prohibited and may be unlawful.  If you have
received this document in error, please notify the sender immediately and
destroy the message.
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/



[DUG]: String equivalence?

2002-11-12 Thread James Low
I have a chunk of code protected with the assertion:
assert(str1 = str2) ... (str1, str2 are String).
These strings are derived by walking an object hierarchy and are pretty big
(each 500 odd words according to word).

Problem is, visually they appear identical, word thinks they are identical
(using compare documents ... ) but the assertion asserts they are not.

If anyone know how I can work out what the difference between the strings
actually is, and thus how I can efficiently solve this problem (the objects
were cloned before deriving the strings ... they should be identical).

This is D5.

Thanks


James
Notice of Legal Status and Confidential Information: This electronic mail
message and any accompanying attachments may contain information that is
privileged and CONFIDENTIAL.  If you are not the intended recipient you are
advised that any use, review, dissemination, distribution or reproduction of
the information is strictly prohibited and may be unlawful.  If you have
received this document in error, please notify the sender immediately and
destroy the message.
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/



RE: [DUG]: TPagecontrol ... disabling a particular page

2002-10-31 Thread James Low
Thanks ... I will Owner Draw the disabled stuff then.

-Original Message-
From: Stacey Verner [mailto:stacey@;cjntech.co.nz]
Sent: 01 November 2002 15:17
To: Multiple recipients of list delphi
Subject: RE: [DUG]: TPagecontrol ... disabling a particular page


TabSheet.Enabled := False is much like Panel.Enabled := False. You can't
touch any of the controls, bot otherwise all else is the same. To Tab to
look disabled you have to do owner draw stuff, or look at third party
controls. To make it so that the user can see, but can't get to the
disabled page is another story entirely. You prabably have to look at
third party controls to do that.

Stacey

> -Original Message-
> From: James Low [mailto:James.Low@;bopdhb.govt.nz] 
> Sent: Friday, 1 November 2002 3:13 p.m.
> To: Multiple recipients of list delphi
> Subject: [DUG]: TPagecontrol ... disabling a particular page
> 
> 
> 
> D5, Win 2000 Pro ...
> 
> I have a form with a TPageControl (named TS). This has 6 
> pages. For some reason ts.Pages[4].Enabled := false 
> appears to do absolutely nothing. 
> ts.Pages[4].Tabvisible, by contrast does as expected and 
> hides the troublesome page. I expect ts.Pages[4].Enabled := 
> false to dim the page and prevent it becoming the activepage 
> but perhaps I expect too much??
> 
> Any thoughts before I dig a little deeper.
> 
> Thanks
> 
> 
> James
> 
> Notice of Legal Status and Confidential Information: This 
> electronic mail message and any accompanying attachments may 
> contain information that is privileged and CONFIDENTIAL.  If 
> you are not the intended recipient you are advised that any 
> use, review, dissemination, distribution or reproduction of 
> the information is strictly prohibited and may be unlawful.  
> If you have received this document in error, please notify 
> the sender immediately and destroy the message.
> --
> -
> New Zealand Delphi Users group - Delphi List - 
> [EMAIL PROTECTED]
>   Website: http://www.delphi.org.nz
> To UnSub, send email to: [EMAIL PROTECTED] 
> with body of "unsubscribe delphi"
> Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
> 
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
Notice of Legal Status and Confidential Information: This electronic mail
message and any accompanying attachments may contain information that is
privileged and CONFIDENTIAL.  If you are not the intended recipient you are
advised that any use, review, dissemination, distribution or reproduction of
the information is strictly prohibited and may be unlawful.  If you have
received this document in error, please notify the sender immediately and
destroy the message.
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/



[DUG]: TPagecontrol ... disabling a particular page

2002-10-31 Thread James Low

D5, Win 2000 Pro ...

I have a form with a TPageControl (named TS). This has 6 pages. For some
reason
ts.Pages[4].Enabled := false 
appears to do absolutely nothing. 
ts.Pages[4].Tabvisible, by contrast does as expected and hides the
troublesome page.
I expect ts.Pages[4].Enabled := false to dim the page and prevent it
becoming the activepage but perhaps I expect too much??

Any thoughts before I dig a little deeper.

Thanks


James

Notice of Legal Status and Confidential Information: This electronic mail
message and any accompanying attachments may contain information that is
privileged and CONFIDENTIAL.  If you are not the intended recipient you are
advised that any use, review, dissemination, distribution or reproduction of
the information is strictly prohibited and may be unlawful.  If you have
received this document in error, please notify the sender immediately and
destroy the message.
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/



RE: [DUG]: RTTI

2002-09-25 Thread James Low

Heres the code for a method in the Techinsite OPF that returns a list of
Published properties. The guts is in the typinfo unit --- haven't really
tried to understand it, seems straightforward enough though:

procedure tiGetPropertyNames( pPersistent : TPersistentClass ;
  pSL : TStringList ;
  pPropFilter : TTypeKinds = ctkSimple ) ;
var
  lCount : integer ;
  lSize  : integer ;
  lList  : PPropList ;
  i : integer ;
  lPropFilter : TTypeKinds ;
begin

  Assert( pSL <> nil, 'pSL not assigned.' ) ;
  lPropFilter := pPropFilter ;

  pSL.Clear ;

  lCount := GetPropList(pPersistent.ClassInfo, lPropFilter, nil);
  lSize := lCount * SizeOf(Pointer);
  GetMem(lList, lSize);
  try
GetPropList(pPersistent.ClassInfo, lPropFilter, lList);
for i := 0 to lcount - 1 do
  psl.add( lList[i].Name ) ;
  finally
FreeMem( lList, lSize ) ;
  end ;
end ;

Regards

-Original Message-
From: Rohit Gupta [mailto:[EMAIL PROTECTED]]
Sent: 26 September 2002 08:08
To: Multiple recipients of list delphi
Subject: [DUG]: RTTI


I cant seem to find it right nowbut how do I find out if a control has a

particular published property and how do I access it ?
Regards

Rohit

==

CFL - Computer Fanatics Ltd.  21 Barry's Point Road, AKL, New 
Zealand
PH(649) 489-2280 
FX(649) 489-2290
email [EMAIL PROTECTED]  or  [EMAIL PROTECTED]
==



---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
Notice of Legal Status and Confidential Information: This electronic mail
message and any accompanying attachments may contain information that is
privileged and CONFIDENTIAL.  If you are not the intended recipient you are
advised that any use, review, dissemination, distribution or reproduction of
the information is strictly prohibited and may be unlawful.  If you have
received this document in error, please notify the sender immediately and
destroy the message.
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/



[DUG]: Query Builder & List test

2001-09-16 Thread James Low


In D5 pro, how does one invoke the visual query builder utility? I have used
it in the past and thought I right clicked on the query component ... but it
aint there no more. Also - the list has been a bit quiet --- is anyone out
there?

TIA

James
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/



RE: [DUG]: TDataset - Recordcount

2001-08-23 Thread James Low



Thanks 
- figured there must be something.

  -Original Message-From: Guy Brown 
  [mailto:[EMAIL PROTECTED]]Sent: 24 August 2001 
  08:49To: Multiple recipients of list delphiSubject: RE: 
  [DUG]: TDataset - Recordcount
  There is a TDataSet.IsEmpty method.
   
  Guy
  
-Original Message-From: James Low 
[mailto:[EMAIL PROTECTED]]Sent: Friday, 24 August, 2001 8:45 
a.m.To: Multiple recipients of list delphiSubject: 
[DUG]: TDataset - Recordcount
If 
I have a TQuery with a select statement like 'Select ID from myTable where 
ID = 1' am I correct in assuming that the best way to verify that there is a 
record (or more than 1) with ID = 1 is to test the Recordcount 
property?
 
The reason I ask is that if all I am interested in 
is the fact that there are more than 0 records then the Recordcount method 
seems overkill (as at some point the entire recordset is navigated which in 
the case of a large recordset is time consuming).
 
...I guess I can override recordcount or implement 
my own method but before I do this thought I should double 
check.
 
Thanks


[DUG]: TDataset - Recordcount

2001-08-23 Thread James Low



If I 
have a TQuery with a select statement like 'Select ID from myTable where ID = 1' 
am I correct in assuming that the best way to verify that there is a record (or 
more than 1) with ID = 1 is to test the Recordcount 
property?
 
The 
reason I ask is that if all I am interested in is the fact that there are more 
than 0 records then the Recordcount method seems overkill (as at some point the 
entire recordset is navigated which in the case of a large recordset is time 
consuming).
 
...I 
guess I can override recordcount or implement my own method but before I do this 
thought I should double check.
 
Thanks


RE: [DUG]: DB Grid - non bound Columns.

2001-08-15 Thread James Low



Guess 
thats probably the best (simplest) solution. Probably a lot easier than tracking 
edits in a Text Grid too and allows editing (wheras a calculated field probably 
will not).
 
Thanks 
for the suggestions

  -Original Message-From: Robert Martin 
  [mailto:[EMAIL PROTECTED]]Sent: 16 August 2001 13:12To: 
  Multiple recipients of list delphiSubject: Re: [DUG]: DB Grid - non 
  bound Columns.
  You can set a coumn to read only in a 
  DBGrid.  As for displaying records not in a dataset you could actually 
  create a temp dataset that has all fields required.  Then copy back only 
  those you are interested in.
   
   
  Robert MartinSoftware EngineerWild Software Ltd
  
- Original Message - 
From: 
James Low 

To: Multiple 
recipients of list delphi 
Sent: Thursday, August 16, 2001 12:37 
PM
Subject: [DUG]: DB Grid - non bound 
Columns.

Is 
there an easy way with a DBGrid to include in it columns that are editable 
(a la the standard non DA Grid - they receive and display text) but have no 
underlying Dataset? ie for situations where the grid displays the datasets 
info for all but one or two columns (which can be manually dealt with before 
post or whatever)? 
 
Doesn't seem so, but thought I should ask before 
taking ther text grid approach.
 
Thanks


[DUG]: DB Grid - non bound Columns.

2001-08-15 Thread James Low



Is 
there an easy way with a DBGrid to include in it columns that are editable (a la 
the standard non DA Grid - they receive and display text) but have no underlying 
Dataset? ie for situations where the grid displays the datasets info for all but 
one or two columns (which can be manually dealt with before post or whatever)? 

 
Doesn't seem so, but thought I should ask before taking 
ther text grid approach.
 
Thanks


[DUG]: Frameworks - FYI

2001-08-09 Thread James Low

Anyone interested in Frameworks/ Business objects might want to check out
http://www.techinsite.com.au/ who have developed/ are developing an
opensource Object Persistence framework. One is also being designed at
Project Jedi ... all FYI.

Cheers
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/



RE: [DUG]: Business Objects/ Best Delphi Practise

2001-08-08 Thread James Low

Thanks Nirav. I am (have) leapt in but hope to learn a few strokes of
dog-paddle before I reach the deep end :)

-Original Message-
From: NIRAV KAKU [mailto:[EMAIL PROTECTED]]
Sent: 9 August 2001 15:42
To: Multiple recipients of list delphi
Subject: Re: [DUG]: Business Objects/ Best Delphi Practise


James,

I started reading about BOs a while back and I got interested in 
the concept. I also "tried" writing my own BOs with "custom" 
framework but wasn't too successful. Anyways, there are plethora 
of sites and books to read if you want but I discovered that one can 
only understand the idea of BOs IF one jumps into implementing it 
right away (or thats how it happened to me!). So go ahead and 
experiment and if you have problems, enough help is available from 
everyone here.  Right guys? ; )

regards,
NIRAV KAKU
On 9 Aug 01, at 11:12, James Low wrote:

> Does anyone have a reference to, or pearls of wisdom on best practise for
> Delphi Business app design. For example, how to best separate UI/DB and
> Business Logic (Datamodules vs Db access classes (see the link)) and smart
> approaches to building class hierarchies that promote code re-use and easy
> scaling/ modification.
>  
> Maybe you have some guidelines you follow/ or a set of standards/
reference
> book that might enlighten me. Seems to be little on the net.
>  
> FYI, here is an article that got me thinking:
> http://www.howtodothings.com/showarticle.asp?article=157
> <http://www.howtodothings.com/showarticle.asp?article=157> 
>  
> TIA
>  
>  
> 



- From the Shreemat Bhägwat Gïta -
'Sarcasm is the lowest form of wit.'
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED]
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/



RE: [DUG]: Unique Machine ID....

2001-08-08 Thread James Low



Would 
not a Guid do the trick?

  -Original Message-From: Donovan J. Edye 
  [mailto:[EMAIL PROTECTED]]Sent: 9 August 2001 
  15:09To: Multiple recipients of list delphiSubject: 
  [DUG]: Unique Machine IDG'Day All,I know this 
  one has been asked ad nauseum but.I need to come up with a unique 
  identifier for a machine. For my purposes a NIC address would be sufficient. I 
  am willing to wear the small chance that two network cards would have the same 
  NIC address. However the concern I do have is for a computer that does not 
  have a NIC but only a dial up connection. Obviously then there is no NIC 
  address? Can someone comment on that? Also, if anyone has a relatively simple 
  mechanism to obtain a unique ID for each machine I would be much 
  obliged.
  -- 
  Donovan 
  -- 
  Donovan J. Edye [www.edye.wattle.id.au] 
  Namadgi Systems [www.namsys.com.au] 
  Voice: +61 2 6285-3460 Fax: +61 2 6285-3459 TVisualBasic = 
  Class(None); Heard just before the 'Big Bang': "...Uh Oh" 
  -- 
  GXExplorer [http://www.gxexplorer.org] 
  Freeware Windows Explorer replacement. Also includes freeware delphi 
  windows explorer components. 
  --


RE: [DUG]: Business Objects/ Best Delphi Practise

2001-08-08 Thread James Low



Thanks 
Myles/ Neven. Its kind of a philosophical question as clearly the approach will 
differ depending on the scale of the app and the scope for 
reuse.
 
I'll 
have a look at EJB (is the JB Jacobson and Booch?) and reacquaint myself with 
UML. Any framework is, I agree, better than none so the object of this exercise 
is to track down one that readily translates to Delphi, is practical and 
suitable for small/ medium sized apps. Preferably one with some practical Delphi 
examples I can use to get a feel for how theory translates to practise 
(seemingly the most difficult part of this exercise).
 
Cheers
 
 
 -Original Message-From: 
Myles Penlington [mailto:[EMAIL PROTECTED]]Sent: 9 August 2001 
12:41To: Multiple recipients of list delphiSubject: RE: 
[DUG]: Business Objects/ Best Delphi Practise

  How 
  much time do you have and how big is your budget ...?
   
  The 
  article/series is a reasonable starting point, it is a case of horses for 
  courses (how big is your app - the documented one would be suitable 
  for small applications, and maybe medium size ones IMO)? It does not talk 
  about transactions at all (eg across objects)
   
  There is quite a bit of info available, but most is in books. I suggest 
  you do a lot of reading before attempting anything.
   
  The 
  EJB spec is another example for Business Objects (this has some interesting 
  features and does cover transactions in detail).-  Smalltalk is 
  regarded as the most mature OO language and there is a lot of info in this 
  arena.
   
  Have 
  a read of the Design Patterns book by Gamma et al, etc 
   
  Almost any framework is better than none, as it can be manipulated and 
  extended overtime.
   
  Personally I favour a OO framework, and I like several (most) aspects 
  of the EJB/Java application server concept.
   
  Beware that for a single project a OO framework could easily 
  consume 40%-60% of the budget/time of the project, so reuse really does 
  become a necessity in most cases.
   
  Myles.
   
  
-Original Message-From: James Low 
[mailto:[EMAIL PROTECTED]]Sent: Thursday, 9 August 2001 11:13 
a.m.To: Multiple recipients of list delphiSubject: 
[DUG]: Business Objects/ Best Delphi Practise
Does anyone have a reference to, or pearls of 
wisdom on best practise for Delphi Business app design. For example, how to 
best separate UI/DB and Business Logic (Datamodules vs Db access classes 
(see the link)) and smart approaches to building class hierarchies that 
promote code re-use and easy scaling/ modification.
 
Maybe you have some guidelines you follow/ or a set 
of standards/ reference book that might enlighten me. Seems to be little on 
the net.
 
FYI, here is an article that got me thinking: 
http://www.howtodothings.com/showarticle.asp?article=157
 
TIA
 
 


[DUG]: Business Objects/ Best Delphi Practise

2001-08-08 Thread James Low



Does 
anyone have a reference to, or pearls of wisdom on best practise for Delphi 
Business app design. For example, how to best separate UI/DB and Business Logic 
(Datamodules vs Db access classes (see the link)) and smart approaches to 
building class hierarchies that promote code re-use and easy scaling/ 
modification.
 
Maybe 
you have some guidelines you follow/ or a set of standards/ reference book that 
might enlighten me. Seems to be little on the net.
 
FYI, here is an article that got me thinking: http://www.howtodothings.com/showarticle.asp?article=157
 
TIA
 
 


RE: [DUG]: ComboBox help

2001-08-03 Thread James Low

Rather than assign the text property :

(1) Populate the combo with your items (Just as you would a StringList).
(2) Then to display the default value set the ItemIndex property. If you
want to display Tuesday, and the first item in the list is Sunday  then the
itemindex needs to be set to 2 (0 IS THE FIRST ITEM ... COMBOBOX1.ITEMINDEX
:= 2). If you don't know what number item you need, but know the string
value I am sure the combobox has a method to return ItemsIndex of that item.

I haven't used the combobox text propert but imagine you'd use it to select
substrings and to visibly manipulate the displayed item. Assigning to the
text property is probably not much different to trying to type the value in
by hand (not valid for read only).  

-Original Message-
From: Ross Levis [mailto:[EMAIL PROTECTED]]
Sent: 3 August 2001 10:51
To: Multiple recipients of list delphi
Subject: Re: [DUG]: ComboBox help


Thanks for your reply.

Yes I realise that but what I need to do is store the chosen selection (in a
text file), which happens to be a day of the week -- Monday - Sunday, and
next
time they load the app I want to default the ComboBox to the previous
setting.
I don't want the user typing in anything.  Is it not possible?  I thought it
would be common practice.

Cheers,
Ross.

Patrick Dunford wrote:

> The DropDownList style is for a fixed list of items. The Text property
only
> applies to the style of combobox where the user can actually type text in
at
> the top and it doesn't have to be an item in the list. with DropDownList
the
> item they choose has to be one in the list so they can't type in something
> that isn't in the list.
>
> > -Original Message-
> > From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On
> > Behalf Of Ross Levis
> > Sent: Thursday, 2 August 2001 13:36
> > To: Multiple recipients of list delphi
> > Subject: [DUG]: ComboBox help
> >
> >
> > I must be missing something.
> >
> > I need a ComboBox which is ReadOnly but also allows the text (or
> > selected item) to be assigned via code.  eg. Providing a default.
> > Currently when Style is csDropDownList, the Text property can not be
> > assigned.  What am I missing!
> >
> > Cheers,
> > Ross.
> >
> > --
> > -
> > New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
> >   Website: http://www.delphi.org.nz
> > To UnSub, send email to: [EMAIL PROTECTED]
> > with body of "unsubscribe delphi"
> > Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
> >
>
>
---
> New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
>   Website: http://www.delphi.org.nz
> To UnSub, send email to: [EMAIL PROTECTED]
> with body of "unsubscribe delphi"
> Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/

---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/



RE: [DUG]: DBCombobox - OnClick don't click

2001-07-31 Thread James Low

Thanks John. I think it was probably the wrong control to use anyway and
have instead populated a combobox to give me the effect I am after. The help
says the onclick will fire when esc, space etc are pressed  but not in my
case. Anyway, crisis averted - thanks for the feedback. 

-Original Message-
From: Manning, John [mailto:[EMAIL PROTECTED]]
Sent: 1 August 2001 14:09
To: Multiple recipients of list delphi
Subject: RE: [DUG]: DBCombobox - OnClick don't click


Hi James,

I made a simple test and the OnClick event fires OK - regardless of Style.

> When style = csDropdownList the underlying data is not visible

Here, the data in the underlying column is probably not in the Items list of
the combobox so won't appear.

Regards,
John

-Original Message-
From: James Low [mailto:[EMAIL PROTECTED]]
Sent: Tuesday, 31 July 2001 6:35 am
To: Multiple recipients of list delphi
Subject: [DUG]: DBCombobox - OnClick don't click


Simple problem - I have a DBCombobox connected properly to a
datasource/dataset containing one record. All I want to do is trap an
onClick event on this control but it just does not fire. When style =
csDropdownList the underlying data is not visible, when style = CSDropdown I
can see the record I am interested in. In both cases, no onClick fires no
matter what I do (space, escape, remove the control from its container etc).

Guess I am missing something fundamental but have no idea what? This is D5
Pro and I am running from within the IDE.

Some help would be appreciated - cheers.
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/



[DUG]: DBCombobox - OnClick don't click

2001-07-30 Thread James Low

Simple problem - I have a DBCombobox connected properly to a
datasource/dataset containing one record. All I want to do is trap an
onClick event on this control but it just does not fire. When style =
csDropdownList the underlying data is not visible, when style = CSDropdown I
can see the record I am interested in. In both cases, no onClick fires no
matter what I do (space, escape, remove the control from its container etc).

Guess I am missing something fundamental but have no idea what? This is D5
Pro and I am running from within the IDE.

Some help would be appreciated - cheers.
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/



RE: [DUG]: Static Vars

2001-07-25 Thread James Low

Dunno how C does it, but you can (apparently) declare a variable in the
procedures const section:

procedure Dowhatever;
const
  MyVariable : Integer = 0;
begin
  Inc(MyVariable);
end;

-Original Message-
From: James Sugrue [mailto:[EMAIL PROTECTED]]
Sent: 26 July 2001 14:44
To: Multiple recipients of list delphi
Subject: [DUG]: Static Vars


I should know this one but, does OP have an equivalent to C's static type ?
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/



RE: [DUG]: Changing forms to DLLs

2001-07-25 Thread James Low

I have Marco Cantus "Mastering Delphi 3" - its got a good section on
creating Dlls. Also, another great resource is the teachyourself everything
in 21 days: http://www.kaposnet.hu/books/tysdelphi4/ch19/ch19.htm

As far as I can see you have decision to make straight up. Are you going to
implement com (and thus other applications can learn abiout the objects in
your Dll) or implement a standard dll - in which case the calling program
needs to know the exact methods the dll exports. With the latter, creating a
dll is a matter of changing the program to a library, adding exports
statements and thats pretty much it. The former is a smidgen more complex,
but possibly more flexible in the end.

-Original Message-
From: Steve Peacocke [mailto:[EMAIL PROTECTED]]
Sent: 25 July 2001 17:35
To: Multiple recipients of list delphi
Subject: [DUG]: Changing forms to DLLs


I have been looking into converting our large application (10 megs plus 
even with packages separated) into an EXE with several main DLLs.

The problems are that the application calls several miscellaneous function 
units and objects that are shared by all the other units. I wish to grab 
several forms of a like nature into a single DLL and do this with between 
4-7 DLLs, all with a defined business group (eg, maintenance, entry and 
reports all pertaining to a particular section will be a single DLL).

I have been scanning the internet, some books and the help files to find a 
reasonable description of how to go about this (I have not done DLLs 
before). Everything I can find so far talks of total black box DLLs that 
are relatively easy to do.

Can anyone out there direct me to anything on the internet that will tell 
me how to go about this process? So much has been written, but it's like 
looking for a needle in a haystack.

Steve Peacocke

---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/



RE: [DUG]: TAPI - call monitoring; not really Delphi specific:

2001-07-19 Thread James Low

Yep, thats it - now I am back on track. Thanks heaps Nello, I shall have
fun.

-Original Message-
From: Nello Sestini [mailto:[EMAIL PROTECTED]]
Sent: 20 July 2001 13:49
To: Multiple recipients of list delphi
Subject: Re: [DUG]: TAPI - call monitoring; not really Delphi specific:


I think it goes like this:

you lineopen() lines you're interested in specifying the
LINECALLPRIVILEGE_MONITOR option

this makes you a "monitor" of the line and you will then
get LINE_CALLSTATE messages notifying you of state changes
on the line.

The LINE_CALLSTATE message passes a LINE_CALL structure
that has the HCALL in it.You can pass that handle to
lineGetCallStatus or lineGetCallInfo to get interesting
stuff about the current call on that line.

(Or something like that ...)

have fun

-ns


- Original Message -----
From: "James Low" <[EMAIL PROTECTED]>
To: "Multiple recipients of list delphi" <[EMAIL PROTECTED]>
Sent: Friday, July 20, 2001 6:58 AM
Subject: [DUG]: TAPI - call monitoring; not really Delphi specific:


> Is there any way for me to monitor the completion, and gather
information
> from, ALL calls made through a PABX, using TAPI (TAPI 2 compliant
PABX).
> Unfortunately I cannot use the SMDR Port but still need to catch all
calls,
> not just those initiated on our client machine(s) (through TAPI).
>
> I've scanned MSDN, the net and have no trouble with TAPI if I open a
line,
> and make the call. No problem, just watch the events and deal with as
> required. But now I need to centralise call monitoring, traditionally
done
> via the SMDR.
>
> Any clues at all appreciated.
>
> Cheers
> --
-
> New Zealand Delphi Users group - Delphi List -
[EMAIL PROTECTED]
>   Website: http://www.delphi.org.nz
> To UnSub, send email to: [EMAIL PROTECTED]
> with body of "unsubscribe delphi"
> Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/

---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/



[DUG]: TAPI - call monitoring; not really Delphi specific:

2001-07-19 Thread James Low

Is there any way for me to monitor the completion, and gather information
from, ALL calls made through a PABX, using TAPI (TAPI 2 compliant PABX).
Unfortunately I cannot use the SMDR Port but still need to catch all calls,
not just those initiated on our client machine(s) (through TAPI).

I've scanned MSDN, the net and have no trouble with TAPI if I open a line,
and make the call. No problem, just watch the events and deal with as
required. But now I need to centralise call monitoring, traditionally done
via the SMDR.

Any clues at all appreciated.

Cheers
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/



RE: [DUG]: Destroying Objects

2001-07-18 Thread James Low

I think (with few if any exceptions) the rule is that if you programatically
create the object, you destroy it. Visible components are destroyed by their
owner (unless you have created them (I think)).

-Original Message-
From: Ross Levis [mailto:[EMAIL PROTECTED]]
Sent: 19 July 2001 12:26
To: Multiple recipients of list delphi
Subject: [DUG]: Destroying Objects


A simple question.

When an application exits in the normal way, does it automatically
destroy all objects created at runtime?

Cheers,
Ross.


---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/



RE: [DUG]: Debug.print

2001-07-12 Thread James Low

Thanks Myles.

-Original Message-
From: Myles Penlington [mailto:[EMAIL PROTECTED]]
Sent: 13 July 2001 16:38
To: Multiple recipients of list delphi
Subject: RE: [DUG]: Debug.print


In D5 there is the "outputdebugstring()" - It is actually a windows API call
- you can see the output in the event log debug window.

Myles.



-Original Message-----
From: James Low [mailto:[EMAIL PROTECTED]]
Sent: Friday, 13 July 2001 4:31 p.m.
To: Multiple recipients of list delphi
Subject: [DUG]: Debug.print


quickie before home time ...
we don't have a debug.print (VB) type function hidden somewhere in Delphi do
we? Easy enough to mimic, but was wondering.

Cheers.
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/



[DUG]: Debug.print

2001-07-12 Thread James Low

quickie before home time ...
we don't have a debug.print (VB) type function hidden somewhere in Delphi do
we? Easy enough to mimic, but was wondering.

Cheers.
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/



RE: [DUG]: What could be wrong with this?

2001-07-11 Thread James Low

Try popping a breakpoint on the line:
Item := 

Do this by clicking in the left margin (a red spot will appear) after the
click.

Then run and when the program stops at that point, press F8 to step through
the code and see if that highlights the cause of the problem. Hover the
mouse over variables and you will see their current value.

Also, prior to running, it can be helpful to try a syntax check to trap
incompatible type issues etc.



-Original Message-
From: Ross Levis [mailto:[EMAIL PROTECTED]]
Sent: 12 July 2001 11:00
To: Multiple recipients of list delphi
Subject: [DUG]: What could be wrong with this?


procedure TCategoriesForm.CategoryListClick(Sender: TObject);
var
  item : integer;

begin
  item := CategoryList.itemindex; {CategoryList is a listbox with 2
items in it}

At runtine, when clicking on an item in the Listbox, the above line
produces an exception EConvertError 'is not a valid integer value'.
Can someone shed some light please.

Cheers,
Ross.


---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/



[DUG]: TvarRec : Array of Const

2001-07-10 Thread James Low

I want to modify a single item of an Array of TVarRec.

 I suspect I need to iterate through each element (except my nonidentical
element) and create a new Array to achieve this (I may need to change one
element before supplying the array to the TDataset.InsertRecord method). I
assume that SecondArray[1] := FirstArray[1] will copy elements across arrays
and that for the nonidentical element, rather than SecondArray[X] := 123, I
need to pass it a TvarRec.

Am I on the correct path here? Any pointers would be appreciated before I
trot down this path.

Thanks

James Low
Programmer
Baycom Software Laboratories
ph: 07 575 6602, fax 07 575 6616


---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/



RE: Listbox items (Was: Re: [DUG]: array of TStringList)

2001-07-08 Thread James Low

I think ... the main advantage of Objects over say record structures is that
they are allocated on the heap and thus you can have as many of them as
memory available on the system. The other advantage is that objects have
their own methods. Therefore an object can be far more self-contained and
easier to maintain in a large program. With a simple structure and small
program you can probably get away comfortably with arrays of records ... as
things get more complicated you'll probably find it far easier, and your
code way more extendable if you use lists of objects.

-Original Message-
From: Ross Levis [mailto:[EMAIL PROTECTED]]
Sent: 6 July 2001 23:33
To: Multiple recipients of list delphi
Subject: Re: Listbox items (Was: Re: [DUG]: array of TStringList)


Thanks James, Ben & Reg.  It's looks rather messy to me.  I didn't realise
you
can create numerous duplicate objects with the same name.  Is there any
advantage to using a Record object as opposed to a class(TObject)?

Ross.

James Low wrote:

> Thanks Ben ...
>
> -Original Message-
> From: Ben Taylor [mailto:[EMAIL PROTECTED]]
> Sent: 6 July 2001 17:01
> To: Multiple recipients of list delphi
> Subject: RE: Listbox items (Was: Re: [DUG]: array of TStringList)
>
> > AddObject('Somestring to display', myObject);
> > myObject.Free; //the list owns a reference to it now
>
> you _really_ dont want to do this.. the list now has a pointer to the
> object, but its still the same object. if you do the free, then the
> list holds an invalid pointer.
>
> > myObject := Listbox1.Objects[ListBox1.Listindex];
> this wont compile. you'll need to cast the TObject pointer to the
> correct type:
>
> myObject := tRossesObject(Listbox1.Objects[ListBox1.Listindex]);
>
> that should work better..
>
> there are 'nicer' OO ways to do this but it's friday and i'm going now
> :-)
>
> __
> Do You Yahoo!?
> Get personalized email addresses from Yahoo! Mail
> http://personal.mail.yahoo.com/
>
---
> New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
>   Website: http://www.delphi.org.nz
> To UnSub, send email to: [EMAIL PROTECTED]
> with body of "unsubscribe delphi"
>
---
> New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
>   Website: http://www.delphi.org.nz
> To UnSub, send email to: [EMAIL PROTECTED]
> with body of "unsubscribe delphi"

---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"



RE: Listbox items (Was: Re: [DUG]: array of TStringList)

2001-07-05 Thread James Low

Thanks Ben ... 

-Original Message-
From: Ben Taylor [mailto:[EMAIL PROTECTED]]
Sent: 6 July 2001 17:01
To: Multiple recipients of list delphi
Subject: RE: Listbox items (Was: Re: [DUG]: array of TStringList)


> AddObject('Somestring to display', myObject);
> myObject.Free; //the list owns a reference to it now

you _really_ dont want to do this.. the list now has a pointer to the
object, but its still the same object. if you do the free, then the
list holds an invalid pointer.

> myObject := Listbox1.Objects[ListBox1.Listindex];
this wont compile. you'll need to cast the TObject pointer to the
correct type:

myObject := tRossesObject(Listbox1.Objects[ListBox1.Listindex]);

that should work better..

there are 'nicer' OO ways to do this but it's friday and i'm going now
:-)



__
Do You Yahoo!?
Get personalized email addresses from Yahoo! Mail
http://personal.mail.yahoo.com/
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"



RE: Listbox items (Was: Re: [DUG]: array of TStringList)

2001-07-05 Thread James Low

I dont have Delphi in front of me but here goes:


Type //where the objects etc are declared in your unit
tRossesObject = Class(TObject)
FieldOne : Integer;
FieldTwo : String
...
end;

So you now have the template for an object.

Now, in the loop you populate your Listbox, or each time you add an item you
want to:

Var 
myObject : TRossObject;

Begin
myObject := TRossesObject.Create;
myObject.FieldOne := 1;
myObject.FieldTwo := 'Two';

With ListBox1 do 
AddObject('Somestring to display', myObject);
myObject.Free; //the list owns a reference to it now

end;

The flip side is retrieving the object which can be accessed (wish I had the
IDE now) through the ListBoxes Objects collection (ie something like):

myObject := Listbox1.Objects[ListBox1.Listindex];
TextBox1.text = InttoStr(myObject.field1);

Please excuse the liberal and no doubt offensive to some VB 'ness of some of
the above. Hopefully enough to get you going though.

Call me in the weekend if you want a hand.
-Original Message-
From: Ross Levis [mailto:[EMAIL PROTECTED]]
Sent: 6 July 2001 16:30
To: Multiple recipients of list delphi
Subject: Re: Listbox items (Was: Re: [DUG]: array of TStringList)


The Delphi book I have doesn't explain this item object linking very well at
all.  I
presume I create an object as needed when a new item is added to the list.
How do I
do that considering I have to give each object a name?  A small example
would be
appreciated.

Thanks,
Ross.

NIRAV KAKU wrote:

> Objects property would be a good choice.
>
> regards,
> NIRAV KAKU
>
> On 6 Jul 01, at 12:22, Ross Levis wrote:
>
> > I have another newbie question.  What is the standard way of internally
storing
> > data attached to a listbox item.
> > ie. I have a listbox which has user defined items that can be added &
deleted.
> > For each of the items I need to display/store particular information.
> > eg. On the left I have a Listbox containing account numbers and on the
right I
> > have edit boxes containing Name, Address etc.
> >
> > Can I use the Items.Objects property to link each item to another object
in
> > this case?  Or do I simply store the Name/Address data in a string array
> > indexed on the ItemIndex.  That creates a problem when the user deletes
an item
> > >from the list -- I would have to move the data around in the array
which I
> > would rather not do.  Maybe I should use the item Tag property to store
the
> > index of the related array data.
> >
> > (BTW: The data will eventually be saved to a text file)
> >
> > Thanks,
> > Ross.
>
> - From the Shreemat Bhägwat Gïta -
> 'Sarcasm is the lowest form of wit.'
>
---
> New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
>   Website: http://www.delphi.org.nz
> To UnSub, send email to: [EMAIL PROTECTED]
> with body of "unsubscribe delphi"

---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED]
with body of "unsubscribe delphi"



RE: [DUG]: Connecting to Interbase

2001-06-21 Thread James Low



No I 
didn't as the DB was in a CASE tool and I just recompiled it to IB (using ODBC). 
The rest was pretty straight-forward. I built macros to create the stored 
procedures, manually changed the database objects and it seemed (seems) to 
work.

  -Original Message-From: Mark Howard 
  [mailto:[EMAIL PROTECTED]]Sent: 22 June 2001 10:17To: 
  Multiple recipients of list delphiSubject: Re: [DUG]: Connecting to 
  Interbase
  James
  Thanks for the detail.  It gives me a lot of confidence 
  that I'm (probably) heading down the right track.
  Did you use the Pdox2IBPump? because I've found some bugs in 
  it which the author (Kiwi Helen Borrie) has been working on for me as recently 
  as last night - to do with converting dates.
  Mark
  
- Original Message - 
From: 
James Low 

To: Multiple 
recipients of list delphi 
Sent: Friday, June 22, 2001 8:59 
AM
Subject: RE: [DUG]: Connecting to 
Interbase

Good. There are two main methods of access in IBO; 
one designed to maintain compatibility with BDE (the access methods are 
like-named) and another which apparently is more powerful but you lose that 
relatively seemless BDE interchangeability. I am using the former. I am 
avoiding the supplied controls (QBE data aware dbedits eg) so I can leap 
back to BDE if needed without too many tears. But if I were to use these 
extras life would be astoundingly simple (ie searching a dataset using my 
data entry form by changing one property).
 
To 
date I've had no dramas at design or runtime. There are some pretty nifty 
features when working with datasets such as (in design mode) the ability to 
execute the query and then populate a table (great for lookup tables), in 
the query builder defining what happens to null values/ force case 
sensitivity/ insensitivity etc. Everything seems to work, error messages 
make sense and I work just like with the BDE. And I'm access the DB 
natively, so I guess there will be subtle performance advantages. My only 
gripe (a small one) is having to pay for the manual, which to date I haven't 
needed.
 
My 
main objective in going to IBO was making the most of a more scalable DB (IB 
over Pdox), fixing the stupid stored procedure problem I was having and 
being able, relatively easily, to be able to port back to BDE for whatever 
reason. In those respects its a success - I'll let you know when I get 
tripped up but I have a feeling you will be waiting a while : 
).

  -Original Message-From: Mark Howard 
  [mailto:[EMAIL PROTECTED]]Sent: 21 June 2001 
  17:23To: Multiple recipients of list delphiSubject: 
  Re: [DUG]: Connecting to Interbase
  James
  Would be interested to hear how your move to IBO 
  went.
  Mark
  - Original Message ----- 
      
From: 
James Low 

To: Multiple 
recipients of list delphi 
Sent: Thursday, June 21, 2001 3:42 
PM
Subject: RE: [DUG]: Connecting to 
Interbase

Yep - that is what I discovered too. At the 
point, and after finding a few limitations with manipulation of stored 
procedures I moved to IBO.

  -Original Message-From: Mark Howard [mailto:[EMAIL PROTECTED]]Sent: 
  21 June 2001 14:57To: Multiple recipients of list 
  delphiSubject: [DUG]: Connecting to 
  Interbase
  Hi 
  With my Paradox database I could just use an 
  OpenFileDialog to point to a file in the Database directory to set 
  this before opening tables.  ie I did not have to have an Alias 
  set up in the BDE.
   
  It seems that to connect to Interbase (at this stage 
  using the BDE) I must have an Alias set up.
   
  Can someone confirm this for me please (it might 
  save a lot of time wasting for me trying to do what can't be 
  done)
   
  TIA
   
  Mark


RE: [DUG]: Connecting to Interbase

2001-06-21 Thread James Low



Good. 
There are two main methods of access in IBO; one designed to maintain 
compatibility with BDE (the access methods are like-named) and another which 
apparently is more powerful but you lose that relatively seemless BDE 
interchangeability. I am using the former. I am avoiding the supplied controls 
(QBE data aware dbedits eg) so I can leap back to BDE if needed without too many 
tears. But if I were to use these extras life would be astoundingly simple (ie 
searching a dataset using my data entry form by changing one 
property).
 
To 
date I've had no dramas at design or runtime. There are some pretty nifty 
features when working with datasets such as (in design mode) the ability to 
execute the query and then populate a table (great for lookup tables), in the 
query builder defining what happens to null values/ force case sensitivity/ 
insensitivity etc. Everything seems to work, error messages make sense and I 
work just like with the BDE. And I'm access the DB natively, so I guess there 
will be subtle performance advantages. My only gripe (a small one) is having to 
pay for the manual, which to date I haven't needed.
 
My 
main objective in going to IBO was making the most of a more scalable DB (IB 
over Pdox), fixing the stupid stored procedure problem I was having and being 
able, relatively easily, to be able to port back to BDE for whatever reason. In 
those respects its a success - I'll let you know when I get tripped up but I 
have a feeling you will be waiting a while : ).

  -Original Message-From: Mark Howard 
  [mailto:[EMAIL PROTECTED]]Sent: 21 June 2001 17:23To: 
  Multiple recipients of list delphiSubject: Re: [DUG]: Connecting to 
  Interbase
  James
  Would be interested to hear how your move to IBO 
  went.
  Mark
  - Original Message - 
  
    From: 
James Low 

To: Multiple 
recipients of list delphi 
Sent: Thursday, June 21, 2001 3:42 
PM
Subject: RE: [DUG]: Connecting to 
Interbase

Yep - that is what I discovered too. At the point, 
and after finding a few limitations with manipulation of stored procedures I 
moved to IBO.

  -Original Message-From: Mark Howard [mailto:[EMAIL PROTECTED]]Sent: 
  21 June 2001 14:57To: Multiple recipients of list 
  delphiSubject: [DUG]: Connecting to 
  Interbase
  Hi 
  With my Paradox database I could just use an 
  OpenFileDialog to point to a file in the Database directory to set this 
  before opening tables.  ie I did not have to have an Alias set up in 
  the BDE.
   
  It seems that to connect to Interbase (at this stage 
  using the BDE) I must have an Alias set up.
   
  Can someone confirm this for me please (it might save a 
  lot of time wasting for me trying to do what can't be done)
   
  TIA
   
  Mark


RE: [DUG]: Connecting to Interbase

2001-06-20 Thread James Low



Yep - 
that is what I discovered too. At the point, and after finding a few limitations 
with manipulation of stored procedures I moved to IBO.

  -Original Message-From: Mark Howard 
  [mailto:[EMAIL PROTECTED]]Sent: 21 June 2001 14:57To: 
  Multiple recipients of list delphiSubject: [DUG]: Connecting to 
  Interbase
  Hi 
  With my Paradox database I could just use an OpenFileDialog 
  to point to a file in the Database directory to set this before opening 
  tables.  ie I did not have to have an Alias set up in the 
  BDE.
   
  It seems that to connect to Interbase (at this stage using 
  the BDE) I must have an Alias set up.
   
  Can someone confirm this for me please (it might save a lot 
  of time wasting for me trying to do what can't be done)
   
  TIA
   
  Mark


RE: [DUG]: Use of TQuery's

2001-06-18 Thread James Low



Well, 
heres a start from someone not really in the know either:
 
    1) I have a query for each sensible 
entity (Address, Contact mechanism, Bill, Job). That query has an 
sqlstring.
    2) Where there is an obvious 
relationship between entities and if using dataaware controls I'll link child 
queries to their parent with parametrised queries. Otherwise I might build an 
sql string to represent the child.
    3) I have one Utility query which I 
create odds and sodds queries, such as for establishing if records exist/ dont 
exist etc.
 
Therefore ... a mix, the goal being ease of 
maintaintenance, clear logic and not dragging too much data onto the client. 
But, sometimes its easier to build queries in code - and more transparent so I 
guess its horses for courses.

  -Original Message-From: Mark Howard 
  [mailto:[EMAIL PROTECTED]]Sent: 19 June 2001 13:49To: 
  Multiple recipients of list delphiSubject: [DUG]: Use of 
  TQuery's
  Hi
   
  I'm about to embark on a conversion from Paradox to IB and I 
  have a question about common practice in terms of the use of TQuery's in place 
  of TTables.
   
  My current app opens a TTable, for each Paradox table that 
  it uses, at startup and closes them all at closedown.
   
  There appear to be 3 general ways that one can use 
  TQuery's:
  1.  Just like a TTable, with a Select * from MyTable in 
  the SQL property (at one extreme);
  2.  As a purely open Query with nothing in either 
  parameters or SQL, relying on code supplied by the app at runtime.  In 
  this case one TQuery could be used to access several files at different 
  times.
  3.  With both SQL and parameters specified at design 
  time, in which case the TQuery is for a predetermined purpose ( and attached 
  to a specific file).
   
  In the absence of ANY knowledge about what is normal, I'd be 
  grateful to hear of any general guidelines on what approaches are adopted by 
  those in the know.
   
  TIA
   
  Mark


RE: [DUG]: [DUB-DB] trigger with parameter

2001-06-12 Thread James Low

If you mean stored procedure then I think you will find an example in the
help for CreateParam. Basically - Clear preexisting parameters, Create a
parameter, with Param[0] set its value.

-Original Message-
From: Jim Zheng [mailto:[EMAIL PROTECTED]]
Sent: 13 June 2001 15:11
To: Multiple recipients of list delphi
Subject: [DUG]: [DUB-DB] trigger with parameter


Hi all,

Does anyone know how to pass a value ( not a field in the update table) into
a trigger? I am trying to build a MS SQL server version of our product.

Cheers,

Jim

---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"



RE: [DUG]: TToolbar button resize glitch - clarification

2001-06-12 Thread James Low

Thanks. I can see now that VB does the same thing and that the menus I am
used to looking at are probably coolbars. 

-Original Message-
From: Alan Rose [mailto:[EMAIL PROTECTED]]
Sent: 13 June 2001 09:07
To: Multiple recipients of list delphi
Subject: RE: [DUG]: TToolbar button resize glitch - clarification


That's the toolbars normal behaviour with a ttoolbutton. For unique button
sizes try using tspeedbuttons instead

-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On
Behalf Of James Low
Sent: Wednesday, June 13, 2001 9:00 AM
To: Multiple recipients of list delphi
Subject: RE: [DUG]: TToolbar button resize glitch - clarification


Ooops - unclear; when I resize the just added button (not the toolbar
itself).

Again - thanks.

-Original Message-
From: James Low [mailto:[EMAIL PROTECTED]]
Sent: 13 June 2001 08:50
To: Multiple recipients of list delphi
Subject: [DUG]: TToolbar button resize glitch


When I add a button (right mouse, add button) to a ttoolbar and resize it,
all the other buttons resize also. Is this a known problem or is there a
magic property on the toolbar I need to set to stop this spectacularly
useless behaviour. This is all design time, Win98 2ed, D5 PRO (latest sp).

In anticipation thanks (as in interem measure I am using a panel and
buttons).
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED]
with body of "unsubscribe delphi"
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED]
with body of "unsubscribe delphi"

---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"



RE: [DUG]: TToolbar button resize glitch - clarification

2001-06-12 Thread James Low

Ooops - unclear; when I resize the just added button (not the toolbar
itself).

Again - thanks.

-Original Message-
From: James Low [mailto:[EMAIL PROTECTED]]
Sent: 13 June 2001 08:50
To: Multiple recipients of list delphi
Subject: [DUG]: TToolbar button resize glitch


When I add a button (right mouse, add button) to a ttoolbar and resize it,
all the other buttons resize also. Is this a known problem or is there a
magic property on the toolbar I need to set to stop this spectacularly
useless behaviour. This is all design time, Win98 2ed, D5 PRO (latest sp).

In anticipation thanks (as in interem measure I am using a panel and
buttons).
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"



[DUG]: TToolbar button resize glitch

2001-06-12 Thread James Low

When I add a button (right mouse, add button) to a ttoolbar and resize it,
all the other buttons resize also. Is this a known problem or is there a
magic property on the toolbar I need to set to stop this spectacularly
useless behaviour. This is all design time, Win98 2ed, D5 PRO (latest sp).

In anticipation thanks (as in interem measure I am using a panel and
buttons).
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"



RE: Re: Re: [DUG]: Tuning SQL

2001-06-10 Thread James Low

We develop in it in VB - price keeps going up. Yep, used to be Btrieve.
Until recently ODBC driver would not support Memo fields. Appears to have
waning support. If you have any specific questions I'll find some answers
for you - maybe just e-mail direct. I note there seem to be a few Delphi
resources for it ... but my gut feeling is don't bother.

 

-Original Message-
From: Nahum Wild [mailto:[EMAIL PROTECTED]]
Sent: 11 June 2001 14:02
To: Multiple recipients of list delphi
Subject: RE: Re: Re: [DUG]: Tuning SQL


Does anybody know anything about Pervasive.SQL ???  My boss wants me to look
at it and the only info I can quickly find about it is from the makers of
it.  It used to be called 'Btrieve' or something like that.

Cheers in advance,
Nahum.

> -Original Message-
> From: Sandeep [mailto:[EMAIL PROTECTED]]
> Sent: Monday, June 11, 2001 13:53 PM
> To: Multiple recipients of list delphi
> Subject: Re: Re: Re: [DUG]: Tuning SQL
> 
> 
> On 11 Jun 2001, at 13:05, Neven MacEwan wrote:
> 
> > Sandeep
> > 
> > Do you want URL's where PostgreSQL outperforms Oracle?
> > Anyway I thought we were comparing Open Source DB's
> 
> U mean to say PostgreSQL is the best RDBMS around? 
> 
> Sandeep
> 
> Software Developer
> CFL
> [EMAIL PROTECTED]
> http://www.cfl.co.nz
> 
> --
> -
> New Zealand Delphi Users group - Delphi List - 
> [EMAIL PROTECTED]
>   Website: http://www.delphi.org.nz
> To UnSub, send email to: [EMAIL PROTECTED] 
> with body of "unsubscribe delphi"
> 
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"



RE: Re: Re: [DUG]: Tuning SQL

2001-06-10 Thread James Low

Suspect it doesn't work on 95/98 systems?

-Original Message-
From: Neven MacEwan [mailto:[EMAIL PROTECTED]]
Sent: 11 June 2001 12:11
To: Multiple recipients of list delphi
Subject: Re: Re: Re: [DUG]: Tuning SQL


> Firebird might be worth looking into if you don't want to shell out 
> bucks on licensing, but I guess if you want to maintain future 
> compatibility you'll have to pay for IB>6. 

So why not PostgreSQL? 

Neven

---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"



RE: Re: [DUG]: Tuning SQL

2001-06-10 Thread James Low

Thanks for that Nic ... I stand corrected.

-Original Message-
From: Nic Wise [mailto:[EMAIL PROTECTED]]
Sent: 11 June 2001 11:27
To: Multiple recipients of list delphi
Subject: Re: Re: [DUG]: Tuning SQL


Nope, the code has been bought back inhouse for IB6.x and beyond. What was
released as free and opensource is still that way - future stuff may not be.

Firebird <> IB - it might have at v6.0, but not beyond that - the code
forked almost immediatly.

Nic.

- Original Message -
From: "James Low" <[EMAIL PROTECTED]>
To: "Multiple recipients of list delphi" <[EMAIL PROTECTED]>
Sent: Monday, June 11, 2001 11:23 AM
Subject: RE: Re: [DUG]: Tuning SQL


> Yes it is (I thought) - and theres the Firebird project stemming from it.
As
> I understand it the only difference between the Open source version is
that
> Borland wont give it their certification - you are free to buy licences
and
> get the certification if you so require.
>
> -Original Message-
> From: Corey Murtagh [mailto:[EMAIL PROTECTED]]
> Sent: 11 June 2001 11:03
> To: Multiple recipients of list delphi
> Subject: Re: Re: [DUG]: Tuning SQL
>
>
> "Neven MacEwan" <[EMAIL PROTECTED]> wrote on 11/06/2001 10:09:02:
> >
> >Mark
> >
> >> I understand that I can distribute Interbase for 6 simultaneous
> >> users from my existing D5 Pro license.
> >
> >I didn't think so..but i could be wrong, I would suggest MSDE here but
> >the anti M$ crowd
> >would prob shout me down (even if it is free)
>
> Uh... isn't Interbase6 free now?  Didn't it go open-source?
>
> --
> Corey Murtagh
> The Electric Monk
> "Quidquid latine dictum sit, altum viditur!"
>
> --
-
> New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
>   Website: http://www.delphi.org.nz
> To UnSub, send email to: [EMAIL PROTECTED]
> with body of "unsubscribe delphi"
> --
-
> New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
>   Website: http://www.delphi.org.nz
> To UnSub, send email to: [EMAIL PROTECTED]
> with body of "unsubscribe delphi"
>

---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"



RE: Re: [DUG]: Tuning SQL

2001-06-10 Thread James Low

Correct - the issue being that an ODBC driver has been written but isn't
free (but not expensive either).  It will be free when the developer who
wrote it has covered his costs.

I suspect the Open Source (IBPhoenix) and Borland versions are otherwise
identical but whether an opensource db suits a commercial product is a
matter of choice and convention. Plenty of people buy MS products when
competing products offer the features they need and are cheaper/ more
reliable. With IB you can give users the choice of paying or not but you
cannot give it the MS logo.

Personally, I think choice is great and IB stacks up pretty well for most
applications.

-Original Message-
From: Phil Scadden [mailto:[EMAIL PROTECTED]]
Sent: 11 June 2001 11:15
To: Multiple recipients of list delphi
Subject: RE: Re: [DUG]: Tuning SQL


> Yes it is (I thought) - and theres the Firebird project stemming from it.
As
> I understand it the only difference between the Open source version is
that
> Borland wont give it their certification - you are free to buy licences
and
> get the certification if you so require.

And the issue over an ODBC driver for it. You can buy the one that ships
with
Borland Interbase separately however.


--
Phil Scadden, Institute of Geological and Nuclear Sciences
41 Bell Rd South, PO Box 30368, Lower Hutt, New Zealand
Ph +64 4 5704821, fax +64 4 5704603
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"



RE: Re: [DUG]: Tuning SQL

2001-06-10 Thread James Low

Yes it is (I thought) - and theres the Firebird project stemming from it. As
I understand it the only difference between the Open source version is that
Borland wont give it their certification - you are free to buy licences and
get the certification if you so require.

-Original Message-
From: Corey Murtagh [mailto:[EMAIL PROTECTED]]
Sent: 11 June 2001 11:03
To: Multiple recipients of list delphi
Subject: Re: Re: [DUG]: Tuning SQL


"Neven MacEwan" <[EMAIL PROTECTED]> wrote on 11/06/2001 10:09:02:
>
>Mark
>
>> I understand that I can distribute Interbase for 6 simultaneous 
>> users from my existing D5 Pro license.
>
>I didn't think so..but i could be wrong, I would suggest MSDE here but 
>the anti M$ crowd
>would prob shout me down (even if it is free)

Uh... isn't Interbase6 free now?  Didn't it go open-source?

--
Corey Murtagh
The Electric Monk
"Quidquid latine dictum sit, altum viditur!"

---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"



RE: [DUG]: Tuning SQL

2001-06-10 Thread James Low

Your biggest advantage will be a painless migration and pretty good support.
Check out http://www.ibobjects.com/ - theres a speel on all the advantages
and I am sure its completely objective :).

-Original Message-
From: Mark Howard [mailto:[EMAIL PROTECTED]]
Sent: 11 June 2001 09:27
To: Multiple recipients of list delphi
Subject: Re: [DUG]: Tuning SQL


Great, Neven

Another couple of pieces of the jigsaw drop into place!  Thanks :-}

Re: Interbase
Paradox has been acceptable to my clients, so far ( and it's not M$) - only
2 exceptions (both US companies)
ANY SQL is going to give me speed benefits on my LAN / WAN sites.
I understand that I can distribute Interbase for 6 simultaneous users from
my existing D5 Pro license.
(Someone please tell me if I'm wrong).
I will have no need to scale my app beyond this, and it is a pretty self
contained application, with little need for data sharing with other apps.
Interbase and its data access tools (IBX ) are already distributed with
Delphi.
Unless there are actual *problems* with Interbase, it should prove adequate
for my modest needs (although I am always interested in more experienced
points of view!)

Re: IBX
Can someone tell me what I would get by buying IBO that is not available in
IBX?

I appear to be at the foot of yet another learning curve - buggar!

Mark
- Original Message -
From: "Neven MacEwan" <[EMAIL PROTECTED]>
To: "Multiple recipients of list delphi" <[EMAIL PROTECTED]>
Sent: Sunday, June 10, 2001 5:45 PM
Subject: Re: [DUG]: Tuning SQL


> Mark
>
> D5 pro will do everthing you need, Ent only goves you midas and some SQL
> tools (you can live withouT)
> Midas (ala dbExpress) comes in D6 Pro
>
> > I think my next step is to test a minimal conversion to Interbase
(because
> > it's there)
>
> As long as this is your olny reason - its a critical decision
>
> > use triggers and stored procedures
>
> These are server side, so unrelated to Pro or Ent
>
> HTH
>
> Neven
>
>
>
>
> - Original Message -
> From: "Mark Howard" <[EMAIL PROTECTED]>
> To: "Multiple recipients of list delphi" <[EMAIL PROTECTED]>
> Sent: Sunday, June 10, 2001 12:15 AM
> Subject: Re: [DUG]: Tuning SQL
>
>
> > Neven
> > Thanks for that very thorough response, which gives me a much better
> > understanding of some of the issues.
> >
> > I think my next step is to test a minimal conversion to Interbase
(because
> > it's there) to assess the speed difference, between Paradox and
Interbase,
> > of a few specific functions across my LAN.  Someone has sent me a copy
of
> a
> > DataPump type utility to convert the database.
> >
> > Something that I am still not sure of is, how far down this track can I
go
> > with D5 Pro?  eg can I use triggers and stored procedures etc or does
that
> > require Enterprise?
> >
> > Are there any new goodies packaged with D6 that would assist this
> exercise?
> >
> > I see there's MYSQL, which would make deployment of Demo copies of the
> > software much more straightforward than having to use the BDE.
> >
> >
> > - Original Message -
> > From: "Neven MacEwan" <[EMAIL PROTECTED]>
> > To: "Multiple recipients of list delphi" <[EMAIL PROTECTED]>
> > Sent: Friday, June 08, 2001 11:27 PM
> > Subject: Re: [DUG]: Tuning SQL
> >
> >
> > > Mark
> > >
> > > > So, there is no point whatsoever in trying to tune the SQL as long
as
> > I'm
> > > using Paradox?
> > >
> > > Basically Yes
> > >
> > > > Neven, what exactly do you mean here?  Say I port to IB, what speed
> > should
> > > I expect (given the above times) just from the change of
> > > > Database?
> > >
> > > That would depend on several things..
> > >
> > > Your Basic ISAM generates traffic like
> > >
> > > Open Files -> Fetch Index Page -> Fetch Pages -> Fetch Index..Close
> Files
> > >
> > > For simple single file querys (selecting on an indexed field) this can
> be
> > > acceptable, The only ineffiency is that the index pages are moved
across
> > the
> > > WAN. cf an SQL Server
> > >
> > > Submit Query -> Result Set
> > >
> > > So you have increased traffic in the process, In my experience, I was
> > using
> > > Dataflex, Btrieve (a server based ISAM) and Scalable SQL
> > > the move from a straight ISAM (Dataflex) to a Server Based ISAM
> (Btrieve)
> > > resulted in a 80% reduction in traffic. The server based ISAM
> > > is not a lean as an SQL server because it fetches there whole record
and
> > not
> > > just the specified columns (which is also why you should never put
> 'select
> > *
> > > from' in a query - unless you actually need all the fields). For
example
> > if
> > > you had a table with a ID char(10) and a Description char(255) columns
> and
> > > you wanted only the ID then a 'select *' will increase your traffic by
> > > 25.5x! with all the redundant Descriptions flying over your WAN!
> > >
> > > You can basically estimate the performance over the WAN by calculating
> the
> > > volume of traffic/ data rate which is
> > > NoRecordsFetched*Sum(FieldSizesFetch)/DataRat

[DUG]: Easy way to Create an IB database from Paradox

2001-06-10 Thread James Low

The easiest way I can see is to use IBObjects. Comes with a data migration
utility that will create your autoincrement fields and convert all datatypes
and build the database.

Has an almost perfect BDE translation (ie each IBO object has an amost
identical BDE counterpart) as well as its own more powerful components.



-Original Message-
From: Craig Goodall [mailto:[EMAIL PROTECTED]]
Sent: 8 June 2001 20:24
To: Multiple recipients of list delphi
Subject: Re: [DUG]: Tuning SQL


Hi Mark,


> If I wanted to do a "minimal change" port to IB, do I understand
> correctly that I am not compelled to replace my TTables with TQuery's
> (at least initially). I understand I would need to change any
> AutoIncrement fields. Is there an easy way to create an IB database
> from an existing Paradox one and transfer the data - D5 Pro (so no
> Datapump)?

There's a Pdox to IB datapump tool and white paper on considerations for
this stuff if you need it. I forget where I got it, but I have it and
could send it to you if you wish.

HTH,
Craig.

---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"



RE: [DUG]: SQL Server 7

2001-06-07 Thread James Low

I think you should try connecting using ado as I have read (somewhere) that
BDE (D5) struggles with SQL7. I have not tried and haven't used the ado
components so cannot help further.

-Original Message-
From: David O'Brien [mailto:[EMAIL PROTECTED]]
Sent: 8 June 2001 09:49
To: Multiple recipients of list delphi
Subject: [DUG]: SQL Server 7


Hi all,
I need to connect to an SQL server(7)database. First time for me.
Delphi 5 pro.

What is the best method? 
I have ODBC98 components. These seem quite slow.
The BDE doesn't seem to connect while SQL Server is running. Keeps telling
me the file is in use, or the parameter is incorrect.

Dave.
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"



RE: [DUG]: TCustomListBox. Multiselect

2001-06-07 Thread James Low

Thanks. Seems like an ideal solution.

-Original Message-
From: Cheng Wei [mailto:[EMAIL PROTECTED]]
Sent: 8 June 2001 08:55
To: Multiple recipients of list delphi
Subject: RE: [DUG]: TCustomListBox. Multiselect


> Thanks Stacey and Dennis. I had thought I would use the
> checks to represent
> one thing and the blue lines another - but now I suspect that plan is
> flawed.

You can achieve this by using TListView instead, set the properties as
following:

CheckBoxes := True;
MultiSelect := True;
ViewStyle := vsReport;

HTH
Cheng

---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"



RE: [DUG]: TCustomListBox. Multiselect

2001-06-07 Thread James Low

Thanks Stacey and Dennis. I had thought I would use the checks to represent
one thing and the blue lines another - but now I suspect that plan is
flawed.

Stacey, that advice about protected helps heaps and explains why sometimes
the cast works and sometimes not.

Thanks again.

-Original Message-
From: Stacey Verner [mailto:[EMAIL PROTECTED]]
Sent: 8 June 2001 08:31
To: Multiple recipients of list delphi
Subject: RE: [DUG]: TCustomListBox. Multiselect


Everything available to TCustomlistBox is also available in TCheckListBox so
the cast un unnecessary.
By default you can't get at the protected properties of an object. Prptected
properties are designed to be accessible from within decendants, of the
class. You can also get at the protected parts of an object if you are in an
object defined in the same unit as the object in question. Therefore if you
put somethin like TCheatCLBox = class(TCheckListBox) in your units interface
and then go (myCheckListbox as TCheatCLBox).Multiselect you will be fine.

I believe that TCheckListBox is already in MultiSelect and ExtendedSelect
mode. Think of it as a list box that uses check boxes to show what is
selected rather than the standard blue line.

When we want the functionality you want we either use a 3rd party component
we have called TPickList (with some modifications) or we setup a TTreeView
to display checks as its state images. 

Stacey

> -Original Message-
> From: James Low [mailto:[EMAIL PROTECTED]]
> Sent: Friday, 8 June 2001 8:25 a.m.
> To: Multiple recipients of list delphi
> Subject: [DUG]: TCustomListBox. Multiselect
> 
> 
> I am using a TCheckListBox and see its imediate ancestor is 
> TCustomlistBox.
> TCustomlistBox has a protected property Multiselect. However, 
> when I use my
> TCheckListBox so:
> 
> (myCheckListbox as TCustomListbox).Multiselect := TRue
> 
> I get told the property does not exist. The VCL code 
> implements Multiselect.
> 
> 
> Why is this ... and how do I get by ListBox to Multiselect? I 
> guess I am
> missing something fundamental. The problem is not the 
> "myCheckListbox as
> TCustomListbox" bit as I can free the object etc ...
> 
> In advance thanks.
> --
> -
> New Zealand Delphi Users group - Delphi List - 
> [EMAIL PROTECTED]
>   Website: http://www.delphi.org.nz
> To UnSub, send email to: [EMAIL PROTECTED] 
> with body of "unsubscribe delphi"
> 
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"



[DUG]: TCustomListBox. Multiselect

2001-06-07 Thread James Low

I am using a TCheckListBox and see its imediate ancestor is TCustomlistBox.
TCustomlistBox has a protected property Multiselect. However, when I use my
TCheckListBox so:

(myCheckListbox as TCustomListbox).Multiselect := TRue

I get told the property does not exist. The VCL code implements Multiselect.


Why is this ... and how do I get by ListBox to Multiselect? I guess I am
missing something fundamental. The problem is not the "myCheckListbox as
TCustomListbox" bit as I can free the object etc ...

In advance thanks.
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"



RE: [DUG]: DBGrid Selector Column

2001-05-31 Thread James Low

As simple as that - thanks.

-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]
Sent: 1 June 2001 16:38
To: Multiple recipients of list delphi
Subject: Re: [DUG]: DBGrid Selector Column



remove dgIndicator from the Options property.

>Is there a way to hide the selector column in a DB grid (the column on the
>LHS which shows the active row - has the blue triangle in it)?



**
This email and any files transmitted with it are confidential and
intended solely for the use of the individual or entity to whom they
are addressed. If you have received this email in error please notify
the [EMAIL PROTECTED]

**
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"



[DUG]: DBGrid Selector Column

2001-05-31 Thread James Low

Is there a way to hide the selector column in a DB grid (the column on the
LHS which shows the active row - has the blue triangle in it)?

In advance - thanks.
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"



RE: [DUG]: D6 Product Launch

2001-05-30 Thread James Low

Theres not a lot more the desktop user could ask for from what I can see :)
(plugging away in VB as I write).

Thanks for the insight and I look forward to some positive discussion.

-Original Message-
From: Alan Rose [mailto:[EMAIL PROTECTED]]
Sent: 31 May 2001 17:03
To: Multiple recipients of list delphi
Subject: [DUG]: D6 Product Launch


Having seen the D6 product launch today in Chch I'd be keen to hear what
other people on this list felt about the new D6. I'd like to start off by
saying thank you to Borland for putting the event on today. The speaker John
K. (Sorry name escapes me) did a wonderful job of demonstrating D6. That is
apart from the odd glitch which left me wondering if a service pack is
needed sooner rather than later. Glitches aside D6 seems to me to have made
great inroads in providing a powerful web development tool (Based around
their SNAP technology). Not surprising given most of the new technology is
net based. Can't help but think even in-house development could benefit a
lot from these tools with an intranet structure. A great demo by John using
the familiar fish facts Db showed how easy it was to create a simple browser
application with edit capabilities.

Not so much new stuff for the desktop developer, but there is added support
for cross development with Linux and the IDE has been spruced up with some
nice new features. Interesting also to see also there is a new XML database
engine and other cool XML features that make D6 very attractive if you are
thinking of using XML. Makes working with XML a whole lot more attractive
and significantly easier. In another demo they took an XML document and with
a few mouse clicks had created a Clientdataset with field defs all nicely
setup for you to work with. Other features that caught my eye was web server
debugger and the ease at which interfaces where  created for you. In the
past you had to do most of this by hand. Any concerns I had about Delphi's
future have been put aside today and I look forward to working with D6.

P.S. No I am not on the Borland pay roll just impressed by today's seminar.
Cheers

---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"



RE: [DUG]: Interbase/Delphi Stored Procedure

2001-05-30 Thread James Low

Mmm - the problem appears to be with the BDE/ODBC. IBX works just fine (no
need to create a Parameter - it simply gets returned as Param[0]). May be a
good time to switch to IBO.

-Original Message-
From: James Low [mailto:[EMAIL PROTECTED]]
Sent: 30 May 2001 10:45
To: Multiple recipients of list delphi
Subject: RE: [DUG]: Interbase/Delphi Stored Procedure


I had thought the ID_SLPRTY was the Parameter, but can see also that it is a
return value so will try getting at it via fields[0].asIniteger. 

Thanks all for your help/suggestions.

-Original Message-
From: Sandeep [mailto:[EMAIL PROTECTED]]
Sent: 30 May 2001 09:35
To: Multiple recipients of list delphi
Subject: Re: [DUG]: Interbase/Delphi Stored Procedure


On 30 May 2001, at 9:21, James Low wrote:

> My stored procedure (below) wont work. When I call execproc I get either a
> parameter or type mismatch or I am told there is no Params[0] - the return
> value. The generator it uses has not incremented.
> 
> I have an IB Insert TRigger that correctly uses the generator to fill in a
> Null field value when I post but now want to use the stored procedure to
> pass in a non-null value (which is so much more convenient).
> 
> Heres my ISQL script (Set term $;) for the procedure, ISQL tells me it is
on
> the server (but I do not know how to test it other than through Delphi).
>   
> CREATE PROCEDURE PRO_GETSLPRTY
> RETURNS (ID_SLPRTY INTEGER)
> AS
> BEGIN
> ID_SLPRTY = gen_id(GEN_SLPRTY, 1);
> END $
> COMMIT$
> 
> The stored Procedure is called onInsert:
> 
> begin
> With StoredProc do begin
> myParamname := RETPREFIX + Tablename;
> StoredProcName := SPPREFIX + Tablename;
> Params.AddParam(Params.CreateParam(ftInteger, myParamname,
> ptInput));
> Prepare;
> ExecProc;
> // raises DB error here.
> 
> Result := ;//would have thought Params[0] or ParambyName(myParamname)
> ... but the program advises me there are no params.
>  end;
> end;
> 
Thats because u r trying to pass a input parameter which doesn't 
exist in the stored procedure.

U need to execute the SP and  do StoredProc.Fields[0].AsInteger 
to get the value.


Sandeep

Software Developer
CFL
[EMAIL PROTECTED]
http://www.cfl.co.nz

---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"



RE: [DUG]: SQL and Parameters

2001-05-29 Thread James Low



Seems 
you don't - but am sure that at one stage I did just that, create a parameter, 
add it to the query object, set it parameters and it worked. If you trace 
through your code and check the paramcount before and after prepare and its zero 
then the parameter isn't being created behind the scenes and you need to use 
something (delphi not in front of me now) like this:
 
    Params.AddParam(Params.Createparam( 
whatever, whatever, whatever)). But Neven seems to know what he's 
saying.
 
I 
agree with keeping Date/Time info as that and not using strings. 
 
 
 -Original Message-From: 
Mark Howard [mailto:[EMAIL PROTECTED]]Sent: 30 May 2001 
16:48To: Multiple recipients of list delphiSubject: Re: 
[DUG]: SQL and Parameters

  You were right.  
  I had no idea that I had to specifically add parameter 
  objects to the TQuery.  I can't find any mention of this in any of my 4 
  Delphi books.
  My procedure is now as follows, but I still 
  get "Could not find object".  Is the code that I have used to 
  add the parameter correct?
   
    procedure RunPQuery(SQLFile: string);  
  begin    with RSQuery do    
  begin  
  Close;  
  Unprepare;  SQL.LoadFromFile(HomeDir + 
  '\SQLFiles\' + SQLFile + '.SQL');  
  Params.CreateParam(ftDate, 'SaveDate', 
  ptOutput);  ParamByName('SaveDate').AsDate := 
  CurrentDate;
    
  Prepare;  
  ExecSQL;  
  MainForm.Memo.Lines.Add('Done');    end;  
  end;
   
  Tomorrow, I will build the SQL in my code - but its not as 
  nice.
   
  Mark
   
  
- Original Message - 
From: 
James Low 

To: Multiple 
recipients of list delphi 
Sent: Wednesday, May 30, 2001 4:11 
PM
Subject: RE: [DUG]: SQL and 
Parameters

Maybe it cannot find an object because the query 
has NO parameters (I cannot see where your code creates one). So maybe you 
need to add (using CreateParam or otherwise)  a Param Object to the 
datsets Params (with the name "SaveDate", type Output (I think), ftdate) - 
before you call prepare.

  -Original Message-From: Mark Howard 
  [mailto:[EMAIL PROTECTED]]Sent: 30 May 2001 
  15:41To: Multiple recipients of list delphiSubject: 
  Re: [DUG]: SQL and Parameters
  Mike
  Have tried this change, now.  No better.  I 
  assume the question about Short Date Format is only relevant while I am 
  using the DateToStr format?
  I think there must be something quitye fundamental, that 
  I have not passed on to you guys.
  I assume that I can use a vanilla TQuery with no 
  properties set; and that setting the ParamByName is ALL I need to.  
  (I have also tried Params[0].AsDate := CurrentDate.)
  Is there some other fundamental aspect that I may not be 
  aware of?
  Mark
   
  
- Original Message - 
From: 
Mike 
Osborne 
To: Multiple 
recipients of list delphi 
Sent: Wednesday, May 30, 2001 3:22 
PM
Subject: Re: [DUG]: SQL and 
Parameters

Mark
Have you tried - 
ParamByName('SaveDate').AsDate := 
CurrentDate; 
as opposed to 
ParamByName('SaveDate').AsString := 
DateToStr(CurrentDate);
 
What is your Short Date Format - dd/mm/yy 
or mm/dd/yy?
DateToStr may not be giving you a valid 
date for SQL
Why you would get "could not find object", 
I don't know. 
 
HTH
Mike
 

  - Original Message - 
  From: 
  Mark 
  Howard 
  To: Multiple 
  recipients of list delphi 
  Sent: Wednesday, May 30, 2001 
  10:03 AM
  Subject: [DUG]: SQL and 
  Parameters
  
  
  Hi 
   
  Using Paradox.
   
  When I run the following SQL code (DocNos.Sql) using 
  the LoadFromFile method, things work fine;
   
  Delete from DocketNos Where DocketNo in 
  (Select DocketNo from DocketsWhere ForCode not in (Select 
  distinct forcode from docketswhere docketdate > 
  '03/31/2001'))
   
  But when I try to parameterise it as follows, and 
  with the final line of the Sql file changed to :
   
  where docketdate > :SaveDate))
   
  then I get an error message "Could not find 
  object"
   
    procedure RunPQuery(SQLFile: 
  string);  begin    with RSQuery 
  do    begin  
  Close;  
  Unprepare;  
  SQL.LoadFromFile('DocNos.SQL');  
  ParamByName('SaveDate').AsString := 
 

RE: [DUG]: SQL and Parameters

2001-05-29 Thread James Low



Maybe 
it cannot find an object because the query has NO parameters (I cannot see where 
your code creates one). So maybe you need to add (using CreateParam or 
otherwise)  a Param Object to the datsets Params (with the name "SaveDate", 
type Output (I think), ftdate) - before you call prepare.

  -Original Message-From: Mark Howard 
  [mailto:[EMAIL PROTECTED]]Sent: 30 May 2001 15:41To: 
  Multiple recipients of list delphiSubject: Re: [DUG]: SQL and 
  Parameters
  Mike
  Have tried this change, now.  No better.  I assume 
  the question about Short Date Format is only relevant while I am using the 
  DateToStr format?
  I think there must be something quitye fundamental, that I 
  have not passed on to you guys.
  I assume that I can use a vanilla TQuery with no properties 
  set; and that setting the ParamByName is ALL I need to.  (I have also 
  tried Params[0].AsDate := CurrentDate.)
  Is there some other fundamental aspect that I may not be 
  aware of?
  Mark
   
  
- Original Message - 
From: 
Mike 
Osborne 
To: Multiple 
recipients of list delphi 
Sent: Wednesday, May 30, 2001 3:22 
PM
Subject: Re: [DUG]: SQL and 
Parameters

Mark
Have you tried - 
ParamByName('SaveDate').AsDate := CurrentDate; 

as opposed to 
ParamByName('SaveDate').AsString := 
DateToStr(CurrentDate);
 
What is your Short Date Format - dd/mm/yy or 
mm/dd/yy?
DateToStr may not be giving you a valid date 
for SQL
Why you would get "could not find object", I 
don't know. 
 
HTH
Mike
 

  - Original Message - 
  From: 
  Mark 
  Howard 
  To: Multiple 
  recipients of list delphi 
  Sent: Wednesday, May 30, 2001 10:03 
  AM
  Subject: [DUG]: SQL and 
  Parameters
  
  
  Hi 
   
  Using Paradox.
   
  When I run the following SQL code (DocNos.Sql) using the 
  LoadFromFile method, things work fine;
   
  Delete from DocketNos Where DocketNo in (Select 
  DocketNo from DocketsWhere ForCode not in (Select distinct forcode 
  from docketswhere docketdate > '03/31/2001'))
   
  But when I try to parameterise it as follows, and with 
  the final line of the Sql file changed to :
   
  where docketdate > :SaveDate))
   
  then I get an error message "Could not find 
  object"
   
    procedure RunPQuery(SQLFile: string);  
  begin    with RSQuery do    
  begin  
  Close;  
  Unprepare;  
  SQL.LoadFromFile('DocNos.SQL');  
  ParamByName('SaveDate').AsString := 
  DateToStr(CurrentDate);  
  Prepare;  
  Open;  
  MainForm.Memo.Lines.Add('Done');    end;  
  end;
  Can any one see where I have gone wrong?
   
  TIA  
  Mark


RE: [DUG]: help please

2001-05-29 Thread James Low

Let the Memo do all the work with Memo1.Lines.SavetoFile('path and
filename'). ps each line of a Memo is an item so if you wanted to do the
same manually you would loop through all of them (from 0 to Lines.count -
1).
-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]
Sent: 30 May 2001 15:37
To: Multiple recipients of list delphi
Subject: [DUG]: help please


i am need of help with my project, i am trying to save the lines in my
memo1 box to a text file  can some one please help me out here.


procedure TForm1.BitBtn1Click(Sender: TObject);
var
   sav:textfile;
   dat:string;

begin
 dat:='data.txt';
 assignfile(sav,dat);
 rewrite(sav);
 writeln(dat,memo1.lines.txt);
 close(dat);
end;

...From
   Kristy and Brendon
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"



RE: [DUG]: Interbase/Delphi Stored Procedure

2001-05-29 Thread James Low

I had thought the ID_SLPRTY was the Parameter, but can see also that it is a
return value so will try getting at it via fields[0].asIniteger. 

Thanks all for your help/suggestions.

-Original Message-
From: Sandeep [mailto:[EMAIL PROTECTED]]
Sent: 30 May 2001 09:35
To: Multiple recipients of list delphi
Subject: Re: [DUG]: Interbase/Delphi Stored Procedure


On 30 May 2001, at 9:21, James Low wrote:

> My stored procedure (below) wont work. When I call execproc I get either a
> parameter or type mismatch or I am told there is no Params[0] - the return
> value. The generator it uses has not incremented.
> 
> I have an IB Insert TRigger that correctly uses the generator to fill in a
> Null field value when I post but now want to use the stored procedure to
> pass in a non-null value (which is so much more convenient).
> 
> Heres my ISQL script (Set term $;) for the procedure, ISQL tells me it is
on
> the server (but I do not know how to test it other than through Delphi).
>   
> CREATE PROCEDURE PRO_GETSLPRTY
> RETURNS (ID_SLPRTY INTEGER)
> AS
> BEGIN
> ID_SLPRTY = gen_id(GEN_SLPRTY, 1);
> END $
> COMMIT$
> 
> The stored Procedure is called onInsert:
> 
> begin
> With StoredProc do begin
> myParamname := RETPREFIX + Tablename;
> StoredProcName := SPPREFIX + Tablename;
> Params.AddParam(Params.CreateParam(ftInteger, myParamname,
> ptInput));
> Prepare;
> ExecProc;
> // raises DB error here.
> 
> Result := ;//would have thought Params[0] or ParambyName(myParamname)
> ... but the program advises me there are no params.
>  end;
> end;
> 
Thats because u r trying to pass a input parameter which doesn't 
exist in the stored procedure.

U need to execute the SP and  do StoredProc.Fields[0].AsInteger 
to get the value.


Sandeep

Software Developer
CFL
[EMAIL PROTECTED]
http://www.cfl.co.nz

---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"



[DUG]: Interbase/Delphi Stored Procedure

2001-05-29 Thread James Low

My stored procedure (below) wont work. When I call execproc I get either a
parameter or type mismatch or I am told there is no Params[0] - the return
value. The generator it uses has not incremented.

I have an IB Insert TRigger that correctly uses the generator to fill in a
Null field value when I post but now want to use the stored procedure to
pass in a non-null value (which is so much more convenient).

Heres my ISQL script (Set term $;) for the procedure, ISQL tells me it is on
the server (but I do not know how to test it other than through Delphi).
  
CREATE PROCEDURE PRO_GETSLPRTY
RETURNS (ID_SLPRTY INTEGER)
AS
BEGIN
ID_SLPRTY = gen_id(GEN_SLPRTY, 1);
END $
COMMIT$

The stored Procedure is called onInsert:

begin
With StoredProc do begin
myParamname := RETPREFIX + Tablename;
StoredProcName := SPPREFIX + Tablename;
Params.AddParam(Params.CreateParam(ftInteger, myParamname,
ptInput));
Prepare;
ExecProc;
// raises DB error here.

Result := ;//would have thought Params[0] or ParambyName(myParamname)
... but the program advises me there are no params.
 end;
end;


All D5 pro/ IB5/ ODBC (which raises the errors). Any thoughts?
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"



[DUG]: Class Builder Tool

2001-05-28 Thread James Low

Does anyone use/recommend a decent class builder for Delphi. ie something
that lets you visualise  classes and their interfaces, create new properties
and click and point to change datatypes etc. Its not a big issue - but could
speed up development a bit and help focus a little more on design than code.
Would be nice, eg, to see a tree with all the public properties and
functions, reorder it, rename some and not worry about keeping the interface
in sync with implementation.

Modelmaker (www.modelmaker.demon.nl) looks excellent but is probably
overkill for simple problems that don't require much documentation.
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"



RE: [DUG]: IB Objects/ IBX/ Interbase experiences

2001-05-27 Thread James Low

As far as I can see the benefits of IBO over IBX are painless migration from
BDE (distinct plus or a minus - plus for me) and slightly handling of
transactions ie over several datasets. 

-Original Message-
From: Pat Sheehan [mailto:[EMAIL PROTECTED]]
Sent: 28 May 2001 15:38
To: Multiple recipients of list delphi
Subject: Re: [DUG]: IB Objects/ IBX/ Interbase experiences


What is wrong with IBX?  Have used then on three ( simple ) app to date with
no adverse productivity ,but I do agree with staying with Dialect 1 in IBO

Patrick Sheehan
( P+A Computing )
Patrick Anthony Associates Ltd


- Original Message -
From: "Sandeep" <[EMAIL PROTECTED]>
To: "Multiple recipients of list delphi" <[EMAIL PROTECTED]>
Sent: Monday, May 28, 2001 10:59 AM
Subject: Re: [DUG]: IB Objects/ IBX/ Interbase experiences


> On 28 May 2001, at 10:26, James Low wrote:
>
> > This is possibly more directed at Ed who recently advised on the use of
IB
> > objects as opposed to IBX. My app prototype is using BDE/ ODBC against a
IB
> > DB - and it seems IBO is the obvious next step in scaling/ trying to get
> > some performance. Are there any hidden gotchas and, in D5/Pro, is IBX as
> > impossible to use as the IBO hype suggests?
> >
> > The attraction of IBO is its BDE interface similarities and the ability
> > therefore to develop for several DBs at the same time with minimal
> > rewriting.
>
> If u r converting from BDE then IBO is the best choice. IBX is
> hopeless for this case.
> Still there are some issues with Dialect 3 in IBO. U have to Put
> double quotes around Tablenames and fieldnames if u r using it in
> ur code.
>
>
> Sandeep
>
> Software Developer
> CFL
> [EMAIL PROTECTED]
> http://www.cfl.co.nz
>
> --
-
> New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
>   Website: http://www.delphi.org.nz
> To UnSub, send email to: [EMAIL PROTECTED]
> with body of "unsubscribe delphi"
>
>

---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"



RE: [DUG]: IB Objects/ IBX/ Interbase experiences

2001-05-27 Thread James Low

Probably, but cannot (as much as I would like) warrant the cost at this
early stage. Seems though that dbExpress might be the way to go later on ...
so will definitely try to keep that door open (as best I can).

-Original Message-
From: Neven MacEwan [mailto:[EMAIL PROTECTED]]
Sent: 28 May 2001 13:39
To: Multiple recipients of list delphi
Subject: Re: [DUG]: IB Objects/ IBX/ Interbase experiences


James

Would you not be better investing in D6 and looking at dbExpress
Has native mode IB support and 'midas' clientdatasets (and you code
is portable to Linux!)

Neven

- Original Message -----
From: James Low <[EMAIL PROTECTED]>
To: Multiple recipients of list delphi <[EMAIL PROTECTED]>
Sent: Monday, 28 May 2001 10:26
Subject: [DUG]: IB Objects/ IBX/ Interbase experiences


> This is possibly more directed at Ed who recently advised on the use of IB
> objects as opposed to IBX. My app prototype is using BDE/ ODBC against a
IB
> DB - and it seems IBO is the obvious next step in scaling/ trying to get
> some performance. Are there any hidden gotchas and, in D5/Pro, is IBX as
> impossible to use as the IBO hype suggests?
>
> The attraction of IBO is its BDE interface similarities and the ability
> therefore to develop for several DBs at the same time with minimal
> rewriting.
>
> Thanks.
> --
-
> New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
>   Website: http://www.delphi.org.nz
> To UnSub, send email to: [EMAIL PROTECTED]
> with body of "unsubscribe delphi"
>

---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"



RE: [DUG]: IB Objects/ IBX/ Interbase experiences

2001-05-27 Thread James Low

Sort of ... I was referring to the FIBPlus components ...and mistakenly
typed "Firebird" which I had no idea was a database. Thanks.

-Original Message-
From: Nello Sestini [mailto:[EMAIL PROTECTED]]
Sent: 28 May 2001 12:16
To: Multiple recipients of list delphi
Subject: Re: [DUG]: IB Objects/ IBX/ Interbase experiences


> IBO seems a little
> more est'd the Firebird+ (love the name) though it does seem (read) pretty
> good too.
>


maybe I am reading too much between the lines here - but I'll mention
in case there is some confusion.

Firebird is not an alternative to IBO.Firebird is an alternative to
Interbase.   IBO components can be used with EITHER Firebird or Interbase.

-ns



---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"



RE: [DUG]: IB Objects/ IBX/ Interbase experiences

2001-05-27 Thread James Low

Thanks all - great to get some feedback before I leap in. IBO seems a little
more est'd the Firebird+ (love the name) though it does seem (read) pretty
good too.

-Original Message-
From: Peter Hyde [mailto:[EMAIL PROTECTED]]
Sent: 28 May 2001 11:23
To: Multiple recipients of list delphi
Subject: Re: [DUG]: IB Objects/ IBX/ Interbase experiences


James asked:

> scaling/ trying to get some performance. Are there any hidden gotchas
> and, in D5/Pro, is IBX as impossible to use as the IBO hype suggests?

Can't speak for IBX. In my experience, IBO is a good solution. The 
gotchas in the past have tended to be related to the frequency of 
releases, choosing which ones to adopt and coping with resulting 
spec changes which impact on yuor code. But as with all mature 
products, there is significantly less of that now.   

> The attraction of IBO is its BDE interface similarities and the
> ability therefore to develop for several DBs at the same time with
> minimal rewriting.

Yes, it's fairly good for that -- this has an area which has evolved 
well over the years.

And support is excellent, which shouldn't be overlooked.


cheers,
peter


Peter Hyde, WebCentre Ltd & SPIS Ltd, Christchurch, New Zealand
* Web automation for online periodicals: http://TurboPress.com
* TurboNote+: http://TurboPress.com/tbnote.htm
  -- easy, small, handy onscreen sticky notes
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"



[DUG]: IB Objects/ IBX/ Interbase experiences

2001-05-27 Thread James Low

This is possibly more directed at Ed who recently advised on the use of IB
objects as opposed to IBX. My app prototype is using BDE/ ODBC against a IB
DB - and it seems IBO is the obvious next step in scaling/ trying to get
some performance. Are there any hidden gotchas and, in D5/Pro, is IBX as
impossible to use as the IBO hype suggests?

The attraction of IBO is its BDE interface similarities and the ability
therefore to develop for several DBs at the same time with minimal
rewriting.

Thanks.
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"



RE: [DUG]: System Tray

2001-05-24 Thread James Low



I 
THINK the RX suite has one too ...

  -Original Message-From: Laurie Bisman 
  [mailto:[EMAIL PROTECTED]]Sent: 24 May 2001 18:58To: 
  Multiple recipients of list delphiSubject: [DUG]: System 
  Tray
  I have seen various components here and there for 
  minimizing your application to the system tray. 
   
  Anyone out there know of a good component (D5 / 
  D6) or perhaps some other method of doing this.
   
  ¤º°`°º¤ø,¸¸,ø¤º°`°º¤ø¤º°`°º¤ø,¸¸,ø¤º°`°º¤øø¤    
  Laurie Bisman - New 
  Zealand¤º°`°º¤ø,¸¸,ø¤º°`°º¤ø¤º°`°º¤ø,¸¸,ø¤º°`°º¤øø¤


RE: [DUG]: user name and password undefined.

2001-05-23 Thread James Low

The server isn't closing the database for a backup or something simple like
that is it?

-Original Message-
From: Matthew Comb [mailto:[EMAIL PROTECTED]]
Sent: 24 May 2001 14:44
To: Multiple recipients of list delphi
Subject: [DUG]: user name and password undefined.


Hi people,

This is just about driving me nuts. I have a server app that has an access
back end (ODBC). Hardly anything is going on database wise, when people
connect it
checks there username and password in a table and either disconnects or
validates them.

I am using 1 tdatabase comopnenet and one tquery component. There is no user
name and password set.

Every couple of days, the server throws up an error message 'User name and
password undefined' and then the whole server application closes after a few
seconds of that without user intervention, I just managed to catch it.

This database is also shared with an ASP page which is doing nothing
unusual.

Where should I start looking? Any bright ideas?

Actually If someone was looking to earn a dinner, I would love someone to
come over and check my database configuration out. Based in Takapuna if
anyone is interested.

Matt.


---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"



RE: [DUG]: Folder Dialog

2001-05-23 Thread James Low

This might be it:

Var Dir : String;

begin
  { display a directory dialog box } 
  SelectDirectory(Dir,[],0);
  { do whatever with Dir }
end

-Original Message-
From: James Sugrue [mailto:[EMAIL PROTECTED]]
Sent: 24 May 2001 11:48
To: Multiple recipients of list delphi
Subject: [DUG]: Folder Dialog


Howzit,
I know it's been asked a million times before, so apologies in advance
but...

What is the API call to show the Select Folders Dialog. Thats not the open
file dialog, but he one that allows a user to select a folder only.

Cheers

James



CAUTION - This message may contain privileged and confidential information
intended only for the 
use of the addressee(s) named above.  If you are not the intended recipient
of this message you are 
hereby notified that any use, dissemination, distribution or reproduction of
this message is prohibited.  
If you have received this message in error please notify Progressive
Enterprises Ltd. immediately via 
email at [EMAIL PROTECTED]  Any views expressed in this
message are those of the 
individual sender and may not necessarily reflect the views of Progressive
Enterprises Ltd.

This footnote also confirms that Progressive Enterprises Ltd. has swept this
email message for the 
presence of computer viruses.  This does not guarantee this message is virus
free.

---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"



RE: [DUG]: Annoyance: Auto Create form list

2001-05-23 Thread James Low

Aha  and there I was thinking those braces were just helpful comments.
Thanks heaps - that does the trick.

-Original Message-
From: Rohit Gupta [mailto:[EMAIL PROTECTED]]
Sent: 23 May 2001 18:26
To: Multiple recipients of list delphi
Subject: Re: [DUG]: Annoyance: Auto Create form list


Its not just the unit... the line has to have the form name in braces.  Its
either missing or incorrect.


- Original Message -
From: "Alan Rose" <[EMAIL PROTECTED]>
To: "Multiple recipients of list delphi" <[EMAIL PROTECTED]>
Sent: Wednesday, 23 May 2001 09:37
Subject: RE: [DUG]: Annoyance: Auto Create form list


> Are you saying if you use the "Add to project" (Shift+F11) button to add
> your form to the project. The form still wont appear in the list? In your
> project file (.dpr) there should be a reference to this forms pas file.
>
> -Original Message-
> From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On
> Behalf Of James Low
> Sent: Wednesday, May 23, 2001 8:24 AM
> To: Multiple recipients of list delphi
> Subject: [DUG]: Annoyance: Auto Create form list
>
>
> I have a project in which one of the forms point blank refuses to play
ball
> and become part of the IDE available forms/ autocreate forms list. Not a
> problem as I can add its reference/ instantiate it in the Program unit ...
> but I am at a loss to understand why? I can add its unit to the project
...
> but no go. Its just not there in the list.
>
> The program runs fine notwithstanding.
>
> Any ideas where I should look to sort this (all my units are in the same
> directory).
>
> Cheers
> --
-
> New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
>   Website: http://www.delphi.org.nz
> To UnSub, send email to: [EMAIL PROTECTED]
> with body of "unsubscribe delphi"
>
> --
-
> New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
>   Website: http://www.delphi.org.nz
> To UnSub, send email to: [EMAIL PROTECTED]
> with body of "unsubscribe delphi"
>

---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"



  1   2   >