Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

ошибка при дообавлении [D6, IB5.x]


dim- ©   (2002-11-03 15:44:00) 

создал таблицу таким скриптом:
SET NAMES WIN1251;
CREATE GENERATOR GEN_SPRAV_SPISOK_ID;
CREATE TABLE SPRAV_SPISOK (
ID INTEGER NOT NULL,
NAME VARCHAR(50),
NTRANSL VARCHAR(200),
SYST SMALLINT
);

ALTER TABLE SPRAV_SPISOK ADD CONSTRAINT PK_SPRAV_SPISOK PRIMARY KEY (ID);

SET TERM ^ ;

CREATE TRIGGER SPRAV_SPISOK_BI FOR SPRAV_SPISOK
ACTIVE BEFORE INSERT POSITION 0
AS
BEGIN
IF (NEW.ID IS NULL) THEN
NEW.ID = GEN_ID(GEN_SPRAV_SPISOK_ID,1);
END

SET TERM ; ^

GRANT UPDATE, REFERENCES ON SPRAV_SPISOK TO TRIGGER SPRAV_SPISOK_BI;

В программе добавляю запись:
data.temp.Close;
data.temp.SQL.Clear;
data.temp.SQL.Add("insert into SPRAV_SPISOK");
data.temp.SQL.Add("(NAME,NTRANSL,SYST)");
data.temp.SQL.Add("VALUES ("+#39+ComboBox1.Text+#39+","+#39+edit1.text+#39+",1)");
data.temp.ExecSQL;
а она ругается:
arithmetic exception, numeric overflow, or string truncation
Cannot transliterate character between character sets.
В чем ощибка?


dim-   (2002-11-04 02:08:00) [1]

Спасибо получилось.
А почему нельзя работать с IBQwery через Append(Edit) и Post?


Назаров Евгений   (2002-11-03 18:37:00) [2]

неделю назад я сам три дня парился, не мог русские буквы добавить в базу, оказалось что надо просто кодировку ставить не WIN1251 а просто None - помогает


dim-   (2002-11-03 17:32:00) [3]

это происходит если пытаюсь добавить данные на русском языке


Наверх

Титульная страница Поиск, карта сайта Написать письмо