Технология создания плагинов и программ-дополнений

Здесь обсуждаются графические оболочки, боты, языковые файлы и другие дополнения к CommFort 4.
$teelR@t
Сообщения: 348
Зарегистрирован: 19:14, 30.03.2008
Откуда: Украина
Контактная информация:

Re: Технология создания плагинов и программ-дополнений

Сообщение $teelR@t »

DIGGER писал(а):Чат защищён от отладки. [удалено как офтопик]
От администрации никаких советов, как делать отладку плагинов, нет!
Так и подумал... Приходится делать отладку через тыкание ShowMessage или Memo Lines Add... :(
Cilvay
Сообщения: 816
Зарегистрирован: 14:55, 16.06.2008

Re: Технология создания плагинов и программ-дополнений

Сообщение Cilvay »

Покажите пожалуйста пример (Желательно, делфи)
Как в клиенском плагине отправить личное сообщение пользователю?
Я делаю так:

Код: Выделить всё

function PersonalMsg(const User, Text : String): TStringStream;
var I : Integer;
begin
  Result := TStringStream.Create('');
  i := length(User);
  Result.Write(I, 4);
  Result.WriteString(User);
  i := length(text);
  Result.Write(I, 4);
  Result.WriteString(text);
end;

procedure TForm1.Button2Click(Sender: TObject);
var msg: TStringStream;
begin
msg:= PersonalMsg('Cilvay','asdasdasdasd tezxt');
CommFortProcess(dwPluginID, 70 , PANSIchar(msg.DataString),msg.InstanceSize);
end;
Аватара пользователя
-=SJ=-
Сообщения: 246
Зарегистрирован: 02:21, 06.04.2007

Re: Технология создания плагинов и программ-дополнений

Сообщение -=SJ=- »

cilvay писал(а):Покажите пожалуйста пример (Желательно, делфи)
Как в клиенском плагине отправить личное сообщение пользователю?
Я делаю так:

Код: Выделить всё

function PersonalMsg(const User, Text : String): TStringStream;
var I : Integer;
begin
  Result := TStringStream.Create('');
  i := length(User);
  Result.Write(I, 4);
  Result.WriteString(User);
  i := length(text);
  Result.Write(I, 4);
  Result.WriteString(text);
end;

procedure TForm1.Button2Click(Sender: TObject);
var msg: TStringStream;
begin
msg:= PersonalMsg('Cilvay','asdasdasdasd tezxt');
CommFortProcess(dwPluginID, 70 , PANSIchar(msg.DataString),msg.InstanceSize);
end;
Отправить личное сообщение: число(важность)+текст(имя пользователя)+текст(сообщение)
т.е. вначале надо дописать еще одно число важность
и не забываем освобождать ресурсы в конце :) msg.Free();
@serg@
Сообщения: 702
Зарегистрирован: 14:50, 20.07.2009

Re: Технология создания плагинов и программ-дополнений

Сообщение @serg@ »

Народ пожалуйста подскажите, в каком формате раньше в ботах шло поле "Текст(Дата и время)"?
Maxim Mirgorodsky
Администратор
Сообщения: 6867
Зарегистрирован: 09:56, 27.06.2005

Re: Технология создания плагинов и программ-дополнений

Сообщение Maxim Mirgorodsky »

В формате текст() :).
@serg@
Сообщения: 702
Зарегистрирован: 14:50, 20.07.2009

Re: Технология создания плагинов и программ-дополнений

Сообщение @serg@ »

Maxim Mirgorodsky писал(а):В формате текст() :).
Тобишь система его никак не анализирует, может быть любой текст. Спасибо, к подобному выводу пришел методом тыка :D .
MaRsHaL
Сообщения: 1
Зарегистрирован: 11:00, 18.01.2011

Re: Технология создания плагинов и программ-дополнений

Сообщение MaRsHaL »

Хочу создать плагин чтобы сохранял логи активных процессов пользователей в текстовый документ. В чём лучше писать?
Maxim Mirgorodsky
Администратор
Сообщения: 6867
Зарегистрирован: 09:56, 27.06.2005

Re: Технология создания плагинов и программ-дополнений

Сообщение Maxim Mirgorodsky »

Плагин - это библиотека DLL. В чем ее удобнее писать решает исполнитель (программист).
Закрыто