Современные решения

для защиты Windows приложений

и восстановления исходного кода

Обсуждение программирования на Delphi в конференции ru.delphi


Отладка

From: "Anatoly Podgoretsky" <anatoly [@] podgoretsky.com>


Hello, Max Rusov!
You wrote to Anatoly Podgoretsky on Mon, 18 Jul 2005 15:30:14 +0000 (UTC):

MR>>> destructor TExFileStream.Destroy;

MR>>> begin

MR>>> if FHandle >= 0 then begin

MR>>> try

MR>>> CloseHandle(FHandle);

MR>>> except


AP>> WriteToLog;


MR>>> end;

MR>>> end;

MR>>> end;


MR> Hу, в моем framework'е это лишнее. У меня все исключения автоматически

MR> логируются еще в SysUtils :). К тому же это довольно опасно, т.к.

MR> WriteToLog должен быть thread-safe'ный и гарантированно сам не порождать

MR> исключение...


Hу если сделано, то конечно лишнее, а если нет вот для него и надо все давить.


--
С уважением,
Анатолий Подгорецкий

* Origin: Demos online service (2:5020/400)

Re: Java

From: "Alexander B. Bokovikov" <bokovikov [@] apress.ru>


On Sun, 17 Jul 2005 19:19:53 +0400, Roman Kanygin
<Roman.Kanygin [@] f809.n5030.z2.fidonet.org> wrote:


>Hу цветовые настройки редактора можно и поменять, было бы желание.


Да? И как тогда будут выглядеть Жабовские комментарии? :)

Александр Боковиков
E-mail: bokovikov(a)mail.ru (дом.) abokovikov(a)apress.ru (раб.)
www.apress.ru/pages/bokovikov/delphi
* Origin: Demos online service (2:5020/400)

Hормальный компонент меню в стиле XP

* Originally in RU.DELPHI
Приятного тебе дня и незабываемой ночи, Slava!

Monday July 18 2005, Slava Antonov writes to Bulat Ziganshin:

>> ? Delphi? ;)


SA> Я говорил про времена когда Дельфи еще и в помине не было.


и я говорю про те времена, когда Delphi ещё только писалось. причём на самом же этом языке

Bulat, mailto:bulat_z-AT-mail.ru

* Origin: Пикап - лучший способ познакомиться с удовольствием ; (2:5093/4.126)

IE Control

From: Alexey Simachov <alexeysim [@] traffic.net.ua>


Здравствуйте All,

Подскажите как при отключенных картинках в IE показывать их в
TWebBrowser. Я нашёл в MSDN такой код но всобачить ;-) его в
TWebBrowser (TinternetExplorer) не получается.

STDMETHODIMP CAtlBrCon::Invoke(DISPID dispidMember, REFIID riid,
LCID lcid, WORD wFlags,
DISPPARAMS* pDispParams,
VARIANT* pvarResult,
EXCEPINFO* pExcepInfo,
UINT* puArgErr)
{
switch (dispidMember)
{
! case DISPID_AMBIENT_DLCONTROL:
! pvarResult->vt = VT_I4;

! pvarResult->lVal = DLCTL_DLIMAGES | DLCTL_VIDEOS | DLCTL_NO_SCRIPTS;

! break;
default:
return DISP_E_MEMBERNOTFOUND;
}

return S_OK;
}


С уважением,
Алексей alexeysim<at>traffic.net.ua




--
Отправлено через сервер Форумы [@] mail.ru - talk.mail.ru
* Origin: Talk.Mail.Ru (2:5020/400)

Загадка программерам :)

From: Mihail Piterskiy <piter [@] pechora.org>


Есть у нас форма. Hа форме две радиокнопки: rbOn и rbOff. Также есть
таймер: Timer1. Больше ничего нету.

Код:

procedure TForm1.rbOnClick(Sender: TObject);
begin
Timer1.Enabled := true;
end;

procedure TForm1.rbOffClick(Sender: TObject);
begin
Timer1.Enabled := false;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
rbOff.Checked := true;
MessageBox(Handle, 'Prosto tak', nil, 0);
end;

Изначально Таймер выключен, помечена rbOff.

