Проблема

← →
insmod (2002-04-05 19:14) [0]

Приветствую. Такая вот проблема: имеется fsMDIForm из нее запускается fsMDIChild на ней есть DBGrid, Database1, Table1, DataSource1 вот, а из fsMDIChild (назовем ее DBForm) запускается Form1 по form1.showmodal; так вот из это формы я хочу ввести инфу в базу на DBForm, пишу:
DBForm.Database1.Edit;
DBForm.Database1.Insert;
DBForm.Database1.FindField("мое поле").AsString:=Edit1.Text;
DBForm.Database1.Post;
при выполнении кода вылетает ошибка, чего то там с доступом, и выделяет красным первую строчку и больше никаких ошибок, если убрать первую строку то выделяет вторую в общем не хочет добавлять запись в БД. Помогите разобраться, я в дельфи новичок и многого не знаю, и книги нет.

← →
aus (2002-04-05 19:20) [1]

DBForm.Table1.Edit; DBForm.Table1.FieldByName("Мое поле").AsString := Edit1.Text; DBForm.Table1.Post;

А у тебя при компиляции ошибка, т.к. TDatabase не имеет методов Edit, Post и т.д.

← →
insmod (2002-04-05 19:50) [2]

Спасибо, но так тоже не работает :(
Опять таже ошибка и тоже выделяет первую строку DBForm.Table1.Edit;

← →
amamed_3071 (2002-04-06 08:17) [3]

DBForm.Table1.Active:=True;DBForm.Table1.Edit;
DBForm.Table1.FieldByName("Мое поле").AsString := Edit1.Text;
DBForm.Table1.Post;

← →
insmod (2002-04-06 09:50) [4]

блин, таже самая ошибка. Я проверил, если DBForm сделать обратно fsNormal, а не fsMDIChild то все работает. Но мне надо fsMDIChild :(

← →
amamed_3071 (2002-04-06 10:40) [5]

form1.showmodal zameni na form1.show

← →
insmod (2002-04-06 11:43) [6]

и так тоже не работает :(

← →
Synochka (2002-04-06 13:32) [7]

With TDBForm ( fsMDIForm.ActiveMDIChild ) do begin Table1.Edit ; Table1.FieldByName ( "Мое поле" ).AsString := Edit1.Text ; Table1.Post ; end ;

← →
insmod (2002-04-06 17:10) [8]

мда, проблема :)
при таком раскладе выделяет первую строчку и пишет:
Record, object or class type required

← →
dnk (2002-04-07 15:25) [9]

Привет!
Все свои Database1, Table1, DataSource1 кидай на[File/New...] Data Module (UnitDM), потом пиши во всех своих юнитах с формами примерNо такое
implementation
Uses UnitDM,... ;
после этого все формы будут видеть базы и работать с ними.
Базы открывать (Active:=True) можно при создании DataModule.

← →
insmod (2002-04-07 18:01) [10]

Спасибо, помогло :)

Проблема Найти похожие ветки