![]() |
| |||||||
| Registrarse | Preguntas Frecuentes | Lista de Foreros | Calendario | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
![]() |
| | LinkBack | Herramientas | Desplegado |
| |||
| He creado un componente descendiente de la clase TComponent el metodo create que es virtual hay que redefinirlo hasta aqui todo bien pero cuando uso el componente no tengo forma de pasarle una referencia de un TComponent en el metodo create: constructor Create(AOwner : TComponent); override; constructor TMiComponente.Create(AOwner : TComponent); begin inherited Create(AOwner asTComponent); //(*) end; ########### En el Form: Public MiComp : TMiComponente; implementation Form1.Create(Sender : TObject); Begin MiComp:=TMiComponent.Create(Sender); // Error de Violacion de acceso a memoria en la línea (*) end; Pregunta: ¿que objeto le puedo pasar envez de sender que sea del tipo TComponent? ¿desde que clase puedo heredar para que el create admita a sender (TObject) en el construtor? |
| | ||||
| ||||
| |
| |||
| > > constructor TMiComponente.Create(AOwner : TComponent); > begin > inherited Create(AOwner asTComponent); //(*) > end; > debes ponerlo de alguna de estas 2 formas: inherited; // sin nada más o bién inherited Create(AOwner); // sin el as TComponent si aún falla, lo que pasa es otra cosa que debes tener en MiComponente o en el Form. (por ejemplo en la función Notification) |
| |||
| > > constructor TMiComponente.Create(AOwner : TComponent); > begin > inherited Create(AOwner asTComponent); //(*) > end; > debes ponerlo de alguna de estas 2 formas: inherited; // sin nada más o bién inherited Create(AOwner); // sin el as TComponent si aún falla, lo que pasa es otra cosa que debes tener en MiComponente o en el Form. (por ejemplo en la función Notification) |
| |||
| > > constructor TMiComponente.Create(AOwner : TComponent); > begin > inherited Create(AOwner asTComponent); //(*) > end; > debes ponerlo de alguna de estas 2 formas: inherited; // sin nada más o bién inherited Create(AOwner); // sin el as TComponent si aún falla, lo que pasa es otra cosa que debes tener en MiComponente o en el Form. (por ejemplo en la función Notification) |
| |||
| > > constructor TMiComponente.Create(AOwner : TComponent); > begin > inherited Create(AOwner asTComponent); //(*) > end; > debes ponerlo de alguna de estas 2 formas: inherited; // sin nada más o bién inherited Create(AOwner); // sin el as TComponent si aún falla, lo que pasa es otra cosa que debes tener en MiComponente o en el Form. (por ejemplo en la función Notification) |
| |||
| > > constructor TMiComponente.Create(AOwner : TComponent); > begin > inherited Create(AOwner asTComponent); //(*) > end; > debes ponerlo de alguna de estas 2 formas: inherited; // sin nada más o bién inherited Create(AOwner); // sin el as TComponent si aún falla, lo que pasa es otra cosa que debes tener en MiComponente o en el Form. (por ejemplo en la función Notification) |
| |||
| > > constructor TMiComponente.Create(AOwner : TComponent); > begin > inherited Create(AOwner asTComponent); //(*) > end; > debes ponerlo de alguna de estas 2 formas: inherited; // sin nada más o bién inherited Create(AOwner); // sin el as TComponent si aún falla, lo que pasa es otra cosa que debes tener en MiComponente o en el Form. (por ejemplo en la función Notification) |
| |
| |
![]() |
| Herramientas | |
| Desplegado | |
| |
Temas Similares | ||||
| Tema | Autor | Foro | Respuestas | Último mensaje |
| create table check | daniel | Newsgroup microsoft.public.es.sqlserver | 30 | 26-08-2008 20:33:41 |
| create table | Enrique | Newsgroup microsoft.public.es.vfoxpro | 3 | 26-06-2008 06:30:14 |
| create cursor | Luis Mata | Newsgroup microsoft.public.es.vfoxpro | 6 | 09-04-2008 17:30:26 |
| Create file .dat | wycky | Newsgroup microsoft.public.es.csharp | 0 | 06-11-2007 11:40:01 |
| create new stored procedure | lueiropablo@gmail.com | Newsgroup microsoft.public.es.vs | 0 | 30-03-2007 17:47:05 |