Hola DOS.
Cita:
|
Basicamente donde va la codificacion, por defecto se tiene que ver al entrar al formulario todos los registros que esten activos, por eso digo si se debe codificar el Form.
|
Podés poner la sentencia SQL en tiempo de diseño desde el Object Inspector ->tuQuery-> SQL, o hacerlo por código:
Código Delphi
[-]
procedure TForm1.FormCreate(Sender: TObject);
begin
with tuQuery do
begin
Close;
SQL.Clear;
SQL.Add('SELECT APELLIDO, NOMBRE, DIRECCION, ...'); SQL.Add('FROM CLIENTES');
SQL.Add('WHERE VISIBLE = 1');
Open;
end;
end;
Cita:
|
la segunda codificacion, si puede ir algo asi en el boton eliminar, ya que la codificacion que pones no hace eso
|
Código Delphi
[-]
procedure TForm1.btnEliminarClick(Sender: TObject);
var
bkp: string;
id: Integer;
begin
with tuQuery do
begin
id := FieldByName('CODIGO').AsInteger;
bkp:= SQL.Text;
SQL.Clear;
SQL.Add('UPDATE CLIENTES SET VISIBLE = 0');
SQL.Add('WHERE CODIGO = :PID');
ParamByName('PID').AsInteger:= id;
ExecSQL;
SQL.Text:= bkp;
Open;
end;
end;
Cita:
|
ademas quiero saber si cuando oculte el registro se vera en el DBGrid una fila vacia intercalada con los registros visbles?
|
No.
Saludos.
