TZParse error???

[franroju]

Ahi va el arbolito:

Form2

GroupBox1

DBGrid

DBNavigator

Panel2

Edit3

Edit4

Label3

Label4

GroupBox2

MainMenu

Panel1

BitBtn1

Edit1

Edit2

Label1

Label2

Panel3

BitBtn2

BitBtn3

[roman]

Ajá. Y el dbgrid y dbnavigator ¿a qué están conectados?

// Saludos

[franroju]

Están conectados a una Datasource de una Tabla, ambos (la tabla y el datasource) en un Datamodule, el cual se crea antes que cualquier Form.

[roman]

¿Hay algún evento asociado a esa tabla?

// Saludos

[franroju]

Le hago un Open a la tabla cuando se crea el Form, y después solo le aplico filtros con la propiedad Filter.

Código Delphi [-]
dm.clientes.Open;

Código Delphi [-]
procedure TForm2.Edit1Exit(Sender: TObject);
begin
  dm.clientes.Filter := 'id = '+Edit1.Text;
  dm.clientes.Filtered := True;
  Edit2.Text := dm.clientes.FieldByName('nombre').AsString + ' ' + dm.clientes.FieldByName('apellido').AsString;
  Edit3.SetFocus;
end;

[franroju]

Ya está roman, muchas gracias. Tus preguntas me llevaron derecho a donde estaba el error. Cambie

Código Delphi [-]
dm.clientes.Filter := 'id = '+Edit1.Text;

por

Código Delphi [-]
dm.clientes.Filter := 'id = '+ QuotedStr(Edit1.Text);

A veces uno se ahoga en un vaso de agua.

Muchas gracias por la atención personalizada, ja.

[roman]

¿Hay manera de echarle un ojo al proyecto o a es parte del proyecto?

// Saludos

[roman]

¡Ah! Justo respondí cuando acababas de responder.

Pues qué bueno que ya se resolvió el problema, aunque no deja de ser extraño el porqué sólo sucedía con el clic.

// Saludos