ADOStoredProc

@ivan.-94 · Регистрация: 02.06.2012

Author24 — интернет-сервис помощи студентам

Всем доброго времени суток.
Друзья, такая проблема: через ADOQuery работает

C++

DataModule2->Move->SQL->Clear();
    DataModule2->Move->SQL->Append("EXECUTE Move " +
            IntToStr(UnitID) + ", " + Direction);
    DataModule2->Move->ExecSQL();

А через ADOStoredProc не хочет

C++

1
2
3

    DataModule2->MoveUnit->Parameters->ParamByName("@UnitID")->Value = UnitID;
    DataModule2->MoveUnit->Parameters->ParamByName("@Direction")->Value = Direction;
    DataModule2->MoveUnit->ExecProc();

В чём ошибка ?
Дополнительно

Кликните здесь для просмотра всего текста

C++

    int UnitID, MyX, MyY, EnemyX, EnemyY;
    char Direction;
 
    UnitID = DataModule2->Units->FieldByName("ID")->Value;
 
    MyX = DataModule2->Units->FieldByName('X')->Value;
    MyY = DataModule2->Units->FieldByName('Y')->Value;
 
    EnemyX = DataModule2->Enemies->FieldByName('X')->Value;
    EnemyY = DataModule2->Enemies->FieldByName('Y')->Value;
 
    if (EnemyY > MyY) {Direction = 'N';}
    if (EnemyY < MyY) {Direction = 'S';}
    if (EnemyX > MyX) {Direction = 'E';}
    if (EnemyX < MyX) {Direction = 'W';}

Добавлено через 18 минут

C++

1 2	DataModule2->Buy->Parameters->ParamByName("@UnitID")->Value = DataModule2->Tavern->FieldByName("ID")->Value; DataModule2->Buy->ExecProc();

А тут работает

	15.09.2012, 12:41

Опции темы