اضافه‌ كردن ركورد در فرمی دیگر

[akar_program]

سلام دوستان من با برنامه‌ مون یك فرم دیگر اظافه‌ كردم در اون فرم میخواهم اطلاعات وارد دیتابیس بكنم كه‌ در فرم یك هست این كد ایستفاده‌ كردم دلفی بیشفرز خطا نمیگریر ولی وقتی روی دكمه‌ كلیك میكنم ایرور میده‌ ایا این كد دروست هست
var
obj:TForm1;
begin
ADOTable1.Append ;
obj.ADOTable1.FieldByName('Name').AsString:=edit1. Text ;
obj.ADOTable1.FieldByName('Ali').AsInteger:=StrToI nt(Edit2.Text);
obj.ADOTable1.Post;

[Mahmood_M]

برای دسترسی به اشیا ی یک فرم ، نیاز نیست از کلاسش استفاده کنید ، کافیه فقط نام Form فرو بنویسید ، مثال :

begin
Form1.ADOTable1.Append ;
Form1.ADOTable1.FieldByName('Name').AsString:=edit 1. Text ;
Form1.ADOTable1.FieldByName('Ali').AsInteger:=StrT oI nt(Edit2.Text);
Form1.ADOTable1.Post;
end;

در کدی که قرار دادید ، یک کلاس از نوع TForm1 تعریف کردید و بدون اینکه اون رو Create کنید ، دارید ازش استفاده می کنید ، با این کار پیغام Access Violation خواهید گرفت !

موفق باشید ...