delphi firebird

Ответ от Jurijus Zaksas[гуру]
Во-первых, могут получаться несколько инсертов подряд, потому как SQL.Clear я что-то в твоем коде не заметил, а во-вторых практика показывает, что чем меньше играешься с параметрами, тем стабильнее код. Я бы написал проще: with Datamodule3.IBQuery2 do begin if Active then Close; SQL.Text:=Format(INSERT INTO STUDENTS (ID,NAME, MEDIUM_NAME, LAST_NAME, BIRTHDATE, PHONE, ADRESS) VALUES (%s,\'\'%s\'\',\'\'%s\'\',\'\'%s\'\',to_date(%s,\'\'yyyymmdd\'\'),\'\'%s\'\',\'\'%s\'\')\',[ \'5\', Trim(edit1.Text), Trim(edit2.Text), Trim(edit3.Text), FormatDateTime(\'yyyymmdd\',DBDateTimeEditEh1.Value), Trim(edit5.Text), Trim(edit6.Text)]); ExecSQL; end; Те же яйца, вид сбоку, но гораздо компактнее. Тут есть только 2 момента: я не уверен, так ли работает фаербёрдовский to_date и такой метод программирования открывает путь к интересной штуке, называемой SQL injection. Чтобы этого избежать, надо немножко дополнительно обработать вставляемые строки. Еще один бесплатный совет - избегай вот такого прямого управления транзакциями, как у тебя. Подумай, куда это можно аккуратно поместить и как связать его с общей логикой программы. Кстати, бёрд поддерживает вложенные транзакции - в сочетании с модальными окошками это дает нам стройную и логическую картину, поразмысли.