Помогите до ума доработать

[dyh9l]

Вот есть небольшие наброски, это заставлять твинка атаковать, но у мну появились пробелмы с SendToServerEx синтаксис, а может я вобще в корне неправильно атаку начал делать, вобщем хелп)

[NLObP]

dyh9l, пакеты таргета и атаки такие должны быть

//***************************************************************
//04=Action:h(ObjectID)d(OriginX)d(OriginY)d(OriginZ)b(ShiftFlag)
procedure Target(Attacker: Integer);
begin
  buf:=#$04;
  WriteD(Attacker);
  WriteD(MyXpos);
  WriteD(MyYpos);
  WriteD(MyZpos);
  WriteC(00);
  SendToServerEx(Name);
end;

//***************************************************************
//0A=Attack:h(ObjectID)d(OriginX)d(OriginY)d(OriginZ)b(ShiftFlag)
procedure Attack(Attacker: Integer);
begin
  buf:=#$0A;
  WriteD(Attacker);
  WriteD(MyXpos);
  WriteD(MyYpos);
  WriteD(MyZpos);
  WriteC(00);
  SendToServerEx(Name);
end;

В комбобоксе лежат строки.
Вот так из комбобокса строку в число перевести,

WriteD(StrToInt(combo.items.strings[combo.itemindex]));

Вот так из комбобокса просто строку получить,

SendToServerEx(combo2.items.strings[combo2.itemindex]);

[supernewbie]

items.strings?
почему бы не combo2.items[combo2.itemindex]

Добавлено через 12 минут
да и тем более что забей, скрипт ему я уже поправил...

[dyh9l]

дааа) я выслушал очень много критики)