Tu l'as mis ou ton code qui modifie le comportement de OnKeyPress ?
si tu as les sources de la VCL et que tu remontes la hierarchie, tu as TEdit->TCustomEdit->TWinControl...
dans TWinControl tu as la procedure qui gere l'appel de l'evenement uTilisateur OnKeyPress:
Citation :
procedure TWinControl.KeyPress(var Key: Word);
begin
if Assigned(FOnKeyPress) then FOnKeyPress(Self, Key);
end;
|
cette procedure est dynamic et protected donc tu peux l'overrider dans le code de ton composant:
Citation :
procedure TZeroCoolEdit.KeyPress(var Key: Word); override
...
procedure TZeroCoolEdit.KeyPress(var Key: Word);
begin
// Ajoute ici ton code personnalise a faire _avant_ l'appel du gestionnaire d'evenement
inherited;
// Ajoute ici ton code personnalise a faire _apres_ l'appel du gestionnaire d'evenement
end;
|
donc comme ca ton code personnalise est effectue et la procedure assignee par l'utilisateur de ton composant le sera aussi...
[edit]--Message édité par JWhy--[/edit]
---------------
www.alliancefrancophone.org ... Home is where the heart is