InsertComponent

[diegofhernando]

OK, la verdad es q en esto de la programacion como en el amor una cosa lleva a otra y estoy lleno de codigo... me inclino por poner estos componentes como propiedades de mi componente, pero como hacerlo, es decir haciendolo, por ejemplo un TDBEdit podria usarlos en diseño... agradeceria un poco de orientacion al respecto.

Gracias.

[jachguate]

Pues no lo he intentado.. pero suponiendo que publicas el DataSource en la propiedad del mismo nombre, seria tan fácil como intentar usarlo, y si algo falla, pues suponer que no se puede.

Digamos, en tiempo de diseño, asignar a edit1.datasource el valor componentediego1.datasource.

en tiempo de ejecución es seguro que no tendrias ningún problema.

Hasta luego.

[diegofhernando]

bien, muchas gracias a todos por la colaboracion, intentare y de fallar creo q voy a optar por q el programador inserte los componentes y recibirlos como propiedades dentro del mio...

Salu2

[roman]

¿Por qué no nos describes un poco lo que quieres lograr?

El objetivo podría no ser tan descabellado. Por ejemplo, a mi se me ocurriría una componente TBdePack que al insertarla me inserte un DBGrid, un TTable y un TDataSource ya todos enlazados. Similarmente podría tener compontes TIbPack, TZeosPack, TAdoPack, etc. de manera que la creación de un formulario ABM sea cosa de dos click (o un doble click que no es lo mismo) y uno sólo escoge la componente adecuada según el tipo de controles BD que se requieran.

Pero creo que el mismo objetivo, suponiendo que sea similar al tuyo, puede obtenerse mejor creando expertos (wizards) que se encarguen de todos los detalles del registro de clases, uso de las unidades necesarias, etc.

Si es un tema que te interesa mucho pienso que te convendría tomarte un tiempo para comenzar a estudiar las ToolsApi y la creación de Wizards.

// Saludos

[diegofhernando]

Muy bien... lo q kiero es hacer un componente estilo DBNavigator, lo cierto es q no me gusta el q trae Delphi (q raro...), ademas de q puedo personalizar un poco mas el código si lo hago yo mismo, el componente parte de un TPanel con Botones insertados cuando se crea el comp; hasta ahi todo va bien, pero se complica cuando llegue al tema de este hilo... y por ahi voy, la verdad es q kisiera q con solo insertar el componente todo estuviese listo para insertar los demas componentes... claro esta resta la insercion de los SQL's en el IBDataSet pero no todo es tan sencillo... bueno eso es lo q llevo y a donde kiero llegar, si tienen sugerencias como siempre son bienvenidas.

Salu2

[roman]

El tema es complicado. Como te mencioné antes, hacer este tipo de cosas requiere de cuidar muchos detalles y entender con cierta profundidad el mecanismo del IDE.

Por ejemplo, mencionaste antes que el intento de crear el IbDataSet y el DataSource en el constructor de la componente, funcionaba bien en diseño pero te marcaba el error del nombre repetido al ejecutar. Eesto sucede por que realmente se está ejecutando el constructor de tu componente dos veces. La primera durante el diseño al insertarla en el formulario. Ahí se crean las primeras y a partir de entonces son parte del formulario y ya nada tienen que ver con tu componente. Entonces, al momento de ejecutar la aplicación se crean las copias que ya se crearon durante el diseño más las nuevas copias que se crean por el constructor que se ejecuta de tu componente al correr el programa. De alguna manera tu componente tiene que saber que ya se crearon durante el diseño y que por tanto no hay que volverlas a crear. Esto quizá puedas resloverlo con algún condicional del tipo:

Código Delphi [-]
// Si estamos en tiempo de diseño
if csDesigning in componenState then
begin
  { crear las componentes }
end;

Pero aún así no estoy seguro que funcione. Quizá la primera vez sí pero ¿qué pasa cuando cargas el proyecto en el IDE nuevamente. El IDE lee el archivo .dfm del formulario y ve que hay una de tus componentes más el IBDataSet y el DataSource que ya se crearon la primera vez. Para reconstruir el formulario debe crear nuevamente las componentes, entre ellas la tuya, que volverá a ejecutar el constructor y seguimos en diseño, así que intentará crear una vez más las otras componentes.

Ahora bien, suponte que el programador inicia un nuevo proyecto pero aún no añade los paquetes que contienen a los IBDataSets. Al insertar tu componente, ésta creará al IbDataSet pero resulta que habrá un objeto en el formulario que en realidad no "tiene derecho" a estar ahí ya que el paquete que sabe cómo lidiar con él aún no se incluye.

Quizá tu mejor apuesta por el momento sea intentar algo como lo que te comenta jachguate; crear al IbDataSet y al DataSource como subcomponetes de tu componente, es decir componentes que pertenecen no al formulario sino a tu componente. Serían componentes que no se ven en el formulario pero que puedes acceder como propiedades de tu componente.

Otra opción podría ser usar frames que puedes pensarlos como un grupo de componentes que creas de forma visual. Ahí colocarías todas las componentes que desees, lo añades al repositorio y sólo tienes que aclararle al programador que antes de utilizar el frame debe incluir los paquetes correspondientes.

Aunque no estoy seguro de que sea necesario tanto, pienso, como te dije antes, que el mejor camino- aunque quizá el más complejo - sea el de usar los Open Tools Api para crear Expertos o Wizards que se encarguen de todos. Un Expert puede interactuar con el propio IDE de Delphi añadiendo, por ejemplo, las unidades necesarias en la cláusula uses de la unidad del formulario sobre el que se esté trabajando.

// Saludos

[diegofhernando]

Bien Roman ante todo muchas gracias por el interes q haz prestado a mi problema, la verdad me interesa mucho aprender ha crear los expertos, ya q creo q no va a ser la unica oportunidad q tendre este inconveniente... desafortunadamente no tengo mucha idea de como se usan y se no es problema te agradeceria q me indicaras algun sitio donde poder encontrar informacion acerca del tema... como siempre gracias.

Salu2

[roman]

Desafortunadamente hay muy poca referencia a las ToolsApi y aunque la ayuda de Delphi 7 ya incluye el rubro la verdad es un poco difícil entenderle sin tener una idea previa de lo que pasa.

De las pocas referencias que he visto están

http://www.gexperts.org/opentools/
http://www.tempest-sw.com/opentools/

La segunda tiene la desventaja de estar escrita para versiones anteriores pero aún así es muy buena para darse una idea de cómo funciona el asunto.

En estos momentos es casi imposible que me dedique a esto pero en unas dos semanas espero tener un poco de tiempo para ver si preparo algún ejemplo.

// Saludos

[diegofhernando]

ok, voy a mirar los links q me muestras... Salu2