PDA

View Full Version : Dbisam و دستور Update



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 ;



با تشکر

moradi_am
پنج شنبه 31 شهریور 1384, 12:23 عصر
میشود مثال:
update Table set field=10

دنیای دلفی
پنج شنبه 31 شهریور 1384, 15:09 عصر
به جای استفاده از این کد

for i:=1 to DataBank.DBchangepart.RecordCount do
begin
DataBank.DBchangepart.Edit ;
DataBank.DBchangepartPart.Value := Databank.DBProjectEndPart.Value ;
DataBank.DBchangepart.Next ;
end;



از کد پایین استفاده کن


while not DataBank.DBchangepart.Eof do
begin
DataBank.DBchangepart.Edit ;
DataBank.DBchangepartPart.Value := Databank.DBProjectEndPart.Value ;
DataBank.DBchangepart.Next ;
end;