Einzelnen Beitrag anzeigen

blablab

Registriert seit: 3. Jan 2006
509 Beiträge
 
Delphi 7 Enterprise
 
#1

Erhalte keinen Fokus

  Alt 24. Jun 2010, 14:30
Hallo!

Ich möchte eine Komponente programmieren und hab mich dabei bei TCustomEdit "inspirieren" lassen. Ich hab den Quellcode genommen und alles gelöscht was ich nicht brauche, eigentlich möchte ich nur den Rahmen der Edit, sonst nichts. Mein Problem ist jetzt aber, dass ich nun keinen Fokus bekomme. Wenn ich auf die Schaltfläche klicke bleibt trotzdem die vorherige aktiv. Und dadurch dass ich keinen Fokus erhalte, gehen Ereignisse wie MouseWheel, KeyUp/Down usw nicht.
So gehts:
Delphi-Quellcode:
procedure TCustomDatumZeitPicker.CreateParams(var Params: TCreateParams);
const
   ...
begin
   inherited CreateParams(Params);
   CreateSubClass(Params, 'EDIT');
   ...
Aber dadurch bekomme ich die Funktionalität vom Edit, die ich nicht möchte. Und wenn ich daraus das mache gehts nicht mehr...
Delphi-Quellcode:
procedure TCustomDatumZeitPicker.CreateParams(var Params: TCreateParams);
const
   ...
begin
   inherited CreateParams(Params);
   //CreateSubClass(Params, 'EDIT');
   ...
Was könnte ich da machen???
Vielen Dank schonmal!

Grüße
blablab

Geändert von blablab (24. Jun 2010 um 16:02 Uhr)
  Mit Zitat antworten Zitat