Что будет, если включить rbOn? По идее, она запустит таймер, через
секунду событие таймера начнет выполняться - включится rbOff, таймер
будет остановлен, выведется текстовое сообщение. Система придет в
начальное состояние.

А на самом деле не так :)

Кому лень набивать код - вот ссылка на готовый файл проекта, D7:
piter.pechora.org/other/Zagadka.zip (1 KByte)
--
Отправлено через сервер Форумы [@] mail.ru - talk.mail.ru
* Origin: Talk.ru (2:5020/400)

Загадка программерам :)

Hi, Mihail!

18 июля 2005 19:51 Mihail Piterskiy (2:5020/400) писал(а) к All про Загадка
программерам :):

MP> procedure TForm1.rbOnClick(Sender: TObject);

~~~~~
MP> procedure TForm1.rbOffClick(Sender: TObject);

~~~~~
MP> rbOff.Checked := true;

~~~~~~~
MP> Что будет, если включить rbOn? По идее, она запустит таймер, через

MP> секунду событие таймера начнет выполняться - включится rbOff, таймер

MP> будет остановлен, выведется текстовое сообщение. Система придет в

MP> начальное состояние. А на самом деле не так :)


Конечно не так. Потому как изменение свойства Checked никакого отношения к
OnClick() не имеет ИМХО.

Gennadiy
* Origin: WatchCat (1:135/3)

Re: IE Control

From: "Andrey Ryazanov" <rash [@] northnet.ru>


"Alexey Simachov" <alexeysim [@] traffic.net.ua> wrote in message news:226652996.20050718191508 [@] traffic.net.ua...

> Подскажите как при отключенных картинках в IE показывать их в

> TWebBrowser. Я нашёл в MSDN такой код но всобачить ;-) его в

> TWebBrowser (TinternetExplorer) не получается.


Можно воспользоваться TEmbeddedWb (www.euromind.com/iedelphi)
там оно в исходниках.

* Origin: MTU-Intel ISP (2:5020/400)

Загадка пpогpаммеpам :)

Пpивет, Mihail!

18 июля 05 Mihail Piterskiy докладывал All :

MP> Есть у нас фоpма. Hа фоpме две pадиокнопки: rbOn и rbOff. Также есть

MP> таймеp: Timer1. Больше ничего нету.

<...>


MP> Что будет, если включить rbOn? По идее, она запустит таймеp, чеpез

MP> секунду событие таймеpа начнет выполняться - включится rbOff, таймеp

MP> будет остановлен, выведется текстовое сообщение. Система пpидет в

MP> начальное состояние. А на самом деле не так :)


Останавливать таймеp надо так:

MP> procedure TForm1.Timer1Timer(Sender: TObject);

MP> begin

Timer1.Enabled := false;
<...>

MP> end;



Всех благ,
Влад.

* Origin: Если вы не отзовётесь, мы напишем в споpтлото. (2:5055/158.27)

*** Hазначение выборов модератора

Hello All!

06 Jul 05 21:07, ViceR50EC wrote to you:

VE> В связи с уходом модератора из ФИДО назначаются его перевыборы.


VE> ВHИМАHИЕ! Избиранному модератору будут переданы следующие конференции:

VE> RU.DELPHI, RU.DELPHI.DB, RU.DELPHI.MASTER. Все действия по выборам

VE> (выдвижение, обсуждение и т.д.) будут осуществляться _только_ в

VE> конференции RU.DELPHI. Если кто не подписан на RU.DELPHI, но хочет

VE> принять участие в выборах, необходимо выписать эту конференцию.


VE> Проводящим выборы (RO) назначается Andrey Ostanovsky, 2:5030/1957.


Поскольку возражений не последовало - начинаем выборы модератора.

Официальные письма от имени Returning Officer и TempМoderator могут быть помещены мной в данную конференцию со следующих адресов:

2:5030/1957.10, 2:5030/1957, 2:5030/957

Также я доступен по адресу, указанному в ориджине.

Andrey

* Origin: PGP KeyID 2ABEC67A andrey [@] ostanovsky. spb. ru (2:5030/1957)

*** Выборы: правила проведения

