_LIT( KWzorzecNazwy, "calendar*" );

TFindProcess wyszukiwarka( KWzorzecNazwy );
// Szukamy pierwszej dostpnej instancji procesu aplikacji kalendarza.
TFullName nazwaProcesu;
TInt blad = wyszukiwarka.Next( nazwaProcesu );

if( blad == KErrNone )
{
    //nazwaProcesu = "calendar.exe[10005901]0001"
        
    RProcess kalendarz;
    blad = kalendarz.Open( nazwaProcesu );
    
    if( blad == KErrNone )
    {
        // Operacje na procesie...
        
        // Zamykamy uchwyt do procesu.
        kalendarz.Close();
    }
}
