Search options (Page 14 of 25)

Adam,
I fixed the flaw in the project posted previously and removed. A new one is attached here. Actually I had to change the design of the previous version. Instead of using a panel for the edit fields on Form1, the edit fields are actually on a separate form (Form2), however it is sized to fit in the tablegrid.. The trick was to make the form look and operate like the panel. In other words, the form is placed on the selected row in the bookmark tablegrid to make it look somewhat like the inplace edit.. It was a little bit of a challenge getting the positioning working properly, but it works.

A couple of things to note. Form2 should have border icons turned off and Borderstyle set to bsNone in the Object Inspector. Also, Positon in the Object Inspector should be set to poDefaultSizeOnly.

This concept could be adapted for other tablegrids, but you would need to play with the hard coded positions in the script to fit other tablegrids. Anyway, hope it's workable for you.

Jean,
You are right with your statement. However, in Adam's case that particular field (column) needs to be displayed because it is the connection with the Main AppName tablegrid. There is not a way to default the editable value with the App Id value when adding a new bookmark record so that the dropdown does not need to be displayed.

Adam,
As an alternative, maybe the attached could work for you in this case. Basically the edit fields are along side of the tablegrid. As you click or scroll through the bookmarks, you can change any of the values in the edit fields. You do not need to doubleclick on the bookmark row to do an edit. If you do not want to save any changes you make in the bookmark fields, just simply click off the row. Hope this helps.

Use "Exit;"

Values (1,65280,0,65280,65280,0,0,0,0,0,16776960,16776960,16776960,"")');

The values between the commas typically follow your database table definition in MVD. However, I noticed that the definition in your MVD table definition for Settings does not exactly match the actual table definition. Somewhere along the way you must have moved around the column definitions in MVD. Doing so is fine, but the actual database definition order does not get changed outside of MVD. Using a tool like SqlLiteStudio, you will see the actual field definition order. I don't mean to confuse you on this. If I would have placed the actual field names as part of the SQL "Insert", it wouldn't have mattered about the field order. Just laziness on my part.

Here are the values for each field in the table:
1 = id
65280       = clLime color code for cdColorTextHRS
0               = clBlack color code for cdColorBgHRS
65280       = clLime color code for cdColorTextMINS
65280       = clLime color code for cdColorTextSECS
0               = clBlack color code for cdColorBgMINS
0               = clBlack color code for cdColorBgSECS
0               = clBlack color code for etColorBgHRS
0               = clBlack color code for etColorBgMINS
0               = clBlack color code for etColorBgSECS
16776960 = clAqua color code for etColorTextHRS
16776960 = clAqua color code for etColorTextMINS
16776960 = clAqua color code for etColorTextSECS
""              = Null value for SoundFile

Disabling/Enabling the Play and Stop buttons is good solution. I actually meant to do that for you. This will eliminate the need to intercept the error because the error should never occur because these buttons cannot be clicked when there is no sound file to play..

Mathias - Good to know. Thanks for the info.

Adam - Here you go. Just click on the color panels in the Settings form to bring up the color dialog.

Edit - Found a small error. I re-uploaded a new project.

Adam,
I'm running MVD 3.6 and it works fine. I ran your project "Stopwatch EHW 2.zip" with no problems. Did the version I submitted "Stopwatch New.zip" work at all for you?

Up until I looked through the Delphi code shared by Adam I had no idea what GetTickCount was or how to use it. Now I know. So utilizing the code in the Delphi source, I put it together in MVD. Check it out. It was a learning experience for me so thanks for that.

Adam,
It looks like you are trying to sum the id instead of the salary.

Form1.GridEmployees.Columns[4].Footer.Caption := SQLExecute('SELECT SUM(id) FROM employees');

It should be

Form1.GridEmployees.Columns[4].Footer.Caption := SQLExecute('SELECT SUM(salary) FROM employees');

Not sure of another solution. The Alternate_Color procedure must know which tablegrid to work on, so something has to pass it on to it. Sorry I can't help you further.

Adam,
I took a slightly different approach, but still using a timer. Instead of having the splash screen in your main project. I created a splash screen only app which will immediately open the splash screen and immediately run your main project and then close the splash screen (and app) after seven seconds. I chose seven seconds because that is about the length of time it takes to load your main project outside of the MVD development environment. Obviously you can adjust the time as you see fit. For ease in uploading to the forum I placed your main project within the splash screen app folder.

Sample project attached.

Nitin ingale,

I'm not totally sure what "Total Sell" meant. Since the search dates were defined to the student as RegDate, I assumed that you wanted the total count of students for each course within the search dates. One of the problems you have is that id_CourseDB within the StudentDB is empty for every record. Therefore student records and course records are disconnected. I manually updated the id_CourseDB inside of studentDB for all students with a Regdate within September.(5 Records). I defined a query button on the right side of the form to do the selection. It summarizes (counts) all the students for each course.  I did not touch your search button in case I have totally misunderstood your issue. See if the attached is what you are looking for.

Well unfortunately I just found out that your project is too large to upload. Here is the SQL for the SQLQuery button I placed on the form:

Select a.CourseCode,a.CourseName,b.Field,Count(a.id),a.id From CourseDB a 
  Left Join Field b On b.id = a.id_Field 
  Left Join StudentDB c On c.id_CourseDB = a.id 
  Where Date(c.RegDate) >= Date({DateTimePicker1}) and Date(c.RegDate) <= Date({DateTimePicker2})
  Group By a.CourseCode 

You will need to update the id_CourseDB in StudentDB or this query will not work. Whatever form does the updating is not updating the id_CourseDB. That needs to be fixed.