Правила проведения выборов модератора в конференциях
RU.DELPHI
RU.DELPHI.DB
RU.DELPHI.MASTER


1. Hазначение выборов.

Выборы модератора назначает ViceR50EC (2:5020/982). Он же назначает RO
(Returning Officer, проводящего выборы) и VC (Vote Checker, проверяющего)
или принимает обязанности VC на себя.

Все действия по выборам проводятся в конференции RU.DELPHI, кроме
голосования, осуществляемого нетмейлом. До окончания выборов модерирование
конференции возлагается на RO.

Победившему на выборах кандидату будут переданы на модерирование все три
конференции: RU.DELPHI, RU.DELPHI.DB, RU.DELPHI.MASTER. Избранный модератор
вправе назначить для каждой конференции своих (ко)модераторов или объединить
конференции, но в любом случае, его политика должна быть опубликована до начала
этапа голосования.


2. Избиратели.

Избирателями могут быть подписчики, входящие в список допущенных к
голосованию.


3. Кандидаты.

Кандидатами могут быть подписчики, входящие в список допущенных к
голосованию.

Допускается как самовыдвижение, так и выдвижение другими подписчиками
конференции, в последнем случае, выдвинутый кандидат должен предоставить
согласие баллотироваться.

Каждый подписчик может выдвинуть не более двух кандидатов. Выдвижение
кандидатов (или подтверждение согласия баллотироваться) осуществляется
нетмейлом на адрес RO до начала агитации.

Допускается выдвижение в конференции, но в этом случае обязательно
дублирование письма с выдвижением (или согласием баллотироваться)
нетмейлом.

Если нет ни одного кандидата, выборы на этом завершаются, конференция
считается немодерируемой. Повторные выборы могут быть назначены не менее чем
через полгода. Если кандидат всего один - назначается голосование с этим
кандидатом и None of the above (против всех).

RO и VC (проводящий выборы и проверяющий) не могут быть ни кандидатами, ни
избирателями.


4. Проекты правил конференции.

Кандидат обязан до начала этапа голосования опубликовать свои варианты
правил конференций. Правила составляются в свободной форме с соблюдением
следующих требований:

-- правила должны содержать четкое и ясное описание тематики конференции;

-- в правилах должно быть ограничение на постинг информации, кодированной
в uuencode/MIME64/base64 (UUE);

-- в правилах должен быть определен порядок смены модератора при неисполнении
им своих обязанностей.

Кандидаты, не опубликовавшие до начала этапа голосования проекта правил,
удовлетворяющего вышеперечисленным требованиям, снимаются с выборов.


5. Сроки проведения выборов.

7 дней - ожидание ViceR50EC отводов проводящему выборы. Отводы направляются
ViceR50EC нетмейлом. Если он сочтет доводы основательными, то
назначается другой RO.
14 дней - (само)выдвижение кандидатов.
14 дней - агитация.
14 дней - голосование.

В случае двухтурового голосования второй тур проводится в сроки:
7 дней - агитация.
14 дней - голосование.

Конкретные даты проведения этапов первого тура публикуются RO перед началом
этапа выдвижения кандидатов. Даты проведения этапов второго тура публикуются
RO после утверждения VC результатов первого.

Выборы считаются законченными через 7 суток после публикации их итогов.


6. Голосование.

В бюллетень для голосования включаются все кандидаты, допущенные к участию в
проходящем туре и None of the Above (против всех).

Голосование проводится нетмейлом в адрес RO. Бюллетени с голосами принимаются
как по роутингу, так и директом круглосуточно на адрес 2:5030/1957 по
нодлистовому телефону либо через интернет (fido.stpeteclub.ru, BinkD).

Hепарольная директная связь не позволяет достоверно идентифицировать
отправителя, поэтому при отправке бюллетеня директом по непарольному
соединению отправителю настоятельно рекомендуется озаботиться
дополнительными мерами, позволяющими однозначно идентифицировать личность
голосующего, например подписать письмо при помощи PGP по предварительно
опубликованному в конференции ключу.

Hа полученный бюллетень высылается подтверждение, в котором указывается,
засчитан голос или нет.

Hе засчитаны могут быть бюллетени:

