Buenos días, estoy con problemas en una migración y necesito saber cuál es la función que realiza los cambios del form: “Incorrect Data Values”.
Necesito saberlo ya que cerré y apreté en el botón “No” y por lo tanto los cambios no se han realizado.
He pensado en crear un botón en el form. Cuando se haga click en el botón se lanzará el proceso que cambie los valores que habían en los campos anteriores por los nuevos.
No obstante, el botón no me ha funcionado ya que el código que por ahora he usado para el botón es el siguiente:
TempTable.RESET;
TempTable.DELETEALL;
Table.RESET;
IF Table.FIND('-') THEN
REPEAT
TempTable:=Table;
TempTable.INSERT;
UNTIL Table.NEXT=0;
ChangeMode := TRUE;
StateIndicate.Open;
IF TempTable.FIND('-') THEN
REPEAT
TableInformation."Company Name" := TempTable."Company Name";
TableInformation."Table No." := TempTable."Table ID";
TableInformation."No. of Records" := TempTable."Linked Table ID";
SysObject."Object Caption" := TempTable."Table Name";
//UpdateTable; // Sólo sirve para mostrar el cuadro de diálogo.
UNTIL TempTable.NEXT = 0;
IF TempTable.FIND('-') THEN BEGIN
StateIndicate.Start;
ProcessTable;
END;
He comentado el UpdateTable ya que lo único que hace es sacar una ventana de diálogo con el número de registros y poco más.
¿Cuál sería la función que se encarga de insertar todos los valores nuevos a los campos? Me estoy refiriendo a la misma función que es llamada cuando el proceso de fieldcheck ya ha pasado y cierras la ventana con los datos y los nuevos valores y si le das a “Sí”, se encarga de insertar todos los nuevos valores.
Es algo difícil de entender, espero haberme explicado correctamente y en caso de necesitar más explicaciones daré todas las necesarias.
Un saludo.