Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by karsten.kg,
11. Jul 2009
Hallo,
hab jetzt mit dem Application.OnMessage Event gearbeitet:
procedure TmdiBuchungsliste.FormCreate(Sender: TObject);
begin
Application.OnMessage:=AppMessage;
end;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by karsten.kg,
11. Jul 2009
Hallo Reinhard,
ja, ich wäre damit zufrieden. Ich kann mich ja später mal nach Lust und Laune mit Hooks beschäftigen. Den einzelnen Beiträgen hier im Forum zufolge ist es auch kein Hexenwerk.
Wie bekomme ich es denn innerhalb der Anwendung hin?
Gruß Karsten
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by karsten.kg,
10. Jul 2009
Hallo sx2008,
so leicht ist das leider nicht: Das Ereignis on Exit wird nur ausgelöst, wenn ein anderes Steuerelement den Fokus bekommt. Ich habe im Formular auch eine Toolbar mit BitButtons! Wenn ich auf die Buttons klicke, funktioniert es natürlich. Wenn ich auf die Toolbar klicke, bekommt diese aber nicht den Fokus, weil Sie kein fensterorientiertes Steuerelement ist.
Wenn ich im...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by karsten.kg,
10. Jul 2009
Hallo,
ich habe mir von TDBGrid die Komponente TDBStringGrid abgeleitet, welche es mir erlaubt, auch das Ereignis OnSelectCell zu nutzen.
Dieses benötige ich, um in einer Zelle des DBGrid z.B. eine Listbox darzustellen. Das ganze sieht so aus:
procedure TmdiBuchungsliste.setRectListBox(rec:Trect);
var r:TRect;
begin