Como crear un componente sin derivarlo de otra clase?

[DarkBlue]

mi duda surguio por que estaba leyendo acerca de como crear un componente pero siempre se deriva de una clase que ya existe, quisiera darle alguna forma en especial a mi componente como un triangulo o una pc algo así nuevo que no se paresca a ningún otro, por que eso de crear nuestras propias clases esta perfecto pero ahora como le doy una forma?

gracias!

[Neftali [Germán.Estévez]]

Lo que te marca la herencia de tu componente no es la forma que tiene (que eso puedes cambiarlo redibujando el componente como tú desees), sino la funcionalidad que necesitas.

Según lo que vaya a realizar tu componente podrás derivar de uno o de otro, simplemente para aprovechar lo que ya hay hecho.
También podrías derivar de TComponent directamente o de TObject si lo necesitas, pero vas a tener que implementar muchas cosas que estas clases ya poseen, por lo tanto no tiene sentido hacerlo así.

¿Exactamente para qué sirve tu componente con forma de triangulo o de PC?

[[Delphius]]

Valga aclarar, además, que directa o indirectamente, TODA clase hereda de TObject ... la madre de todas. Asi que de la herencia no te salvas

Saludos,

[ecfisa]

Hola.

Agregando algo a lo dicho por Neftalí y Delphius, para cambiar o dar forma a un componente revisá las funciones:

• CreatePolygonRgn
• SetWindowRgn

Un pequeño ejemplo del uso con un TPanel:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
const
   PTS: array [1..5] of TPoint =((X:10;Y:10),(X:150;Y:50),
      (X:250;Y:180),(X:50;Y:150),(X:10;Y:10));
var
  Reg : HRGN;
begin
  Panel1.Color := clLime;
  Reg := CreatePolygonRgn(PTS, 5, 1);
  SetWindowRgn(Panel1.handle, Reg, true);
end;

Saludos.

[DarkBlue]

si ciertamente se que la forma no se hereda de la clase si no todas sus propiedades metodos y demas.No existen esos componentes (el trinangulo o la pc ) ni tengo pensado en hacerlos simplemente fue una ocurrencia que tuve para dar a conocer mi duda de como crear mis propios componentes con la forma que yo quiera.

Por ejemplo si a mi alguna ves se me ocurre hacer una clase nueva del tipo que yo quiera , pues ya que se como ponerle propiedades y todo lo demas lo unico que me faltaria seria darle alguna forma para que se visualizara en el form. esto viene siendo mas especificamente como lo que dice ecfisa.

Tal ves necesite estudiar mas esas funciones pero si le tengo que decir exactamente con rallita y palito como lo quiero dibujado.. dibujarlo atraves de esas ordenes esta de locos(especialmente cuando son dibujos de mucho detalle), no puedo simplemente cargarge un dibujo?
para que respresente eso que yo quiero ?¿

[Neftali [Germán.Estévez]]

Empezado por DarkBlue

Tal ves necesite estudiar mas esas funciones pero si le tengo que decir exactamente con rallita y palito como lo quiero dibujado.. dibujarlo atraves de esas ordenes esta de locos(especialmente cuando son dibujos de mucho detalle), no puedo simplemente cargarge un dibujo?
para que respresente eso que yo quiero ?¿

Lo que intentamos decirte es que lo que quieras pintar, es lo de menos. Por ejmplo, si lo derivas de un TImage, podrás cargar el dibujo que quieras y no tendrás que hacerlo a base de "palito" y "rallita". Lo que tendrás que plantearte es qué quieres hacer con ese componente (además del aspecto).
¿Requiere foco? ¿Qué eventos necesitarás? ¿Debe admitir eventos de teclas? ¿Handle?...

[DarkBlue]

ohh bueno haberlo dicho antes supongo que si lo derivo de tcomponent o de la clase correcta podre heredar eventos como onclick, drag and drop ademas de cargarle la apariencia de yo guste muchas gracias.

[Neftali [Germán.Estévez]]

Mira, por ejemplo, aquí tienes código de cómo generar componentes con diferentes formas.
En este caso están derivados de TShape y redefinen el método Paint.
Hay algunos generados "a mano", como estos:







Y otros generados utilizando imágenes:



Todos forman parte de un proyecto para crerar plugIns, pero tienes el código de los diferentes componentes y puedes revisarlo.

[DarkBlue]

neftali que amable, deveras muchisimas gracias pienso utilizar esto deveras!! intentare crear algun juegito curioso como el solitario hehe o parecidos