hola a ud, bueno mi intencion es tambien eliminar un registro seleccionado del dbgrid de un table y guardarlo en variable para luego compararlo con otros table en los cuales se relaciona y tambien aparece, es decir si existe ese registro seleccionado e otras tablas eliminarlo primero para luego poder eliminarlo de la tabla donde lo seleccione.
probe con esto
Código Delphi
[-]
procedure TForm1.Button5Click(Sender: TObject);
var x:integer;
begin
if Dbgrid1.columns.count >0 then
x := DBGrid1.SelectedField.Asinteger;
while not Table3.EoF do
begin
if Table3.FieldByName('curso').AsInteger=x
then application.Terminate;
end;
lo hice como prueba pero no se cierra la aplicacion
ademas el problema es cuando quiero verificar sobre tablas que estan en otros forms podria ser:
WHILE NOT FORMX.TABLE3.EOF DO
nose si estaria bien tambien lo probe y no cierra entonces puede ser que no se este guardando en la variable el registro q selecciono o no esta recorriendo la tabla .
probe tambien
Código Delphi
[-]
if Dbgrid1.columns.count >0 then
x := DBGrid1.SelectedField.Asinteger;
pero nose si esta bien escrito o si falta algo pero tampoco al parecer lo guarda. bueno espero puedan darme una mano gracias desde ya