spicirmkh
چهارشنبه 30 شهریور 1384, 11:39 صبح
سلام
من با dbisam کار می کنم آیا می توانم توی SQL از دستور Update استفاده کنم و آگر نه چه دستور معادلی سراغ دارید
مشکلم با دستور Filter و Edit یک جوری حل کردم اما نمی دانم چرا را همه رکورد تغییر نمی دهد سورس برنامه بصورت زیر است
DataBank.DBchangepart.Filtered := FALSE ;
DataBank.DBchangepart.Filter := 'ProjectID='+ inttostr(ProjectID)+' and Part=0 ' ;
DataBank.DBchangepart.Filtered := True ;
DataBank.DBchangepart.First ;
showmessage(inttostr(DataBank.DBchangepart.RecordC ount));
DataBank.DBchangepart.Refresh ;
DataBank.DBchangepart.First ;
while not DataBank.DBchangepart.Eof do
begin
DataBank.DBchangepart.Edit ;
DataBank.DBchangepartPart.Value := Databank.DBProjectEndPart.Value ;
DataBank.DBchangepart.Next ;
end;
DataBank.DBchangepart.Refresh ;
با تشکر
من با dbisam کار می کنم آیا می توانم توی SQL از دستور Update استفاده کنم و آگر نه چه دستور معادلی سراغ دارید
مشکلم با دستور Filter و Edit یک جوری حل کردم اما نمی دانم چرا را همه رکورد تغییر نمی دهد سورس برنامه بصورت زیر است
DataBank.DBchangepart.Filtered := FALSE ;
DataBank.DBchangepart.Filter := 'ProjectID='+ inttostr(ProjectID)+' and Part=0 ' ;
DataBank.DBchangepart.Filtered := True ;
DataBank.DBchangepart.First ;
showmessage(inttostr(DataBank.DBchangepart.RecordC ount));
DataBank.DBchangepart.Refresh ;
DataBank.DBchangepart.First ;
while not DataBank.DBchangepart.Eof do
begin
DataBank.DBchangepart.Edit ;
DataBank.DBchangepartPart.Value := Databank.DBProjectEndPart.Value ;
DataBank.DBchangepart.Next ;
end;
DataBank.DBchangepart.Refresh ;
با تشکر