Delphi - Desenlazar Datasource

 
Vista:

Desenlazar Datasource

Publicado por Pepe (15 intervenciones) el 26/06/2006 23:39:54
Saludos!!!

Estoy haciendo una modificacion de registros, realizo una busqueda en la base de datos, y muestro los valores en dbedits (cabe mencionar que esos mismos dbedits los utilizo para capturar y guardar registros en la base de datos, por lo tanto en la propiedad de DataSource de cada dbedit lo tengo enlazado a DataSource1) el problema es como quitar ese enlace mediante codigo, ya que si no se lo quito no me muetra los valores cuando realizo la busqueda en los dbedits.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Desenlazar Datasource

Publicado por Edgar Rodriguez (172 intervenciones) el 27/06/2006 00:41:19
Si desconectas el datasource, es probable que no veas la información en los dbEdits, porque ellos dependen de el datasource para mostrar la información, yo recomiendo que busques de esta forma mejor:

procedure TForm1.Button1Click(Sender: TObject);

function Buscar(valor_a_buscar:String):Boolean;

var i:Integer; c: Smallint;

begin

result := false; c := -1;

for i:=0 to Form1.componentcount-1 do

if Form1.Components[i] is TDBEdit then begin

c := CompareStr(TDBEdit(Form1.Components[i]).Text, valor_a_buscar);

if c = 0 then begin

result := true; { Sí lo encontró }

Exit;

end;

end;

end;

begin

if Buscar('Nelson') then

ShowMessage('encontrado');

end;
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar