?
Solved

Display form on second monitor

Posted on 2002-05-19
7
Medium Priority
?
2,957 Views
Last Modified: 2013-11-13
I have a W2K PC with 2 screens.  The first is my main default display (21").  The second is a 15" touch screen.  I want my delphi application to run by default on the second screen for testing it.  The DefaultMonitor property does not seem to allow for this.
0
Comment
Question by:akb
7 Comments
 
LVL 9

Accepted Solution

by:
ginsonic earned 200 total points
ID: 7020847
Is simple . Just add at left property the width of the first screen .

For example :

  Left := 1024; // if you screen use 1024x768;
  Top  := 0;

In this case will run on ) point of the second monitor
 
0
 
LVL 9

Expert Comment

by:ginsonic
ID: 7020848
I use it in couple applications and work .
0
 
LVL 9

Expert Comment

by:ginsonic
ID: 7020858
Sorry :

Is simple . Just add at left property the width of the first screen .

For example :

 Left := 1024; // if your screen use 1024x768 resolution;
 Top  := 0;

 For width and height use normal values without add 1024 ( for this case ).
 
 Height := 600;
 Width  := 800;

 //Just for example .

In this case will run on (0,0) point of the second monitor and will show a form with 800x600 dimensions .
0
Keep up with what's happening at Experts Exchange!

Sign up to receive Decoded, a new monthly digest with product updates, feature release info, continuing education opportunities, and more.

 

Expert Comment

by:delpro
ID: 7021286
Try the following

set the Position property to poDesigned

Then in the FormCreate

procedure TForm1.FormCreate(Sender: TObject);
begin
Form1.Left := Screen.Width;
end;
0
 
LVL 13

Author Comment

by:akb
ID: 7023015
Thanks.  Also, is there any way to test for the second monitor and pickup it's size?
0
 

Expert Comment

by:MaciejWojciechowski
ID: 32631911
var
  m: TMonitor;
begin
  if Screen.MonitorCount > 1 then
    begin
    m := Screen.Monitors[1];
    -------- m.Left --> left position of second monitor
    -------- m.Width  --> width in pixels of second monitor
    -------- m.Height --> height in pixels of second monitor

    ....
    end;
end;
0
 

Expert Comment

by:smkmalang
ID: 39646816
Thank, for your help..
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.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

This article explains how to create forms/units independent of other forms/units object names in a delphi project. Have you ever created a form for user input in a Delphi project and then had the need to have that same form in a other Delphi proj…
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…
Watch the video of Kernel Migrator for SharePoint, which demonstrate the process easily of migration from SharePoint to SharePoint, OneDrive for Business & Google Drive servers, Public Folder to SharePoint, File Server to SharePoint. The tool has va…
Through the video, you can check the migration process of Outlook PST file to PDF. Kernel for Outlook to PDF tool can convert Outlook emails with all attributes like Subject, To, From, Cc, Bcc and other folders such as Inbox, Outbox, Sent Items, Jun…

569 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