ABend,
ich mal etwas anderes versucht.
Ist zwar nicht besonderes professionell, aber die not macht erfinderich.
Und zwar werden alle änderten Reihen an ein edit übergeben und durch leerzeichen abgetrennt.
Diese reihen werden dann bei speichern per schleife ausgelesen und aktualisert:
Delphi-Quellcode:
edit1.Focused;
a:=edit1.Text;
f1:=0;
while f1 < edit1.GetTextLen do
begin
f2:=Pos(' ',a); // ich vermute hier den fehler (beim 2ten druchlauf um eins zu klein)
a2:=copy(a,f1,f2-1);
n:=strtoint(a2);
f1:=f2+1;
IBstoredproc2.Params[1].asstring:= stringgrid1.Cells[1,n];
...
IBstoredproc2.ExecProc;
ibtransaction1.Commit;
IBTransaction1.Active := True;
ibdataset1.Open;
end;
jedoch hait irgentwas mit der schleife nicht hin. Es kommt bei zweiten durchlauf immer die fehlermeldung : " ' ' ist keine gültiger integer "
Ich glaube auch zu wiseen wo der fehler ist, kann ihn aber nicht beheben. Ich denke es liegt an f2... der wert ist beim zweiten durchlauf um eis zu klein.
What to do?
Plautzer