Cargar campo en un edit

[Kamael]

La duda es que no se como cargar los valores de los campos en los Edit

[jachguate]

así:

Código Delphi [-]
Edit1.Text := Query1.FieldByName('Campo').AsString;
Edit2.Text := Query2.FieldByName('OtroCampo').AsString;

Hasta luego.



pd. Te recomiendo la lectura de "la cara oculta de delphi 4", disponible en la sección de libros del ftp.

[Kamael]

Gracias por tu respuesta. Ahora lo tengo bastante claro.
Un saludo

[[enecumene]]

si no te funciona la propuesta del amigo jachguate:

Código Delphi [-]
Edit1.Text := Query1.Fields[0].AsString;
Edit2.Text := Query2.Fields[1].AsString;

Saludos.

[Kamael]

Gracias enecumene. Tambien me funciona lo tuyo.
Así termina la cosa :

If Tloc.FindKey([Lo.Text]) then
Lo.Text := TLoc.Fields[0].AsString ;
No.Text := TLoc.Fields[1].AsString ;

[[egostar]]

Empezado por Kamael

Gracias enecumene. Tambien me funciona lo tuyo.
Así termina la cosa :

If Tloc.FindKey([Lo.Text]) then
Lo.Text := TLoc.Fields[0].AsString ;
No.Text := TLoc.Fields[1].AsString ;

Puede ser que tengas problema con esa porción de código

Imagina que pasa si no encontró la llave, pues va a modificar No.Text con un dato erróneo

Encierra el bloque con begin....end

Código Delphi [-]
If Tloc.FindKey([Lo.Text]) then begin
   Lo.Text := TLoc.Fields[0].AsString ;
   No.Text := TLoc.Fields[1].AsString ;
end;

Por cierto, usa las etiquetas Delphi para que el código se vea mejor.

Salud OS