Ver Mensaje Individual
  #3  
Antiguo 17-06-2007
drakkon drakkon is offline
Miembro
 
Registrado: jun 2007
Posts: 21
Reputación: 0
drakkon Va por buen camino
Question

En mi DBGrid tengo 3 columnas (clave, nombre, relacion) que estan relacionadas directamente con los campos.

Intento poner este código en un BitBtn para guardar el nuevo registro que agregue en el DbGrid, y puedo hacer referencia a lo que haya escrito en la 1er. columna, pero no se cómo decirle que guarde lo que escribí en las demas columnas.

Código Delphi [-]
Query3.Close();
Query3.SQL.Clear();
Query3.SQL.Add('SELECT *FROM clientes1 WHERE clave_cli='+DbGrid1.SelectedField.Text+';');
Query3.OpenDatabase();
Query3.Open();
if Query3.Eof=false then begin
  Application.MessageBox('Clave Duplicada','ERROR',MB_ICONERROR or MB_OK);
end;
 
else begin
     Query3.Close();
     Query3.SQL.Clear();
     Query3.SQL.Add('INSERT INTO clientes1 (id_persona,nombre,relacion) VALUES (:iddpersona,:nombre,:relacion)');
     Query3.ParamByName('iddpersona').AsString:=DbGrid1.SelectedField.Text;
     Query3.ParamByName('nombre').AsString:=  // es aqui donde no sé cómo hacer referencia a las demas columnas del Grid.
     Query3.ParamByName('relacion').AsString:= // es aqui donde no sé cómo hacer referencia a las demas columnas del Grid.
     Query3.ExecSQL;
end;

Es precisamente éste el problema que tengo. Espero me haya explicado mejor y puedas ayudarme por favor.

Saludos.

Última edición por drakkon fecha: 17-06-2007 a las 19:31:13.
Responder Con Cita