Ver Mensaje Individual
  #6  
Antiguo 06-09-2011
jlrdz jlrdz is offline
Miembro
NULL
 
Registrado: ene 2011
Posts: 50
Reputación: 16
jlrdz Va por buen camino
Cita:
Empezado por roman Ver Mensaje
No me queda claro qué quieres lograr. Podrías, en lugar de pasar el nombre de la tabla como parámetro, pasarle el componente en sí:

Código Delphi [-]
procedure llamar_tabla(Tabla: TTable)
begin

  Tabla.Locate('campo', 'palabra', [loPartialKey]);

end;

y lo llamarías así (por ejemplo):

Código Delphi [-]
llamar_tabla(mimodulo.tablaTelefonos);

O bien, algo similar a lo que dice oscarac, creando un objeto Table al vuelo dentro del procedimiento, al cual le asignas el nombre de la tabla.

// Saludos
Me surgió otra duda más con esto que me funciona de maravilla, ojalá pudieras ayudarme y es que como me dices, envio el componente a mi procedimiento que es una tabla, esto me limita a solo tablas pero me gustaría enviar componentes de consulta, para las tablas uso el componente TMyTable y para las consultas uso TMyQuery, ¿Cómo puedo modificar mi procedimiento para que los parametros sean opcionales?, o sea que yo pueda enviar ya sea un componente TMyTable o TMyQuery.

Actualmente mi procedimiento está así:

Código Delphi [-]
//así lo tengo declarado
procedure llenar_combo(lista: Matriz; tabla:TMyTable);

//así lo mando llamar
llenar_combo(Campos, Mi_Modulo.telefonos);

Eso me limita a sólo poder enviar una tabla y el parametro es requerido, lo que quiero es que tenga la opcion de enviar un componente TMyTable o TMyQuery de forma opcional, espero puedan ayudarme una vez más. Saludos.
Responder Con Cita