Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by hwis,
21. Jul 2005
Hoi Lucki,
ich habe mir CreateWindowEx angeschaut, aber ich werde nicht richtig schlau daraus.
Du hast nicht per Zufall ein kleines Beispiel zur Hand, oder weisst wo ich mich schlau machen kann?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by hwis,
21. Jul 2005
Wir möchtene den TOpenDialog mit einem eigenen Button ergänzen. Den Button können wir erstellen und auch ein Ereignis zuweisen. Zur Laufzeit wird das Ereignis aber nicht ausgeführt.
procedure TForm1.OpenDialog1OnShow(Sender: TObject);
var
hParent: THandle;
Rect: TRect;
btnDR: TButton;
begin
// Fensterhandle holen
hParent := GetParent(OpenDialog1.Handle);