Скачать: CL | DM;

Что-то вроде TSR   Найти похожие ветки 

← →
Sinplecy   (2003-01-30 15:31) [0]

Уважаемые мастера!

Мне нужно создать приложение без форм, которое постоянно висит в памяти и общается по сети с сервером.

Вопрос следующий:
Я создаю Project1, вырезаю из него все формы. Мне даже удается рисовать на рабочем столе... НО. Как только выполнение всего кода завершается приложение заканчивает работу. А мне нужно чтобы оно работало до команды!

Что делать?

Заранее спасибо.

---

← →
gsu ©   (2003-01-30 15:32) [1]

сервис

---

← →
Digitman ©   (2003-01-30 15:37) [2]

> Мне нужно создать приложение без форм, которое постоянно
> висит в памяти и общается по сети с сервером.


И какие проблемы ? Не создавай форм, никто тебя не заставляет это делать


> Как только выполнение всего кода завершается приложение
> заканчивает работу. А мне нужно чтобы оно работало до команды!


Не завершай код - и всех делов ! Опять же - какие проблемы ?
И о каких "командах" речь идет ? Кто, кому и в какой форме их подает ?

---

← →
Sinplecy   (2003-01-31 13:32) [3]


program Project1;

uses
Windows,
Graphics,
Forms,
Dialogs,
SysUtils,
extctrls;

type TApp = class(TApplication)
Tm: TTimer;
procedure on_tm(Sender: TObject);
procedure BuildWindow(Canvas:TCanvas;Rct:TRect);
private

public

end;

const
margin_right : integer = 20; //

---

← →
Digitman ©   (2003-01-31 14:10) [4]

Не очень понятно, к чему это все ?
Зачем переопределять станд.класс TApplication ?

---

← →
Quest   (2003-01-31 15:46) [5]

создаёшь проект my_program.dpr

program my_program;
uses
SysUtils,
windows,
classes,
... ;

BEGIN
while [условие для бесконечного цикла] do Begin
...
End;
End.

---

← →
ZeroDivide ©   (2003-01-31 15:49) [6]

Пишешь в нотпаде .dpr:

program MyPrg;
uses Windows;
begin
...somecode...
end.

Открываешь его в Delphi и
все

а еще проще.. выбрать в нью - консольаппликешен и убрать потом все фигурные скобки

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.012 c