Registriert seit: 13. Jan 2004
Ort: Hamm(Westf)
1.930 Beiträge
Delphi 12 Athens
|
Re: Brauche Hilfe bei Komponentenentwicklung allgemein
21. Jul 2005, 09:58
Delphi-Quellcode:
//...
interface
uses Classes, StdCtrls, Windows, SysUtils; //Sind nicht alle aufgeführt, aber im richtigen
//Programm habe ich alle benötigten aufgeführt.
type
TRobotPainter = class(TWinControl)
protected
Image: TImage;
//...
end;
implementation
constructor TRobot.Create(AOwner: TComponent);
begin
Image:=TImage.create(Self);// das ist richtig
Image.Parent:=self; //das solltest du nicht hier machen. >> Fehler: bla... kein übergeordnetes fenster ..bla
(*Besser im SetParent(AWincontrol:Twincontrol);Override;*)
image.rect(0,0,100,100);// das solltest du auch in Setbounds(....);Override; machen
end;
//...
end.
Wozu die Image Komponente?
Andreas Monads? Wtf are Monads?
|
|
Zitat
|