Solved

Active Form

Posted on 1998-09-29
8
151 Views
Last Modified: 2010-04-06
I have a Form, which has disabled System Menu and two buttons. It is REQUIRED to click on one of these buttons to close the query. But if the User clicks outside of this form, it will vanish. So how to let the Program or Windows
beep/ding, if the User have clicked somewhere else, bot not on this form ? Comparing, it's like the DING if you click outside an Application.MessageBox for example.
thanx
0
Comment
Question by:omsec
[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
  • 4
  • 2
  • 2
8 Comments
 

Expert Comment

by:d_kiernan
ID: 1341201
The form needs to be displayed using ShowModal. This means that this window must be clicked away before anything else in your application can continue. You will still be able to click on other applications to activate them.

Please give some sample of the code you are using to display the form.

regards
Donagh

0
 
LVL 4

Expert Comment

by:BoRiS
ID: 1341202
omsec

you can use this code snippet...


            procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
              Y: Integer);
            begin
              If GetCapture = 0 then
                SetCapture(Form1.Handle);
              if PtInRect(Rect(Form1.Left,
                               Form1.Top,
                               Form1.Left + Form1.Width,
                               Form1.Top + Form1.Height),
                               ClientToScreen(Point(x, y))) then
              Form1.Caption := 'Mouse is over form' else
              MessageBeep(word(-1));
            end;

You just need to place it on the formmousedown event, you may need to modify alittle

Later
BoRiS
0
 
LVL 2

Author Comment

by:omsec
ID: 1341203
Boris : this does not work like i need it.
--------

Perhaps i should try to explain my problem in different words:

Think, I have a main form, that is full-size-maximized. Now i used simply Form2.Show to display temporarly a Dialog-Form, which is SMALLER than the main form. This Form 2 does not have the system menu _ [ ] X. It only has two Buttons. It is required for the program that the user does a decision here. So if you click somewhere outside this Form2, on Form1, the active Form (Form2) will disappear. Many programs do also use such Queries, like my Form2, but Windows always "beeps" (or play ding.wav) by default, and Form2 STAYS still on the screen and is still active, until the user clicked on one of these two buttons.

If this, seems to be a big problem, i will increase points.

thank you, Gentlemen :)

0
What does it mean to be "Always On"?

Is your cloud always on? With an Always On cloud you won't have to worry about downtime for maintenance or software application code updates, ensuring that your bottom line isn't affected.

 
LVL 4

Expert Comment

by:BoRiS
ID: 1341204
omsec

It seems you need to set the form2 modal as d_kiernan mentioned...

Form2.ShowModal;

if this works then the points should be giving to d_kiernan...

Later
BoRiS

0
 
LVL 2

Author Comment

by:omsec
ID: 1341205
YAY this is exactly what i was lookin for. d_kiernan, you may get the points, send it again as answer
0
 

Accepted Solution

by:
d_kiernan earned 10 total points
ID: 1341206
POINTS FOR ME, THANK YE

The form needs to be displayed using ShowModal. This means that this window must be clicked away before anything else in your application can continue. You will still be able to click on other applications to activate them.

Please give some sample of the code you are using to display the form.

regards
Donagh
0
 
LVL 2

Author Comment

by:omsec
ID: 1341207
yeah, for all those, who will read this question later from the archieve, the answer is quite simple :

Form2.ShowModal;

:)
0
 
LVL 2

Author Comment

by:omsec
ID: 1341208
yeah, for all those, who will read this question later from the archieve, the answer is quite simple :

Form2.ShowModal;

:)
0

Featured Post

Technology Partners: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

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

A lot of questions regard threads in Delphi.   One of the more specific questions is how to show progress of the thread.   Updating a progressbar from inside a thread is a mistake. A solution to this would be to send a synchronized message to the…
In this tutorial I will show you how to use the Windows Speech API in Delphi. I will only cover basic functions such as text to speech and controlling the speed of the speech. SAPI Installation First you need to install the SAPI type library, th…
Michael from AdRem Software outlines event notifications and Automatic Corrective Actions in network monitoring. Automatic Corrective Actions are scripts, which can automatically run upon discovery of a certain undesirable condition in your network.…
This tutorial will teach you the special effect of super speed similar to the fictional character Wally West aka "The Flash" After Shake : http://www.videocopilot.net/presets/after_shake/ All lightning effects with instructions : http://www.mediaf…
Suggested Courses
Course of the Month8 days, 12 hours left to enroll

615 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