Добавление и ошибка Опции

[Крастb]

Здравствуйте! Помогите пожалуйста решить проблему.
Не могу сделать добавление. Добавляю в таблицу, которая состоит из нескольких (связаный в квери). Все создано в парадоксе. Пытался по разному, но ошибка Query1: Cannot modify a read-only dataset, методами разными делал (append, append record). Query1.RequestLive ставлю в true, но толку нет. Не знаю как сделать. Вот программа сама (точнее ее наработка) http://ifolder.ru/15269326 Форма №4. Посмотрите пожалуйста.

Буду очень благодарен!

[volvo]

Буду очень благодарен!

Я тоже буду тебе очень благодарен, если ты уберешь ссылку на iFolder, который пытается загрузить мне вместо архива всякую ненужную живность. Убери все exe-шники, временные копии и остальные ненужные файлы, и прикрепи свой проект сюда...

[volvo]

Уууу... Да у тебя вирус в Дельфе:

02/12/2009 17:05:42 SYSTEM 1672 Sign of "Win32:Induc" has been found in "http://stg199.ifolder.ru/download/?15269326&qrX3dtq569acrb%2B9wy9qbA%3D%3D\1\Project1.exe" file.

, читай вот это: Пользователи Дельфи от 4-ой до 7-ой версий срочно...

[Крастb]

Уууу... Да у тебя вирус в Дельфе:
, читай вот это: Пользователи Дельфи от 4-ой до 7-ой версий срочно...

Удалил вроде. По инструкции сделал все.
Прикрепил файл  1.rar ( 329.63 килобайт ) Кол-во скачиваний: 276

[volvo]

Ты издеваешься? Я ж просил тебя, убери из архива EXE-шник, нет, ты опять туда зараженный файл запихал:

[Крастb]

Ой, из 2й папки забыл вот нормальный  1.rar ( 51.54 килобайт ) Кол-во скачиваний: 285

Вот так пишу

Код

Module3.Query2.SQL.Add ('Insert into osn.db (fam) values (edit6.text)');

но не работает почему то

и там на форме не обчные комбобоксы а DBlookUpCombobox должен быть

Сообщение отредактировано: Крастb - 3.12.2009 0:28

[volvo]

Вот так пишу

Module3.Query2.SQL.Add ('Insert into osn.db (fam) values (edit6.text)');

но не работает почему то

Хм... И ГДЕ? Название файла и номер строки можно показать, где это такое написано.

и там на форме не обчные комбобоксы а DBlookUpCombobox должен быть

Чего ж ты его туда не поставил? На кой черт мне тогда твой проект, если там НЕ ТО, ЧТО ДОЛЖНО БЫТЬ??? Хочешь помощи - присоединяй проект, который компилируется и запускается, и ХОТЯ БЫ отображает что-то, и не задизейблено в нем все что только можно, хрен поймешь куда и чего идти, и как вообще добраться до того, что там ДОЛЖНО БЫЛО БЫТЬ, как выясняется. Путь воспроизведения ошибки приведи: "Нажать это, потом это, потом сделать это, нажать туда-то, ан оно не работает, хотя должно". А ты вывалил проект, нате вам, разбирайтесь в 33 Кб бреда...

Про названия нормальные ничего не слышал никогда? Что мне должно сказать

    BitBtn6: TBitBtn;
    BitBtn7: TBitBtn;
    BitBtn8: TBitBtn;
    BitBtn9: TBitBtn;
    BitBtn10: TBitBtn;
    DBEdit1: TDBEdit;
    DBEdit2: TDBEdit;
    Edit2: TEdit;
    Edit6: TEdit;
    TabSheet3: TTabSheet;
    Label3: TLabel;
    DBGrid3: TDBGrid;
    BitBtn11: TBitBtn;
    BitBtn12: TBitBtn;
    BitBtn13: TBitBtn;
    BitBtn14: TBitBtn;
    BitBtn15: TBitBtn;
    Edit3: TEdit;
    TabSheet4: TTabSheet;
    Label4: TLabel;
    DBGrid4: TDBGrid;
    BitBtn16: TBitBtn;
    BitBtn17: TBitBtn;
    BitBtn19: TBitBtn;
    BitBtn20: TBitBtn;
    Edit4: TEdit;

вот это, например? Какая кнопка за что отвечает? Хинт: НЕ У ВСЕХ УСТАНОВЛЕНА КИРИЛЛИЧЕСКАЯ КОДИРОВКА ПО УМОЛЧАНИЮ, запомните уже это. И если так хотя бы по названиям контролов можно ориентироваться, то в твоем случае проще закрыть проект, удалить его с диска и поставить тему в игнор.

[Крастb]

Вот -  1.rar ( 50 килобайт ) Кол-во скачиваний: 287

Форма 4. BitBtn1 - это кнопка, которая добавляет запись.
DBLookupComboBox1 связан, если можно на нем пример тоже показать, как добавить данные из него в таблицу.
В самом конце процедуры Bitbtn1Click следующий код

Код

DataModule3.Query2.Close;
DataModule3.Query2.SQL.Clear;
DataModule3.Query2.SQL.Add ('Insert into info.db (fam) values (''' + edit6.text + ''')');

Этот код - попытка записать хотя бы фамилию.

Вроде как все объяснил

Сообщение отредактировано: Крастb - 3.12.2009 3:51

[Крастb]

Спасибо. Сам разобрался.