Как сделать чтобы во время работы вашего приложения сами запускались 
                                      те или иные программы элементов)*
/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\
Для этого нужен таймер (Timer1: TTimer)
После функции Private введите a:integer; Примерно так:
---------------------------------------------------------------------------------------------------------------------------------------
  Private
        a:integer;
        { Private declarations }
----------------------------------------------------------------------------------------------------------------------------------------
Например сделаем так, чтобы через какое то время приложение само
закрывалось.
И так вводим программный код к таймеру (Timer1: TTimer):
----------------------------------------------------------------------------------------------------------------------------------------
procedure TForm1.Timer1Timer(Sender: TObject);
begin
a:=a+1;
If a=100 Then
begin
Close( );
end;

end. 
------------------------------------------------------------------------------------------------------------------------------------------
Теперь, когда значение "a" будет равно 100%  (строка If a=100 Then begin
Close( );) приложение закроется автоматом.
------------------------------------------------------------------------------------------------------------------------------------------
)* - Этот элемент уже используется в моих прграммах,
 и вы можете подгрузить их самих и
их проекты на моём сайте по адресам:
http://www.kudruavtsev.narod.ru/del.html
http://www.kudruavtsev.narod.ru/loveyou.html

Автор программы, идеи и текста: Кудрявцев Юра (PAYBACK co. #2000)

Internet: http://www.kudruavtsev.narod.ru
Mail-me: backpayback_yura@mail.ru