Отправляет email-рассылки с помощью сервиса Sendsay

Программирование. Форум !!!

За 2004-07-09

Анализ нажатий

Столкнулся в C Builder с такой проблемой:
Есть форма и есть кнопка на ней. При загрузке проекта фокус автоматически ставиться
на кнопку. Затем не обходимо онализировать нажатие на клавиши, и если эти клавиши
есть стрелки или Enter, то необходимо выполнять некий набор действий. НО. В процедуры
OnKeyDown и OnKeyPress программа заходит только если нажаты какие-либо другие
клавиши... А вот на нажатие стрелок никак не реагирует. т.е. Ставил брекпоинт,
он даже не заходит в нужную процедуру. Можно ли как-то заставить его анализировать
именно эти клавиши?
Выяснил, что если на кнопке не стоит фокус, то эти события замечательно обрабатываются
формой... Но при этом никак не получаетсся убрать фокус с кнопки...
Проясните ситуацию, кто сталкивался, плиз...

/Alf

Номер выпуска : 3402
Возраст листа : 291 (дней)
Количество подписчиков : 435
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/187408
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Адрес подписки:
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписать: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

   Дима Барсуков 2004-07-09 17:42:22 (#187408)

Re[4]: Delphi+e-mail

Привет, Петро, мне 09.07.2004 пришло:

П> Вешай эту процедуру хоть по клику на кнопку, хоть на таймер,
П> если не знаеш как,пиши,поможем.

П> Компонента NMSMTP в Делфи 6 в закладке FastNet.

П> procedure TForm1.Button1Click(Sender: TObject);
П> begin
П> NMSMTP1.Host := 'smtp.mailserver.com';
П> NMSMTP1.UserID := 'abdulah';
П> NMSMTP1.Connect;

П> NMSMTP1.PostMessage.FromAddress := 'отАдреса';
П> NMSMTP1.PostMessage.ToAddress.Text := 'комуТоПоАдресу';
П> NMSMTP1.PostMessage.Body.Text := 'Текст письма';
П> NMSMTP1.PostMessage.Subject := 'Тема письма';
П> NMSMTP1.SendMail; {и отправляем }
П> end;

Всем спасибо за помощь!!! Все получилось)))

Правда более простым методом
На вкладке Indy Clients есть компонента IdSMTP ))))

SMTP1.QuickSend(EditHost.Text, EditSubject.Text,
EditTo.Text, EditFrom.Text, EditText.Text);

P.S. Не думал, что все так просто )))

/\/\/\/\/\/\/\/\/\/\/\/\/\/\
( с уважением, Octo, пока ;) )
\/\/\/\/\/\/\/\/\/\/\/\/\/\/

Номер выпуска : 3401
Возраст листа : 291 (дней)
Количество подписчиков : 435
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/187407
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Адрес подписки:
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписать: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

   Octo 2004-07-09 17:41:47 (#187407)

Создания Alias в BDE...

Здравствуйте, коллеги.

Кто-нибудь может подсказать, как можно программно на Делфи и
Билдере создавать Алиасы в BDE с указанием его имени, типа и пути к
Базе ?
Когда-то я где-то это уже видел, но тогда не было необходимости и не
придал этому большое значение. Теперь вот срочно понадобилось, а
найти не могу.

   Feniks 2004-07-09 11:08:28 (#187270)

Re[3]: Delphi+e-mail

Hello Octo,

Thursday, July 8, 2004, 7:00:32 PM, you wrote:

O> Привет, Elmo, мне 08.07.2004 пришло:

O>>> У меня тут вопросик. Можно ли средствами Delphi написать программку
O>>> которая каждые 5 мин будет отправлять на определенный адрес письмо?
E>> Короткий ответ - можно.

E>> Дельфи - язык (среда разработки??) универсального назначения,
E>> ориентированный на графический интерфейс и простоту разработки.

O> А может еще кто-нить приведет пример кода, или хоть приблизительно
O> скажет, как это делать???

O> /\/\/\/\/\/\/\/\/\/\/\/\/\/\
O> ( с уважением, Octo, пока ;) )
O> \/\/\/\/\/\/\/\/\/\/\/\/\/\/

Вешай эту процедуру хоть по клику на кнопку, хоть на таймер,
если не знаеш как,пиши,поможем.

Компонента NMSMTP в Делфи 6 в закладке FastNet.

procedure TForm1.Button1Click(Sender: TObject);
begin
NMSMTP1.Host := 'smtp.mailserver.com';
NMSMTP1.UserID := 'abdulah';
NMSMTP1.Connect;

NMSMTP1.PostMessage.FromAddress := 'отАдреса';
NMSMTP1.PostMessage.ToAddress.Text := 'комуТоПоАдресу';
NMSMTP1.PostMessage.Body.Text := 'Текст письма';
NMSMTP1.PostMessage.Subject := 'Тема письма';
NMSMTP1.SendMail; {и отправляем }
end;

Номер выпуска : 3399
Возраст листа : 291 (дней)
Количество подписчиков : 435
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/187218
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Адрес подписки:
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписать: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

   Петро 2004-07-09 10:07:23 (#187218)

Re[2]: Delphi+e-mail

Привет, Elmo, мне 08.07.2004 пришло:

O>> У меня тут вопросик. Можно ли средствами Delphi написать программку
O>> которая каждые 5 мин будет отправлять на определенный адрес письмо?
E> Короткий ответ - можно.

E> Дельфи - язык (среда разработки??) универсального назначения,
E> ориентированный на графический интерфейс и простоту разработки.

А может еще кто-нить приведет пример кода, или хоть приблизительно
скажет, как это делать???

/\/\/\/\/\/\/\/\/\/\/\/\/\/\
( с уважением, Octo, пока ;) )
\/\/\/\/\/\/\/\/\/\/\/\/\/\/

Номер выпуска : 3398
Возраст листа : 291 (дней)
Количество подписчиков : 435
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/187160
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Адрес подписки:
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписать: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

   Octo 2004-07-09 08:59:57 (#187160)

Re: Delphi+e-mail

[09.07.2004 8:33] Обнаружено письмо от Pavel aka crazy
[09.07.2004 8:33] Тема "Delphi+e-mail"

Pac> Доброго времени суток!

Pac> On Thu, 8 Jul 2004 08:42:50 +0300 you wrote:

>> Средствами Делфи можно такую програму написать за полчаса,
^^^^^
>> но если у Вас возникают такие вопросы,то у Вас наверное за полчаса не
>> получится.

Pac> Просто гениальный ответ. Господа, если вам нечего сказать по существу,
Pac> то лучше воздержитесь от подобных высказываний.
Ответ есть, просто он для некоторых очевиден :)

С пожеланием доброго времени суток,
Олень Элмо

JabberID: da.el***@j*****.ru
gpg --keyserver pgp.mit.edu --search-keys da.el***@m*****.ru

Номер выпуска : 3397
Возраст листа : 291 (дней)
Количество подписчиков : 436
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/187101
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Адрес подписки:
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписать: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

   Elmo 2004-07-09 05:34:59 (#187101)