Мне знакомый недавно рассказал, что для Delphi 7 есть компонент TProgrammer. Что якобы, его нужно лишь кинуть на формочку, а потом лишь настроить его параметры, и программа готова. Где его найти? Желательно с crack

А>Мне знакомый недавно рассказал, что для Delphi 7 есть компонент TProgrammer. Что якобы, его нужно лишь кинуть на формочку, а потом лишь настроить его параметры, и программа готова. Где его найти? Желательно с crack

Очень надо! Курсач горит!!!

Здравствуйте, <Аноним>, Вы писали, а я сделал добавки :

А>Мне знакомый шутник недавно 1 апреля рассказал вешал лапшу, что для Delphi 7 есть живой компонент TProgrammer без комментариев. Что якобы, его нужно лишь кинуть усадить на формочку на раб. место, а потом лишь этот "лишь" может быть не раз настроить его параметры дать денег, и программа готова ну ну. Где его найти? www.job.ru Желательно с crack с опытом работы

Здравствуйте, Аноним, Вы писали:

А>Мне знакомый недавно рассказал, что для Delphi 7 есть компонент TProgrammer. Что якобы, его нужно лишь кинуть на формочку, а потом лишь настроить его параметры, и программа готова. Где его найти? Желательно с crack

Его разработку давно купила Microsoft, и теперь выпускается серия компонентов TMCSD,TDeveloper и элитный TBillGates. Стоят кучу денег, крака нету. Так что...

Просто этот компонент наверно наследник всех уже существующих компонентов по 3 раза.

Здравствуйте, Аноним, Вы писали:

А>Мне знакомый недавно рассказал, что для Delphi 7 есть компонент TProgrammer.

На самом деле да, существует. Это самая обычная фабрика классов, встроенная в среду Дельфи. Ничего кидать на форму не надо — у нее есть визард. Запускается из меню File\New Application... Далее настраиваем параметры и, вуаля, — программа готова. Язык настройки — Object Pascal

Здравствуйте, Аноним, Вы писали:

А>Мне знакомый недавно рассказал, что для Delphi 7 есть компонент TProgrammer. Что якобы, его нужно лишь кинуть на формочку, а потом лишь настроить его параметры, и программа готова. Где его найти? Желательно с crack

Да я такой компонент писал на 2 курсе! Как ни странно, ничего не получилось
Слышал также, что есть подобные разновидности компонент: TUser, TProjrctManager, TPresidentOfSoftwareCompony (Тоже делать ничего не нужно, только разбрасывать их правильно на форме)

Да забыл упомянуть, что закладка, на которой лежат все упомянутые компоненты невидима. А для того, что бы делать ее видимой необходимо набрать комбинацию клавиш "IDKFA", при активном окне в проекте в DesignTime.

Здравствуйте, Рома, Вы писали:

Р>Да я такой компонент писал на 2 курсе! Как ни странно, ничего не получилось
Р>Слышал также, что есть подобные разновидности компонент: TUser, TProjrctManager, TPresidentOfSoftwareCompony (Тоже делать ничего не нужно, только разбрасывать их правильно на форме)

А я немножко другие писал ввиду проблем с железом в институте — TPentium2, T5гиговВинт, TDIMM32M. Почти написал, немножко недолелал.

На самом деле лучше поискать компонент TLife и крак позволяющий создавать неограниченное количество объектов TMoney. Тогда и TProgrammer искать не прийдется. А вообще про это уже писали

Автор: fuurin
Дата: 05.09.02

Здравствуйте, Рома, Вы писали:

Р>Да я такой компонент писал на 2 курсе! Как ни странно, ничего не получилось
Р>Слышал также, что есть подобные разновидности компонент: TUser, TProjrctManager, TPresidentOfSoftwareCompony (Тоже делать ничего не нужно, только разбрасывать их правильно на форме)

А ни у кого случайно нет TMoneyButton (Это такая кнопка с большой надписью Make BIG Money).

Здравствуйте, Anatolix, Вы писали:

A>Здравствуйте, Рома, Вы писали:

A>А ни у кого случайно нет TMoneyButton (Это такая кнопка с большой надписью Make BIG Money).

Есть функция:

type
  TMoneyType = (mtEuro, mtUSD, mtRuble, mtTugrik);


function GetBIGMoney(AMoneyType: TMoneyType; AAmount: Real): TBIGMoneyType;

