Обсуждение программирования на Delphi в конференции ru.delphi
Re: Service Application
From: "Alexander B. Bokovikov" <bokovikov [@] apress.ru>
On Mon, 01 Aug 2005 18:32:38 +0400, Alexey Dunin
<Alexey.Dunin [@] p447.f2.n5012.z2.fidonet.org> wrote:
> Хоpошо, а как пpоще создать пpиложение, чтобы оно постоянно висело в пpоцессах
>и ожидало команд от клиента с дpугого компьютеpа?
Если тебя устроит, чтобы приложение работало только после входа в
систему (логина пользователя) то сервис делать не обязательно. Просто
пиши обычный сервер на сокетах и все. Пример есть в демах. А если
надо, чтобы оно начинало работать сразу после запуска системы и не
зависело от наличия логина, то сервис - единственное решение.
Александр Боковиков
E-mail: bokovikov(a)mail.ru (дом.) abokovikov(a)apress.ru (раб.)
www.apress.ru/pages/bokovikov/delphi
* Origin: Demos online service (2:5020/400)
*** Выборы: Выдвижение кандидатов
Hello everybody!
Cроки проведения выборов в конференции RU.DELPHI:
*18.07.2005 - 31.07.2005 - выдвижение кандидатов;
01.08.2005 - 14.08.2005 - обсуждение кандидатов;
15.08.2005 - 28.08.2005 - голосование;
29.08.2005 - предварительные итоги.
Зарегистрированные кандидаты
----------------------------
#1. Andrew O. Shadoura 2:450/143.25
# - кандидат опубликовал свой вариант правил.
Returning Officer
* Origin: --> GoldED Origin <-- PGP KeyID 7249E0B9 --> (2:5030/1957.10)
*** Выборы: Обсуждение кандидатов
Hello everybody!
Cроки проведения выборов в конференции RU.DELPHI:
18.07.2005 - 31.07.2005 - выдвижение кандидатов;
*01.08.2005 - 14.08.2005 - обсуждение кандидатов;
15.08.2005 - 28.08.2005 - голосование;
29.08.2005 - предварительные итоги.
Зарегистрированные кандидаты
----------------------------
#1. Andrew O. Shadoura 2:450/143.25
# - кандидат опубликовал свой вариант правил.
Returning Officer
* Origin: --> GoldED Origin <-- PGP KeyID 7249E0B9 --> (2:5030/1957.10)
Service Application
Пpиветствую тебя, pейнджеp Andrey!
AR> А если не гpубо, то Application.ShowMainForm := False в файле пpоекта :)
Вот это мне подходит, спасибо!
ЗЫ: я знал, что фоpму как-то можно совсем не показывать, но не знал как. :)
Пишите письма: helex [@] infocentr.ru!!!
* Origin: Книги не выдаются, ибо пpиобpетены таким же методом. (2:5012/2.447)
йЮЙ СДЮКХРЭ TWebBrowser?
Hi, All
Как удалить ActiveX компонент TWebBrowser, так чтобы он потерял текущую
сессию (т.е. чтобы это было так же, как происходит при закрытии IE).
WebBrowser1.Free; явно не достаточно, что ему еще нужно?
Заранее спасибо...
* Origin: Sample (1:135/3.29)
Re: Service Application
From: Andrey Belyakov <andrejb [@] netmail.lv>
Alexey Dunin wrote:
>Пpиветствую тебя, pейнджеp Andrew!
>AVF> Сеpвис спеpва pегистpиpуется, запуском экзешника с ключом /install, а
>AVF> запускается потом из панели упpавления сеpвисами.
>
> Хоpошо, а как пpоще создать пpиложение, чтобы оно постоянно висело в пpоцессах
>и ожидало команд от клиента с дpугого компьютеpа?
>
>
Может проще оставить его лежать на диске и предоставить системе решать
проблемы доступа и запуска этого приложения? :) Заодно получить в
нагрузку и организованный транспортный уровень?
см. Мидас.
А.
* Origin: Demos online service (2:5020/400)
Telnet
Привет, *Andrew* !
По теме Telnet я скажу:
AS> RTM RFC ;) По Telnet вообще-то, файлы не передаются, если клиент этого
AS> делать не умеет (а стандартный telnet этого делать не умеет, разве что
AS> HyperTrm). Если умеет, можешь использовать X/Y/Z-Modem, если нет - сам
AS> придумывай. Можешь BinkP (если у клиента он поднят на чем-нибудь), можешь
AS> FTP (неудобно, из окошка терминала ссылку копировать в ftp-клиент -
AS> увольте).
А номерок RFC не подскажешь ?
AS> ESC[2J; - очистка экрана. Т.е. RTM ANSI terminal
AS> Кроме того, на клиентах должна быть врублена эмуляция терминала ANSI
Тут всё понято. Спасибо.
Всего тебе, Andrew.
* Origin: Пока я только осваиваю просторы Фидо... (2:5071/101.101)
Почистить Tray от иконок ( я сделал наконецто)
#region *Hi* _All_
Мож кому нужно:
procedure TRAYREDRAW;
var TH:THandle;
L,i:integer;
R:TRect;
p:TPoint;
begin
// Для тpея котоpый pасположен внизу
// 1) Hайти окно тpея
// 2) Получить кооpдинаты тpея
// 3) С шагом меньше чем 16 пикселей двинуть мышку по гоpизонтали
GetCursorPos(p);
TH:= findWindow('Shell_TrayWnd',nil);
if TH<>0 then
begin
GetWindowRect(TH,R);
for i:=R.Left to R.Right do
begin
SetCursorPos(i,R.Top+15);
end;
SetCursorPos(p.X,p.Y); // Hа место
end;
end;
#endregion
* Origin: Бей вpага - дpузья найдутся (2:5083/39.47)
Telnet
Приветствую, Miha!
Однажды, 21.07.05 в 22:25:21, ты писал Andrew O Shadoura
по поводу "Telnet".
AS>> придумывай. Можешь BinkP (если у клиента он поднят на чем-нибудь),
AS>> можешь FTP (неудобно, из окошка терминала ссылку копировать в ftp-клиент
AS>> - увольте).
MY> А номерок RFC не подскажешь ?
Google RFC-index
-- С уважением, Andrew O. Shadoura (also 2:450/143.25)
* Origin: FDD Software [@] Moscow (2:5020/1665.26)
Регулярные выражения
From: "Vasily V.Ushakov" <v_ushakov [@] rosneft.ru>
Короче, есть совокупность строк вида:
'AAA' | { 'BBB'<целое число>[<произвольная строка>] }
Примеры:
AAA
BBB1
AAA
BBB2
BBB3
BBB4321CDE
BBB4567FGH
Hадо найти все строки вида
'BBB'<целое число>
Регулярными выражениями решается "на ура".
В 7-ке функции для этого есть?
--
С уважением,
Василий Ушаков
Отправлено через сервер Форумы [@] mail.ru - talk.mail.ru
* Origin: Talk.ru (2:5020/400)