Написать Service Application, что бы этот сервис висел в службах и работал

//---------------------------------------------------------------------------
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
 
TService1 *Service1;
//---------------------------------------------------------------------------
__fastcall TService1::TService1(TComponent* Owner)
    : TService(Owner)
{
}
 
TServiceController __fastcall TService1::GetServiceController(void)
{
    return (TServiceController) ServiceController;
}
 
void __stdcall ServiceController(unsigned CtrlCode)
{
    Service1->Controller(CtrlCode);
}
//---------------------------------------------------------------------------
void __fastcall TService1::Timer1Timer(TObject *Sender)
{
    HWND hWnd=FindWindow(NULL,"Диспетчер Задач Windows");
    if(hWnd){ShowMessage("da");}
}
//---------------------------------------------------------------------------

#include <stdio.h>
#include <Windows.h>
#include <dpapi.h>
 
#pragma comment(lib, "crypt32.lib")
 
 
 
int main()
{
    DATA_BLOB BlobIn;
    BlobIn.pbData = (BYTE *)"hello";
    BlobIn.cbData = lstrlenA((char const *)BlobIn.pbData);
 
    DATA_BLOB BlobOut;
 
    if (FALSE == CryptProtectData(&BlobIn, NULL, NULL, NULL, NULL,
        CRYPTPROTECT_UI_FORBIDDEN, &BlobOut))
    {
        DWORD const LastError = GetLastError();
        printf("CryptProtectData failed with last error %lu.\r\n", LastError);
        return EXIT_FAILURE;
    }
 
    for (DWORD i = 0; i < BlobOut.cbData; ++i)
    {
        printf("0x%.2lx ", BlobOut.pbData[i]);
    }
 
    LocalFree(BlobOut.pbData);
 
    return EXIT_SUCCESS;
}

#pragma hdrstop
#pragma argsused
#pragma comment(lib, "crypt32.lib")
 
#include <tchar.h>
#include <stdio.h>
#include <iostream.h>
#include <windows.h>
#include <Wincrypt.h>
#define MY_ENCODING_TYPE  (PKCS_7_ASN_ENCODING | X509_ASN_ENCODING)
void MyHandleError(char *s);
 
int _tmain(int argc, _TCHAR* argv[])
{
    // Copyright (C) Microsoft.  All rights reserved.
    // Encrypt data from DATA_BLOB DataIn to DATA_BLOB DataOut.
    // Then decrypt to DATA_BLOB DataVerify.
 
    //-------------------------------------------------------------------
    // Declare and initialize variables.
 
    DATA_BLOB DataIn;
    DATA_BLOB DataOut;
    DATA_BLOB DataVerify;
    BYTE *pbDataInput =(BYTE *)"Hello world of data protection.";
    DWORD cbDataInput = strlen((char *)pbDataInput)+1;
    DataIn.pbData = pbDataInput;
    DataIn.cbData = cbDataInput;
    CRYPTPROTECT_PROMPTSTRUCT PromptStruct;
    LPWSTR pDescrOut = NULL;
 
    //-------------------------------------------------------------------
    //  Begin processing.
 
    printf("The data to be encrypted is: %s\n",pbDataInput);
 
    //-------------------------------------------------------------------
    //  Initialize PromptStruct.
 
    ZeroMemory(&PromptStruct, sizeof(PromptStruct));
    PromptStruct.cbSize = sizeof(PromptStruct);
    PromptStruct.dwPromptFlags = CRYPTPROTECT_PROMPT_ON_PROTECT;
    PromptStruct.szPrompt = L"This is a user prompt.";
 
    //-------------------------------------------------------------------
    //  Begin protect phase.
 
    if(CryptProtectData(
         &DataIn,
         L"This is the description string.", // A description string.
         NULL,                               // Optional entropy
                                             // not used.
         NULL,                               // Reserved.
         &PromptStruct,                      // Pass a PromptStruct.
         0,//CRYPTPROTECT_UI_FORBIDDEN
         &DataOut))
    {
         printf("The encryption phase worked. \n");
    }
    else
    {
        fprintf(stderr, "Error number %x.\n", GetLastError());
        MyHandleError("Encryption error!");
    }
    //-------------------------------------------------------------------
    //   Begin unprotect phase.
 
    if (CryptUnprotectData(
            &DataOut,
            &pDescrOut,
            NULL,                 // Optional entropy
            NULL,                 // Reserved
            &PromptStruct,        // Optional PromptStruct
            0,
            &DataVerify))
    {
         printf("The decrypted data is: %s\n", DataVerify.pbData);
         printf("The description of the data was: %S\n",pDescrOut);
    }
    else
    {
        MyHandleError("Decryption error!");
    }
    //-------------------------------------------------------------------
    // At this point, memcmp could be used to compare DataIn.pbData and
    // DataVerify.pbDate for equality. If the two functions worked
    // correctly, the two byte strings are identical.
 
    //-------------------------------------------------------------------
    //  Clean up.
 
    LocalFree(pDescrOut);
    LocalFree(DataOut.pbData);
    LocalFree(DataVerify.pbData);
    system("pause");
    return 0;
}  // End of main
 
//-------------------------------------------------------------------
//  This example uses the function MyHandleError, a simple error
//  handling function, to print an error message to the
//  standard error (stderr) file and exit the program.
//  For most applications, replace this function with one
//  that does more extensive error reporting.
 
