Einen hätt' ich da noch:
Wenn die Schleife quasi von 1 bis 9 läuft, aber bei 10 dann ein Problem macht, liegt die Vermutung nahe, dass hier ein Typproblem vorliegen könnte.
Eventuell mal folgende Änderung probieren:
Delphi-Quellcode:
Form1.SQLDataSet1.ParamByName('Feld1').DataType:=ftInteger;
Form1.SQLDataSet1.ParamByName('Feld1').Value:=1;
Form1.SQLDataSet1.ParamByName('Feld2').DataType:=ftInteger;
Form1.SQLDataSet1.ParamByName('Feld2').Value:=2;
Form1.SQLDataSet1.ParamByName('Feld3').DataType:=ftString;
Form1.SQLDataSet1.ParamByName('Feld3').Value:=Format('h1 = %d',[h1]);
Form1.SQLDataSet1.ParamByName('Feld4').DataType:=ftString;
Form1.SQLDataSet1.ParamByName('Feld4').Value:='4';
Form1.SQLDataSet1.ParamByName('Feld5').DataType:=ftInteger;
Form1.SQLDataSet1.ParamByName('Feld5').Value:=5;
Form1.SQLDataSet1.ParamByName('Feld6').DataType:=ftInteger;
Form1.SQLDataSet1.ParamByName('Feld6').Value:=6;
Form1.SQLDataSet1.ParamByName('Feld7').DataType:=ftString;
Form1.SQLDataSet1.ParamByName('Feld7').Value:='7';
Form1.SQLDataSet1.ParamByName('Feld8').DataType:=ftString;
Form1.SQLDataSet1.ParamByName('Feld8').Value:='8';
Form1.SQLDataSet1.ParamByName('Feld9').DataType:=ftInteger;
Form1.SQLDataSet1.ParamByName('Feld9').Value:=9;
Und bitte auf jeden Fall auch diese Variante testen:
Delphi-Quellcode:
Form1.SQLDataSet1.ParamByName('Feld1').AsInteger:=1;
Form1.SQLDataSet1.ParamByName('Feld2').AsInteger:=2;
Form1.SQLDataSet1.ParamByName('Feld3').AsString:=Format('h1 = %d',[h1]);
Form1.SQLDataSet1.ParamByName('Feld4').AsString:='4';
Form1.SQLDataSet1.ParamByName('Feld5').AsInteger:=5;
Form1.SQLDataSet1.ParamByName('Feld6').AsInteger:=6;
Form1.SQLDataSet1.ParamByName('Feld7').AsString:='7';
Form1.SQLDataSet1.ParamByName('Feld8').AsString:='8';
Form1.SQLDataSet1.ParamByName('Feld9').AsInteger:=9;
Sollte der Fehler dann immer noch da sein, bitte den aktuellen Quelltext der Methode Laden hier posten, dann muss da nochmal jemand anders drüber schauen, mir fehlen da die Ideen.
Wie lautet nach diesen Änderungen die "aktuelle" Fehlermeldung?