Ребята! Мне нужна помощь!

[Zka]

Лажу по форуму, и никак не могу догнать: куда ж всё таки вписывать ну например вот это(с вашего форума, дельфи)

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

function AskUsersInChannel(Name, Channel: String; var UserList: TUsers):DWord;
var
  Buf, msg: TBytes;
  iSize, len: DWord;
  I: DWord;
  J: DWord;
begin
  len:=Length(Name)*2+Length(Channel)*2+8;
  SetLength(msg, len);
  len:=Length(Name);
  CopyMemory(@msg[0], @len, 4);
  CopyMemory(@msg[4], PChar(Name), len*2);
  i:=4+len*2;
  len:=Length(Channel);
  CopyMemory(@msg[i], @len, 4);
  CopyMemory(@msg[i+4], PChar(Channel), len*2);
  i:=i+len*2+4;
  iSize := CommFortGetData(dwPluginID, 1081, nil, 0, PChar(msg), i);
  SetLength(Buf, iSize);
  if iSize=0 then
  begin
    Result:=0;
    Exit;
  end;
  CommFortGetData(dwPluginID, 1081, Buf, iSize, PCHAR(msg), i);
  CopyMemory(@Result, @Buf[0], 4);
  I:=4;
  setLength(UserList, Result + 1);
  for J := 1 to Result do
  begin
    UserList[J].Name:=TEncoding.Unicode.GetString(Buf, I+4, Dword(Buf[I])*2);
    I:=I+Dword(Buf[I])*2+4;
    UserList[J].IP:=TEncoding.Unicode.GetString(Buf, I+4, Dword(Buf[I])*2);
    I:=I+Dword(Buf[I])*2+4;
    UserList[J].sex:=Dword(Buf[I]);
    I:=I+4;
  end;
end;

Вообще вопрос таков: куда вписывать все эти процедуры? В какое именно поле (с форматом dfm или pas?). И вообще как можно скомпилировать в дельфи плагин если компилирует только в *.ехе???

Пожалуйста объясните чайнику программирования!

[KGB]

Эта функция - ответ на вопрос. Не нужно начинать изучение принципа написания плагинов с неё
Лучше начать с примера плагина на Delphi: http://commfort.com/ru/forum/viewtopic. ... 538#p43538
И вопросы по созданию плагинов лучше задавать тут.

[SV]

Ты вообще в Delphi работал? Мне кажется что нет. Поюзай с начало литературу по Delphi