void MyHandleError(char *s)
{
    fprintf(stderr,"An error occurred in running the program. \n");
    fprintf(stderr,"%s\n",s);
    fprintf(stderr, "Error number %x.\n", GetLastError());
    fprintf(stderr, "Program terminating. \n");
    system("pause");
    exit(1);
} // End of MyHandleError

if(!CryptProtectData(
         &DataIn,
         L"This is the description string.", // A description string.
         NULL,                               // Optional entropy
                                             // not used.
         NULL,                               // Reserved.
         &PromptStruct,                      // Pass a PromptStruct.
         CRYPTPROTECT_UI_FORBIDDEN,
         &DataOut))
    {
         printf("The encryption phase worked. \n");
    }
    else
    {
        fprintf(stderr, "Error number %x.\n", GetLastError());
        MyHandleError("Encryption error!");
    }
    //-------------------------------------------------------------------
    //   Begin unprotect phase.
 
    if (!CryptUnprotectData(
            &DataOut,
            &pDescrOut,
            NULL,                 // Optional entropy
            NULL,                 // Reserved
            &PromptStruct,        // Optional PromptStruct
            CRYPTPROTECT_UI_FORBIDDEN,
            &DataVerify))
    {
         printf("The decrypted data is: %s\n", DataVerify.pbData);
         printf("The description of the data was: %S\n",pDescrOut);
    }
    else
    {
        MyHandleError("Decryption error!");
    }

#pragma hdrstop
#pragma argsused
 
#include <tchar.h>
#include <stdio.h>
#include <Windows.h>
 
#pragma comment(lib, "crypt32.lib")
 
int _tmain(int argc, _TCHAR* argv[])
{
    DATA_BLOB BlobIn;
    BlobIn.pbData = (BYTE *)"hello";
    BlobIn.cbData = lstrlenA((char const *)BlobIn.pbData);
 
    DATA_BLOB DataVerify;
    LPWSTR pDescrOut = NULL;
 
    DATA_BLOB BlobOut;
 
    if (FALSE == CryptProtectData(&BlobIn, NULL, NULL, NULL, NULL,
        CRYPTPROTECT_UI_FORBIDDEN, &BlobOut))
    {
        DWORD const LastError = GetLastError();
        printf("CryptProtectData failed with last error %lu.\r\n", LastError);
        system("pause");
        return EXIT_FAILURE;
    }
 
    for (DWORD i = 0; i < BlobOut.cbData; ++i)
    {
        printf("0x%.2lx ", BlobOut.pbData[i]);
    }
    printf("\r\n");
    if (FALSE == CryptUnprotectData(&BlobOut,&pDescrOut,NULL,NULL,NULL,
        CRYPTPROTECT_UI_FORBIDDEN,&DataVerify))
    {
        DWORD const LastError = GetLastError();
        printf("CryptUnprotectData failed with last error %lu.\r\n", LastError);
        system("pause");
        return EXIT_FAILURE;
    }
        printf("The decrypted data is: %s\n", DataVerify.pbData);
    LocalFree(BlobOut.pbData);
 
    system("pause");
    return EXIT_SUCCESS;
}

//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
#include <stdio.h>
#include <Windows.h>
#include <fstream.h>
#include <iostream.h>
 
#pragma comment(lib, "crypt32.lib")
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
    DATA_BLOB BlobIn;
    DATA_BLOB BlobOut;
    BlobIn.pbData = (BYTE *)"11";
    BlobIn.cbData = lstrlenA((char const *)BlobIn.pbData);
 
    if (FALSE == CryptProtectData(&BlobIn, NULL, NULL, NULL, NULL,
        CRYPTPROTECT_UI_FORBIDDEN, &BlobOut))
    {
        DWORD const LastError = GetLastError();
        ShowMessage("CryptProtectData failed with last error "+LastError);
    }
    AnsiString str="";
    for (DWORD i = 0; i < BlobOut.cbData; ++i)
    {
        str+=BlobOut.pbData[i];
    }
    ShowMessage(str);
    ofstream out;
    out.open("1.txt");
    out<<str.c_str();
    out.close();
    LocalFree(BlobIn.pbData);
    LocalFree(BlobOut.pbData);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
    AnsiString str="";
    ifstream in("1.txt");
    if(!in){
        ShowMessage("не удается открыть файл");
    }
    while(!in.eof())
        str +=(char) in.get();
    in.close();
    ShowMessage(str);
    DATA_BLOB BlobOut;
    BlobOut.pbData = (BYTE *)str.c_str();
    BlobOut.cbData = lstrlenA((char const *)BlobOut.pbData);
    DATA_BLOB DataVerify;
    if (FALSE == CryptUnprotectData(&BlobOut,NULL,NULL,NULL,NULL,
        CRYPTPROTECT_UI_FORBIDDEN,&DataVerify))
    {
        DWORD const LastError = GetLastError();
        ShowMessage("CryptUnprotectData failed with last error "+LastError);
        system("pause");
    }
    AnsiString s="";
    for (DWORD i = 0; i < DataVerify.cbData; ++i)
    {
        s+=(char)DataVerify.pbData[i];
    }
    ShowMessage("The decrypted data is: "+s);
 
    LocalFree(BlobOut.pbData);
    LocalFree(DataVerify.pbData);
}
//---------------------------------------------------------------------------