Avatar billede lolle Nybegynder
02. januar 2002 - 22:52 Der er 3 kommentarer

Component .. Enabled ting

Jeg er ved at lave et component til Delphi ud fra TImage!
I denne component overskriver jeg den normale \"Enabled\" fordi at jeg skal ha en procedure til at køre når den bliver disabled!

Men nu virker Enabled ikke som det skal gøre.. altså OnClick/OnDblClick/osv.. virker stadig selv om componentet står til at være disabled (Enabled:=False;).

Nogen der kan hjælpe??

Læs evt. dette spm http://www.eksperten.dk/spm/151724
Avatar billede morten_s Nybegynder
03. januar 2002 - 08:12 #1


Har du prøvet med et inherited ?


procedure TDinKomponent.SetEnabled(Value: Boolean);
begin
  inherited;  <----- SÆTTES IND HER
  FEnabled := Value;
  if Value = false then
    begin
      ShowMessage(\'Komponenten blev disabled!\');
    end;
end;
Avatar billede lolle Nybegynder
03. januar 2002 - 09:10 #2
ja det har jeg!
Men der kommer en fejl (Incompatible types) pga. en anden fejl (Method \'SetEnabled\' hides vitual method of base type \'TControl\')

Så har jeg prøvet at rename SetEnabled til SetEnabled2 men så springer compileren bare inherited over.

Og det virker altså ikke så!
Avatar billede klix Nybegynder
10. januar 2002 - 09:59 #3
Har du i din class definition lavet en override?
Ellers prøv det når du bruger inherited.

F.eks.
TMyImage = class(TImage)
....
  procedure SetEnabled(Value: Boolean); override;
....
end;
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester