Delphi Compiler Directive to Evaluate Arguments in Reverse

Posted by Peter Turner on Stack Overflow See other posts from Stack Overflow or by Peter Turner
Published on 2010-06-16T15:03:48Z Indexed on 2010/06/16 16:02 UTC
Read the original article Hit count: 341

Filed under:

delphi

|

compiler-directives

I was really impressed with this delphi two liner using the IFThen function from Math.pas. However, it evaluates the DB.ReturnFieldI first, which is unfortunate because I need to call DB.first to get the first record.

DB.RunQuery('select awesomedata1 from awesometable where awesometableid = "great"');
result := IfThen(DB.First = 0, DB.ReturnFieldI('awesomedata1'));

Obviously this isn't such a big deal, as I could make it work with five robust liners. But all I need for this to work is for Delphi to evaluate DB.first first and DB.ReturnFieldI second. I don't want to change math.pas and I don't think this warrants me making a overloaded ifthen because there's like 16 ifthen functions.

Just let me know what the compiler directive is, if there is an even better way to do this, or if there is no way to do this and anyone whose procedure is to call db.first and blindly retrieve the first thing he finds is not a real programmer.

© Stack Overflow or respective owner

Related posts about delphi

TVirtualStringTree compatibility between Delphi 7 and Delphi 2010 - 'Parameter lists differ'

as seen on Stack Overflow - Search for 'Stack Overflow'
Hi, I've made a form containing a TVirtualStringTree that works in Delphi 7 and Delphi 2010. I notice that as I move between the two platforms I get the message '...parameter list differ..' on the tree events and that the string type is changing bewteen TWideString (D7) and string (D2010). The only… >>> More
Convert Delphi 7 code to work with Delphi 2009

as seen on Stack Overflow - Search for 'Stack Overflow'
I have a String that I needed access to the first character of, so I used stringname[1]. With the unicode support this no longer works. I get an error: [DCC Error] sndkey32.pas(420): E2010 Incompatible types: 'Char' and 'AnsiChar' Example code: //vkKeyScan from the windows unit var KeyString:… >>> More
Book recommendation for moving from Delphi 6 to Delphi 2010

as seen on Stack Overflow - Search for 'Stack Overflow'
Hi, I am a long time Delphi 6 developer. Looking for a book on Delphi 2010. Not only on the new features available in Delphi 2010, but more importantly, guideline on how different it is to develop applications in Delphi 2010, the architecture, standard and convention, etc. Thanks a lot. >>> More
Compile Delphi component package (bpl) for different Delphi versions

as seen on Stack Overflow - Search for 'Stack Overflow'
Hello. The situation is the following. Typically I use RAD Studio 2010 for Delphi development. I have some components I would like to redistribute in binary form (*.bpl without source). But I would like people to be able to use them despite of their Delphi version. But, for example, dcu files can… >>> More
Delphi Speech recognition delphi

as seen on Stack Overflow - Search for 'Stack Overflow'
I need create a programatic equivalent using delphi language... or could someone post a link on how to do grammars in peech recogniton using the delphi. sorry for my english... XML Grammar Sample(s): <GRAMMAR>  <RULE NAME="HelloWorld"… >>> More

Related posts about compiler-directives

C# Compiler Directives

as seen on Stack Overflow - Search for 'Stack Overflow'
I’m looking at some C# code, and have come across the following statement: #if DEBUG // Do something here #else // Do something else #endif I assumed that DEBUG would be a defined somewhere as follows: #define DEBUG But I’m unable to find such a definition, although the code seems to… >>> More
Delphi Compiler Directive to Evaluate Arguments in Reverse

as seen on Stack Overflow - Search for 'Stack Overflow'
I was really impressed with this delphi two liner using the IFThen function from Math.pas. However, it evaluates the DB.ReturnFieldI first, which is unfortunate because I need to call DB.first to get the first record. DB.RunQuery('select awesomedata1 from awesometable where awesometableid = "great"'); result… >>> More
Implicit casting Integer calculation to float in C++

as seen on Stack Overflow - Search for 'Stack Overflow'
Is there any compiler that has a directive or a parameter to cast integer calculation to float implicitly. For example: float f = (1/3)*5; cout << f; the "f" is "0", because calculation's constants(1, 3, 10) are integer. I want to convert integer calculation with a compiler directive or parameter… >>> More
compiler directive defensive programming for adding ints to nsmuatablearray FMDB/EGODB

as seen on Stack Overflow - Search for 'Stack Overflow'
I would like to throw a warning message when users try to add an int to an nsmutablearray basically any insert statement that includes values that are not nsstring / nsnumber cause run time crashes. It's exactly the same crash you get when you type %@ instead of %d NSLog(int); The crash is ok, but… >>> More
#Define Compiler Directive in C#

as seen on Stack Overflow - Search for 'Stack Overflow'
In C, I could declare a compiler directive as follows: #define MY_NUMBER 10 However, in C#, I only appear to be able to do this: #define MY_NUMBER Which is obviously useless in this case. Is this correct, or am I doing something wrong? If not, can anyone suggest a way of doing this, either… >>> More