delphi4arab منتديات دلفي للعرب

السلام عليكم ورحمة الله تعالى وبركاته
جمعة مباركة وتقبل الله منا ومنكم الصلاة بمزيد من الاجر والثواب
لدي عدة حقول ودمجتها في المكون stringGrid
بدلا من استعمال المكون DBText بعدد كبير
لذا اردت ان اعرف هل من الممكن ربط stringgrid بـ Table1
ووفقكم الله

سلام عليكم

ممكن عمل loading data to stringgrid
var

كود :
  i: integer;
begin
  ADOTable1.Open;
  StringGrid.ColCount := ADOTable1.FieldCount + 2;
  StringGrid.RowCount := ADOTable1.RecordCount + 1;
  for i := 0 to ADOTable1.FieldCount - 1 do
    StringGrid.Cells[i, 0] := ADOTable1.Fields[i].FieldName;
  ADOTable1.First;
  while not ADOTable1.Eof do begin
    for i := 0 to ADOTable1.FieldCount - 1 do
      StringGrid.Cells[i, ADOTable1.RecNo] := ADOTable1.Fields[i].AsString;
    ADOTable1.Next;
  end;
end;

اشكرك على المرور
لكن اخي ليس هذا م قصدته
بل كنت اثصد
ان يكون لكل سجل stringgrid
يعني كل ما انتقلت الى سجل يجب ان يكون StringGrid به معطيات السجل وليس معطيات كل السجلات
بارك الله فيك

medreg

Mr.DOS

medreg