Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   Cargar campo en un edit (https://www.clubdelphi.com/foros/showthread.php?t=52811)

Kamael 31-01-2008 21:25:44

Cargar campo en un edit
 
Tengo una Table con los campos 'Loc' y 'Nombre', y dos TEdit.
Lo.Text Y No.Text .
Quiero Introducir un valor en 'Lo', que me lo busque en Table, y si lo encuentra que me lo muestre en los Edit (El valor de 'Loc' y el de 'Nombre').
Cada uno en su correspondiente Edit.

jachguate 31-01-2008 21:27:45

Y... ¿cual es tu duda? :confused:

Te recomiendo una lectura de la guia de estilo (link en mi firma).

Kamael 31-01-2008 21:37:23

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

jachguate 31-01-2008 21:40:41

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 31-01-2008 21:44:00

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

enecumene 31-01-2008 21:44:15

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 31-01-2008 22:00:13

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 31-01-2008 22:33:33

Cita:

Empezado por Kamael (Mensaje 262473)
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:confused:, pues va a modificar No.Text con un dato erróneo :cool:

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

jperez80 05-02-2008 02:30:28

progra
 
Cita:

Empezado por jachguate (Mensaje 262457)
Y... ¿cual es tu duda? :confused:

Te recomiendo una lectura de la guia de estilo (link en mi firma).

tengo que hacer un programa sobre el control de horario de un aempresa y no tengo ni la mas minima idea

Delphius 05-02-2008 03:53:15

Hola jperez80,
Bievenido/a a clubdelphi.

Como te estás iniciando recomiendo la lectura de la guia de estilo.

Con respecto a tu duda sugiera una búsqueda en los foros sobre los puntos en que tengas inconvenientes, y en caso de no haber un hilo abierto sobre el tema, inicias uno... o continua en otro (si está abierto).

Deberás, necesariamente profundizar sobre tu explicación para que podamos ayudarte. Con esa escasa línea no te sabríamos dar respuesta.

Saludos,

jachguate 05-02-2008 07:27:25

Cita:

Empezado por jperez80 (Mensaje 263420)
tengo que hacer un programa sobre el control de horario de un aempresa y no tengo ni la mas minima idea

Hola.

En primer lugar te recomiendo que leas algunos libros sobre diseño de sistemas, sobre diseño de bases de datos y sobre delphi. Quizás matricularte en una universidad no vendría mal.

Si la empresa no puede esperar tanto tiempo, recomiendo que les aconsejes contratar a un programador experimentado para esta tarea.

No es hacerte de menos, pero creo que antes de asumir una responsabilidad como la de diseñar y desarrollar un sistema para uso comercial, debes estar plenamente calificado para hacerlo. De otra manera, solo acarrearás problemas a la gente que confíe en vos, y a vos mismo.

Un saludo.

;)


La franja horaria es GMT +2. Ahora son las 21:04:25.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi