02-03-2011, 10:29 PM
السلام عليكم
قارن بالتالي :
بالتوفيق
قارن بالتالي :
كود :
for I := 0 to Table[COLOR=Red]2[/COLOR].RecordCount - 1 do
begin
Table1.Insert;
Table1.FieldByName('name').AsString:=Table2.FieldByName('name').AsString;
Table1.Post;
[COLOR=Red] Table2.next;[/COLOR]
end;