ورود

View Full Version : سوال: وارد کردن اطلاعات یک memo در یک جدول در پایگاه داده


mohandesan
سه شنبه 15 اردیبهشت 1388, 19:59 عصر
من توی برنامه ام یک ئثئخ دارم که در هر خط اون مثلا یک شماره تلفن هست که می خوام با زدن روی یک دکمه اطلاعات اینmemo در جدول ذخیره بشه من این کد را نوشتم ولی خطا میده لطفا راهنمایی کنید..




for i:=1 to memo1.Lines.Count do
begin
ADOTable1.FieldValues ['name']:=memo1.Lines(i).Text ;
ADOTable1.Post ;
end;
سعید صابری
سه شنبه 15 اردیبهشت 1388, 21:28 عصر
سلام
شما بايد قبل از
ADOTable1.FieldValues ['name']:=memo1.Lines(i).Text ;


متد ADOTable1.Append يا edit يا insert بايد فراخواني كني
يعني جدول آماده پذيرش ركورد جديد يا ويرايش كني
mohandesan
سه شنبه 15 اردیبهشت 1388, 22:01 عصر
نه ربطی نداشت بازم error میده
for i:=1 to memo1.Lines.Count do
begin
ADOTable1.Edit ;
ADOTable1.Insert ;
ADOTable1.FieldValues ['name']:=memo1.Lines(i).Text ;
ADOTable1.Post ;
end;
merced
سه شنبه 15 اردیبهشت 1388, 23:06 عصر
احتمالاً بايد for i := 0 to memo1.Lines.Count - 1
Ahmad Chehreghani
سه شنبه 15 اردیبهشت 1388, 23:54 عصر
نه ربطی نداشت بازم error میده
for i:=1 to memo1.Lines.Count do
begin
ADOTable1.Edit ;
ADOTable1.Insert ;
ADOTable1.FieldValues ['name']:=memo1.Lines(i).Text ;
ADOTable1.Post ;
end

اين چه کديه؟ يه بار اصلاح يه بار درج!


var i:Integer;
begin
for i:=0 to Memo1.Lines.Count-1 do
begin
ADOTable1.Append;
ADOTable1['name']:=Memo1.Lines[i];
ADOTable1.Post;
end;
end;
سعید صابری
چهارشنبه 16 اردیبهشت 1388, 09:41 صبح
سلام
شما بايد قبل از
ADOTable1.FieldValues ['name']:=memo1.Lines(i).Text ;


متد ADOTable1.Append يا edit يا insert بايد فراخواني كني
يعني جدول آماده پذيرش ركورد جديد يا ويرايش كني


من گفتم از يكيش استفاده كني نه از هر 2 يا 3تاش