Announcement

Collapse
No announcement yet.

TUpdateSQL + Parameter

Collapse
X
  • Filter
  • Time
  • Show
Clear All
new posts

  • TUpdateSQL + Parameter

    Hallo Leute,
    <br> <br>
    bekomme das Update einer Tabelle mit Parametern nicht hin, Parameter mittels CreateParams + ParamsByName findet er nicht. <br>
    Vielleicht kann mir jemand zeigen wie man ueblicherweise eine Parameterliste dem folgenden Codefragment beifuegen wuerde. <br>
    <br> <br>
    Gruss Tina.
    <br> <br> <br>
    sql_update = "update t1 " <br>
    "set " <br>
    // "f1 = '123411' " <br>
    "f1 = :f1 " <br>
    "where Index_p = 1 "; <br>
    // "where Index_p = :OLD_Index_p "; <br>
    <br>
    try <br>
    { <br>
    Screen->Cursor = crHourGlass; <br>
    UpdateSQL_v1->ModifySQL->Clear(); <br>
    UpdateSQL_v1->SetParams(ukModify); // brauch ich das? <br>
    UpdateSQL_v1->ModifySQL->Add(sql_update); <br>
    UpdateSQL_v1->ExecSQL(ukModify); <br>
    Screen->Cursor = crDefault; <br>
    } //try <br>
    catch(...) <br>
    { <br>
    Screen->Cursor = crDefault; <br>
    MessageDlg("SQL-Anweisung fehlerhaft", mtWarning, <br>
    TMsgDlgButtons() << mbOK,0); <br>
    } //catch <br>
Working...
X