مشکل در insert با فیلدهای زیاد

[Batman]

با سلام
دوستان من زمانی که میخوام insert کنم (35 تا فیلد) به شکل زیر مینویسم اما خطا میده

DataModule2.Registery.SQL.Add('insert into registery values(:family,:fn,:birthday,:sh,:state,:marry,:so ldier,:job,:body,:effect,:wieght,:blood,:language, :level,:skill,:lskill,:learning,:other,:mfront,:se nd,:lock,:depending,:mfother,:like,:otherl');
DataModule2.Registery.SQL.Add(':study,:ends,:maddr ess,:kaddress,:saddress,:phone,:d,:insertn,:pictur e,:nfile)');

لطفا راهنماییم کنید

[ghabil]

کلا جدولت 35 فیلده؟ اگر بیشتره اونوقت دیگه باید توی Queryت اسم فیلدهایی که داری وارد میکنی رو هم بدی، ضمنا خطاش رو هم بگو دیگه.

[Batman]

با سلام
جناب کوشا منظور شما اینه که بعد از registery (قبل از vlues)توی پرانتز اسم تمام فیلدها رو بیارم
در ضمن من چند نوع رو تست کردم الان یادم نیست هر سری یه خطا میداد
ممنونم

[dkhatibi]

قاعدتا باید این جور باشه !
در حالت انتخابی که باید اسن فیلدها اورد.

[ghabil]

با سلام
جناب کوشا منظور شما اینه که بعد از registery (قبل از vlues)توی پرانتز اسم تمام فیلدها رو بیارم
ممنونم

اگر تمام فیلدها رو در Values مقدار دهی نمیکنی دقیقا باید اینکار رو بکنی.

[Batman]

با سلام
جناب کوشا من تمامی فیلدها رو مقدار دهی میکنم
ببینید من به چند شکل امتحان کردم اما بازم نشد توی خط دوم قبل از فیلد study کاما گذاشتم بازم نشد و توی خط اول هم بعد از آخرین فیلد کاما گذاشتم بازم نشد
من که دارم گیج میشم

[ms_mohaghegh]

اگه متن پیغام خطا رو بذاری فکر می کنم بهتر میشه مشکلو رفع کرد.

[SYNDROME]

با سلام
مقدار ADO.Sql.Textرا به Ctrl+F5بر گردان و در اینجا قرار بده و سپس پیغام خطایی را که سیستم می دهد.
موفق باشید

[Batman]

با سلام
دوستان اینم خود برنامه همو قسمتی که مشکل دراه
ممنونم

[Hamid.Kad]

مشکل اینه که شما پارامترهای کوئری رو نه در زمان design ساختید و نه در زمان اجرای برنامه. اگه زمان طراحی نمیخواهید بسازید با کد نویسی ابتدا اونها رو ایجاد و سپس استفاده کنید.

.adoqryCursor.Parameters.AddParameter;
.adoqryCursor.Parameters[CountSelected].Name := 'Fetch_Status';
adoqryCursor.Parameters[CountSelected].DataType := ftinteger;
adoqryCursor.Parameters[CountSelected].Direction := pdOutput;
adoqryCursor.Parameters[CountSelected].Size := -1;
adoqryCursor.Parameters[CountSelected].Value := Null;