Solved

Datasources

Posted on 1997-11-22
2
201 Views
Last Modified: 2010-04-04
I am creating a component in D1 and I have to refer to either
a TTable or TQuery as the Datasource.  I have coded the following:

If (DataSource.Dataset as TTable) = ..... then
else
If (DataSource.Dataset as TQuery) = ....  then

I have to use that construct several times within the component
and I want to know if there is a simpler way to do it, like by
setting a variable for the (DataSource.Dataset as TTable) or TQuery
part. If so, what type of variable do I need?

Thanks in advance for any help
0
Comment
Question by:jdthedj
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
2 Comments
 
LVL 8

Accepted Solution

by:
ZifNab earned 50 total points
ID: 1351409
Hi jdthedj,

What about this? Make a boolean function of it like :

function IsTable:Boolean;
begin
 if (DataSource.DataSet as TTable) then Result := true
  else Result := false;
end;

In your component, you can call this function :

 if IsTable then ...
  else ....

It's shorter and easier.

Have fun,
c.u. ZifNab;
0
 
LVL 3

Author Comment

by:jdthedj
ID: 1351410
Thanks ZifNab!!
0

Featured Post

Free Tool: Site Down Detector

Helpful to verify reports of your own downtime, or to double check a downed website you are trying to access.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
Printing problem 2 111
Why can't I create any project with my delphi EXE file? 6 45
Delphi...Split view - idea? 1 117
Firemonkey DbLookupComboBox equivalent ? 2 68
Hello everybody This Article will show you how to validate number with TEdit control, What's the TEdit control? TEdit is a standard Windows edit control on a form, it allows to user to write, read and copy/paste single line of text. Usua…
Introduction I have seen many questions in this Delphi topic area where queries in threads are needed or suggested. I know bumped into a similar need. This article will address some of the concepts when dealing with a multithreaded delphi database…
Finds all prime numbers in a range requested and places them in a public primes() array. I've demostrated a template size of 30 (2 * 3 * 5) but larger templates can be built such 210  (2 * 3 * 5 * 7) or 2310  (2 * 3 * 5 * 7 * 11). The larger templa…

726 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question