Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by sir-archimedes,
13. Feb 2006
Dazu sag ich nur eins: super Idee!!! Klappt wie gewünscht :dancer:
Mensch mensch mensch, hätte ich diese Idee früher gehabt, dann hätte ich mir ne Menge Arbeit erspart ;-) Danke!
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by sir-archimedes,
13. Feb 2006
Das Formular soll quasi ein Basis-Formular sein. Es wird also von ihm vererbt. Die Kinder sehen die Actionlist im Formulareditor, sobald ich den Owner=Formular setze. Aber genau das möchte ich verhindern.
Die ActionList soll also unsichtbar im Formulareditor bleiben.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by sir-archimedes,
13. Feb 2006
Danke. Das möchte ich aber gerade nicht. Denn die Actionlist soll "unsichtbar" bleiben. Wenn ich die Action mit Owner=self(=Formular) erstelle, dann klappt es auch nicht...
Prinzipiell dreht es sich mir eigentlich nur darum, einen Shortcut für das Fenster (und nur das Fenster) zu erstellen...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by sir-archimedes,
13. Feb 2006
Leider hat das nicht funktioniert. Die Funktion ShortCut erzeugt auch nur eine neue Integerzahl:
function ShortCut(Key: Word; Shift: TShiftState): TShortCut;
begin
Result := 0;
if WordRec(Key).Hi <> 0 then Exit;
Result := Key;
if ssShift in Shift then Inc(Result, scShift);
if ssCtrl in Shift then Inc(Result, scCtrl);
if ssAlt in Shift then Inc(Result, scAlt);
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by sir-archimedes,
12. Feb 2006
Hallo,
ich möchte eigentlich nur ein Shortcut für meine Form registrieren (per Code). Dazu habe ich mir gedacht, dass ich einfach eine ActionList/Action dynamisch erzeuge und den Shortcut eintrage. Das funktioniert aber nicht: die Action kann nicht per Shortcut aufgerufen werden. Ich habe das so probiert:
InternalActionList := TActionList.Create(NIL);
InternalActionList.Name :=...