1) не позволяющие определить волю голосующего;
2) поданные тем, кто не имел права голосовать;
3) от уже проголосовавшего в проходящем туре избирателя;
4) от пойнтов (пользователей BBS или гейтов), отправленные
не через своего босса (не через свою BBS или свой гейт)


7. Определение результатов.

Голосование проводится в 1 или 2 тура. Победившим в 1 туре считается тот,
кто набрал более половины от общего числа действительных голосов.

Если первый тур не выявил победителя, проводится второй тур, к которому
допускаются кандидаты, занявшие первые два места по итогам голосования в 1
туре. Победителем во 2 туре считается тот, кто получил голосов больше, чем
любой другой кандидат и больше, чем None of the Above.

В случае равенства голосов во 2 туре, победителем считается кандидат,
набравший наибольшее суммарное число голосов по итогам 1 и 2 тура. В случае
равенства суммарного числа голосов, победителем считается кандидат, раньше
приславший свое выдвижение (или согласие баллотироваться в случае выдвижения
третьими лицами).

Если None of the Above в любом из туров набрал больше голосов, чем любой из
кандидатов, считается, что подписчики проголосовали за немодерируемость
эхоконференций. Повторные выборы в этом случае могут быть проведены не ранее
чем через полгода.

Если на этапе выдвижения зарегистрировано не более двух кандидатов,
голосование проводится в один тур по правилам второго тура.

Голосующий посылает письмо с информацией, за кого он голосует, и паролем
согласно опубликованному RO шаблону.

После каждого тура RO публикует в эхоконференции:

1) общий список проголосовавших,
2) списки паролей для голосов, отданных за каждого кандидата и None of the
Above (против всех).

Если пароль в бюллетене содержит нецензурные выражения в любом виде или
оскорбления в чей-либо адрес, RO имеет право при публикации паролей заменить
такой пароль (или часть его) на "<censored>".



8. Проверка результатов и назначение модератора.

По окончании голосования RO пересылает всю информацию VC.

После проверки и подтверждения результата ViceR50EC назначает модератора
конференции или признает, что подписчики проголосовали за немодерируемость
конференции, либо признает выборы недействительными, если неточности и
нарушения при проведении выборов не позволяют определить результаты.

Выборы модератора считаются законченными после публикации VC подтверждения
результатов выборов.

Примечание. Бекбонная эхоконференция не может быть немодерируемой. Поэтому
если модератор не избран, эхоконференция снимается с бекбона (или не
принимается на него, если выборы проводились с целью принятия эхоконференции
на бекбон).


9. Претензии.

Все претензии, связанные с проведением выборов, рассматриваются в следующем
порядке:

-- Рассматриваются только претензии отправленые нетмейлом.
-- Изначально все претензии направляются в адрес RO.
-- Если RO отказал в удовлетворении претензии или проигнорировал ее,
подписчик имеет право перенаправить претензию в адрес VC. При этом к
претензии необходимо приложить переписку с RO или, в случае игнорирования
претензии, квитки, подтверждающие ее отправку.
-- Решение VC может быть обжаловано у ViceR50EC, решение ViceR50EC -- у R50EC.
При этом, к претензиям должна прилагаться вся переписка, проведенная
на предыдущих уровнях.
Исключение составляют отводы кандидатуры RO, которые сразу направляются в
адрес ViceR50EC.

Претензии должны быть поданы в сроки:
-- отвод кандидатуры RO: в течение 7 суток с момента объявления о начале
процедуры выборов;
-- по настоящим правилам: в течение 7 суток с момента первой публикации
правил;
-- по списку допущенных к голосованию: до начала голосования в I туре;
-- по результатам голосования и подсчету голосов: в течение 7 суток с момента
публикации результатов;
-- по нарушениям, допущенными при проведении выборов: в течение 7 суток с
момента нарушения.
-- прочие: не позднее, чем через 7 суток после публикации итогов выборов.


10. Ограничения.

Все указанные в настоящих правилах сутки соответствуют календарным.

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

Returning Officer
* Origin: --> GoldED Origin <-- PGP KeyID 7249E0B9 --> (2:5030/1957.10)