Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 31.03.2008, 21:13   #1
cheldonec
Пользователь
 
Регистрация: 31.03.2008
Сообщений: 10
По умолчанию Помогите с дипломом WEB программирование

Помогите, кто может. Задача вот такая: на Delphi
На серваке работает прога, есть DLL-ка, через которую можно получать
данные от проги. Надо при подключении через браузер запустить библиотеку и получить данные от проги и отправить страничку обратно браузеру. Причём данные текут постоянно и надо динамически обновлять поля на странице. При отключении надо закрыть библиотеку.
Intraweb и WebSnap пробовал, не помогает. может надо данные как-нить преобразовывать? помогите, ато тупик.

вот функция
unit funcimplement;

const
NetLinkAllHosts= '';
NetLinkAllPorts=0;

Procedure EfesClient_Close;stdcall;external 'EfesClient.DLL';
Procedure EfesClient_SendMessage
(var Host:ansistring;
Port:integer;
var Mess:ansistring);stdcall;external 'EfesClient.DLL';
Procedure StandartEfesLinkOpen;

type

TMessCallBack = procedure(var Host:Ansistring; Port:integer; var Mess:ansistring);stdcall;
TConnectCallBack = procedure(var Host:Ansistring; Port:integer);stdcall;
TDisConnectCallBack = procedure(var Host:Ansistring; Port:integer);stdcall;

Procedure EfesClient_Open (MessCallBack:TMessCallBack;
ConnectCallBack:TConnectCallBack;
DisConnectCallBack:TDisConnectCallB ack);stdcall;external 'EfesClient.DLL';


interface

implementation
Procedure EC_MessCallBack (var Host:Ansistring; Port:integer; var Mess:ansistring);stdcall;
begin
FormMain1.IWMemo1.Lines.Add(host+'. '+inttostr(port)+'.'+mess);
end;

Procedure EC_ConnectCallBack (var Host:Ansistring; Port:integer)stdcall;

begin

end;

Procedure EC_DisConnectCallBack (var Host:Ansistring; Port:integer)stdcall;
begin

end;

Procedure EfesSendMessage (var Host:Ansistring; Port:integer; var Mess:ansistring);
begin

end;

Procedure Log(Text:AnsiString);
begin
end;

Procedure ShowConnLib;
begin

end;

Procedure StandartEfesLinkOpen;
begin
try
EfesClient_Open (EC_MessCallBack, EC_ConnectCallBack, EC_DisConnectCallBack);
except
on E: Exception do begin
EfesClient_Close;
end;
end;
end;


end.

IWmemo не заполняется, хотя, если не интравеб, а обычное приложение сделать, то инфа принимается
cheldonec вне форума Ответить с цитированием
Старый 01.04.2008, 07:55   #2
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
Надо при подключении через браузер запустить библиотеку и получить данные от проги
Это всмысле любым браузером или конкретно твоим?
Цитата:
и отправить страничку обратно браузеру.
т.е. ДЛЛ та должна формировать страницу?
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 01.04.2008, 09:10   #3
cheldonec
Пользователь
 
Регистрация: 31.03.2008
Сообщений: 10
По умолчанию

Да, браузер любой, например IE. А с DLL немного не так. DLL просто собирает данные (там функции обратного вызова). Формирует страницу веб модуль (cgi). И всё это чудо под apache 2.0.

Я ещё правда такую [мат] вычитал, что CGI выполняется один раз, а мне надо динамически заполнять поля, может поэтому не цепляется, не успевает или ещё как???????????

Последний раз редактировалось AlDelta; 01.04.2008 в 09:57.
cheldonec вне форума Ответить с цитированием
Старый 01.04.2008, 10:25   #4
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
DLL просто собирает данные (там функции обратного вызова). Формирует страницу веб модуль (cgi)
CGI то зачем формировать? Пусть уже HTML формирует сразу, а ты в своем браузере поставь переоткрытие страницы (сформированной) через скажем полминуты.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 01.04.2008, 18:39   #5
cheldonec
Пользователь
 
Регистрация: 31.03.2008
Сообщений: 10
По умолчанию

Идея хорошая, а главное простая. Там инфу надо получать в реал тайме.
Надо, чтобы не страница перезагружалась, а сервак сам обновлял страницы на клиентской стороне по мере появления новой инфы. Но всё равно спасибо. Мож ещё чёнить посоветуешь.
cheldonec вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Помогите с курсовой. Параллейное программирование. bendar Помощь студентам 1 16.06.2008 17:41
Программирование под .NET RoamingFire Свободное общение 1 04.03.2008 08:35
Шифр Атбаш. Зашиваюсь с дипломом! Регина Помощь студентам 2 06.04.2007 15:47
Программирование под nix Simply-Art Свободное общение 8 20.03.2007 11:45