Screensaver - joining two programs into one

Posted on 1997-06-16
Last Modified: 2010-04-04
This is probably a 'chestnut' but having made 2 programs (a control panel to write data to control.ini and another to read it and draw the patterns, respond to input and bring up password forms etc) how do I join them into a single .exe in Delphi 2 under NT4/W95?
I assume the new .dpr has to be modified and I know about checking for the /s option with paramstring etc, but how is everything joined together and only a single instance run?
Thanks in advance, Catherine.
Question by:mobius
  • 5

Author Comment

ID: 1337072
Adjusted points to 150

Author Comment

ID: 1337073
Edited text of question

Author Comment

ID: 1337074
Edited text of question
Top 6 Sources for Identifying Threat Actor TTPs

Understanding your enemy is essential. These six sources will help you identify the most popular threat actor tactics, techniques, and procedures (TTPs).


Accepted Solution

icampbe1 earned 150 total points
ID: 1337075
Hi Catherine,

The easiest way to accomplish the combining of the two programs is to start with one of them (doesn't really matter which one) and then add the Unit (the pas, not the dpr) file of the other one to the first one.  You can use the + speed button.  That unit then becomes part of the first project.  You can then add the unit name of the second unit to the USES claus of the first.

What you do next, depends on what you're trying to accomplish in your program.  This however, will combine the two into one project and therefore one EXE.

Ian C. (Toronto)


Author Comment

ID: 1337076
Hello Ian, thanks for the quick reply. Perhaps I should have said more in the original question.

I know how to add a .pas to the uses clause as that's how I get the two main programs to call up the password boxes, aboutsaver info etc, as each is an otherwise independent program that's run in showmodal state by createapplication, but what I was after was a way of calling each of the two main programs from some sort of otherwise empty 'shell' which would have them in the uses clause, and then parse the command line to check for the /s option with the params function.

I'd already tried having everything in one large (and rather unwieldy) program and even got the /s parsing OK, so I'm fairly confident about that aspect, but although the new program ran perfectly as a .exe as soon as I changed it to a .scr the display control panel in NT4 kept calling the saver as soon as it was listed rather than when the setup button was pressed, and under W95 I kept getting multiple instances of the saver's control panel that appeared over and over again.

Hope this makes sense,


Author Comment

ID: 1337077
Why does the system say I accepted the answer when I didn't?
Also, you seems to have tane 15 points but I advertised 150 and I've been debited that amount for something that doesn't answer the original question.

Featured Post

Highfive Gives IT Their Time Back

Highfive is so simple that setting up every meeting room takes just minutes and every employee will be able to start or join a call from any room with ease. Never be called into a meeting just to get it started again. This is how video conferencing should work!

Join & Write a Comment

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…
Introduction I have seen many questions in this Delphi topic area where queries in threads are needed or suggested. I know bumped into a similar need. This article will address some of the concepts when dealing with a multithreaded delphi database…
This video discusses moving either the default database or any database to a new volume.
Polish reports in Access so they look terrific. Take yourself to another level. Equations, Back Color, Alternate Back Color. Write easy VBA Code. Tighten space to use less pages. Launch report from a menu, considering criteria only when it is filled…

747 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

11 Experts available now in Live!

Get 1:1 Help Now