Здравствуйте, Рома, Вы писали:

    void CHusband::GiveMoney()
    {
        Box.Open();
        CMoney money = Box.GetMoney();
        m_Wife.TakeMoney( money );
    };


    ...

    void CWife::TakeMoney()
    {
        Box.Open();
        Box.PutMoney( money );
        m_Husband.GiveMoney();
    };

Здравствуйте, UgN, Вы писали:

UgN>Здравствуйте, Рома, Вы писали:

UgN>
UgN>

UgN>    void CHusband::GiveMoney()
UgN>    {
UgN>        Box.Open();
UgN>        CMoney money = Box.GetMoney();
UgN>        m_Wife.TakeMoney( money );
UgN>    };

UgN>
UgN>    ...

UgN>    void CWife::TakeMoney()
UgN>    {
UgN>        Box.Open();
UgN>        Box.PutMoney( money );
UgN>        m_Husband.GiveMoney();
UgN>    };
UgN>

Низя так! А закрывать коробку кто будет?

Здравствуйте, cMex, Вы писали:

M>Низя так! А закрывать коробку кто будет?

Да...

Поторопился, не отладил...

Здравствуйте, UgN, Вы писали:

UgN>Здравствуйте, Рома, Вы писали:


UgN>

UgN>    void CHusband::GiveMoney()
UgN>    {
UgN>        Box.Open();
UgN>        CMoney money = Box.GetMoney();
UgN>        m_Wife.TakeMoney( money );
UgN>    };


UgN>    ...

UgN>    void CWife::TakeMoney()
UgN>    {
UgN>        Box.Open();
UgN>        Box.PutMoney( money );
UgN>        m_Husband.GiveMoney();
UgN>    };
UgN>

Представь схему алгоритма !!! И коробочку с денюжками все таки закрой, а то мало ли что

Здравствуйте, Рома, Вы писали:


Р>Представь схему алгоритма !!! И коробочку с денюжками все таки закрой, а то мало ли что

Пожалуйста.

    void CHusband::GiveMoney()
    {
        Box.Open();
        CMoney money = Box.GetMoney();
        Box.Close();
        m_Wife.TakeMoney( money );
    };

    ...

    void CWife::TakeMoney()
    {
        Box.Open();
        Box.PutMoney( money );
        Box.Close();
        m_Husband.GiveMoney();
    };

...

-- Где деньги взял?

-- В тумбочке.

-- А в тумбочке они откуда?

-- Жена положила.

-- А жена где взяла?

-- Я дал.

-- А ты где взял?!!

-- Ну я же говорю: в тумбочке!

...

Здравствуйте, <Аноним>, Вы писали:

А>Мне знакомый недавно рассказал, что для Delphi 7 есть компонент TProgrammer. Что якобы, его нужно лишь кинуть на формочку, а потом лишь настроить его параметры, и программа готова. Где его найти? Желательно с crack

Возьми MFC реализацию CProgrammer, подключи с помощью obj или dll:

class CProgrammer : public CProgrammer1C{
 friend class CBigBrother ;
public:
 DECLARE_DYNAMIC( CProgrammer )
 CPorogrammer() : CProgrammer1C() { DoNothing(); }
 ~CPorogrammer();
 virtual void DoNothing(){ 
  HANDLE hFeatures = (HANDLE)::AfxGetAllUndocumentedFeaturesAndVariableFromDelphi("7.0", MORE);
  while(1){
   // TODO: Place code here.
  } 
  AfxReleaseAllUndocumentedFeaturesAndVariableForOtherDelphiProgrammer(hFeatures);
 }
};

Здравствуйте, UgN, Вы писали:

UgN>Здравствуйте, Рома, Вы писали:


Р>Представь схему алгоритма !!! И коробочку с денюжками все таки закрой, а то мало ли что

UgN>Пожалуйста.

Ребята! Во-первых, надо сделать код потокобезопасным!
Во вторых, а кто будет обрабатывать исключения???

Здравствуйте, Sinclair, Вы писали:

S>Ребята! Во-первых, надо сделать код потокобезопасным!
Откуда еще поток? Жена-то одна...
Это код для обычной семьи, для многоженства там вообще все по-другому.
Хотел написать, да боюсь не выйдет: опыта мало...

S>Во вторых, а кто будет обрабатывать исключения???
Над этим думаю...
Очень сложно поймать вылетающие исключения типа "сковородка"...