Solved

Real world hourglass cursor

Posted on 1998-07-07
6
257 Views
Last Modified: 2012-06-22
I don´t want the my app. to process any keyboard or mouseevents while the cursor state is crHourGlass.
What is the best way to do this ? (Considering overhead and ease of implementation)

  Michael
0
Comment
Question by:miv
  • 4
  • 2
6 Comments
 
LVL 3

Expert Comment

by:Matvey
ID: 1357222
Make your form disabled - Form1.Disabled := True;
0
 
LVL 3

Expert Comment

by:Matvey
ID: 1357223
Make your form disabled - Form1.Disabled := True;
0
 
LVL 1

Author Comment

by:miv
ID: 1357224
Does not work. I can still select menu items and press buttons e.t.c.
0
Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

 
LVL 3

Expert Comment

by:Matvey
ID: 1357225
I tested it with all forms: Normal, MDI, everything! I set the ENABLED property of the FORM to FALSE and it can't receve any clicks, key strokes, menu selects, move_window message - nothing! You can't even close it with Alt+F4!

What's wrong here?

(PS sorry, there is no such property as Disabled like i posted in the first comment, it's "Enabled" instead...)
0
 
LVL 1

Author Comment

by:miv
ID: 1357226
The non-modal forms created by the form, can still recieve input, but you´re right, it works for the form where I set enabled:=false, sorry.
Is there any easy and fast way to disable all "child" windows.
I could traverse TForm.Controls and do it that way, but that seems to be slow ?

ps. Just answer the Q again, I will award you the points.
0
 
LVL 3

Accepted Solution

by:
Matvey earned 120 total points
ID: 1357227
You can disble all child windows like this:

  with Form1 do for I := MDIChildCount-1 downto 0 do
     MDIChildren[I].Enabled := False

-I don't think it's slow...

Sorry for the misunderstaning and good luck,
bosism@netvision.net.il
0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

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

Suggested Solutions

Title # Comments Views Activity
Delphi cmd execution 6 56
Dev Express grid collapse 2 39
select query - oracle 16 95
Graphics32 under Delphi 10.1 Berlin 2 40
Introduction The parallel port is a very commonly known port, it was widely used to connect a printer to the PC, if you look at the back of your computer, for those who don't have newer computers, there will be a port with 25 pins and a small print…
Have you ever had your Delphi form/application just hanging while waiting for data to load? This is the article to read if you want to learn some things about adding threads for data loading in the background. First, I'll setup a general applica…
This Micro Tutorial demonstrates using Microsoft Excel pivot tables, how to reverse engineer competitors' marketing strategies through backlinks.
Learn how to create flexible layouts using relative units in CSS.  New relative units added in CSS3 include vw(viewports width), vh(viewports height), vmin(minimum of viewports height and width), and vmax (maximum of viewports height and width).

863 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

Need Help in Real-Time?

Connect with top rated Experts

19 Experts available now in Live!

Get 1:1 Help Now