Llamar componente dinamico

[jlrdz]

Empezado por roman

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.

[roman]

Suongo que puedes pasar como parámetro un TDataSet, ancestro común de todos los componentes de acceso a datos. Claro que, dentro de tu rutina, únicamente podrás usar métodos genéricos del TDataSet.

// Saludos