![]() |
Re: parent minimieren
Zitat:
:-( gruss Kh |
Re: parent minimieren
Zeig doch mal den interface-Teil Deiner Unit.
|
Re: parent minimieren
Zitat:
type { Tmenueauswahlform } Tmenueauswahlform = class(TForm) beendenButton: TButton; Label1: TLabel; dbnameLabel: TLabel; Label2: TLabel; Panel1: TPanel; procedure beendenButtonClick(Sender: TObject); procedure FormCreate(Sender: TObject); private { Private-Deklarationen } procedure WMSysCommand(var Msg: TWMSysCommand); message WM_SYSCOMMAND; public { public declarations } end; var menueauswahlform: Tmenueauswahlform; newbox: TmyButton; implementation |
Re: parent minimieren
Das sieht OK aus. Muss ich mir wohl doch Lazarus unter Windows installieren, sonst finde ich das eh nicht.
|
Re: parent minimieren
Zitat:
ich denke es macht ja auch sinn, das form entscheiden zu lassen. Gruss Kh |
Re: parent minimieren
Den Effekt kann ich bestätigen, die Methode wird nicht durchlaufen. Es gibt zwar das Ereignis OnWindowStateChange, aber das wird erst nach der Änderung ausgelöst. Somit muss ich leider passen, Lazarus-Experten an die Front.
|
Re: parent minimieren
Zitat:
Gruss Kh |
Re: parent minimieren
Funktionierts auch nicht, wenn Du die
![]() |
Re: parent minimieren
Zitat:
kannst du das mal bitte probieren, du kennst dich da besser aus und bist sicher schneller als ich. Gruss Kh |
Re: parent minimieren
Wenn man die Minimieren-Schaltfläche in der Titelleiste klickt, wird kein WM_SYSCOMMAND gesendet.
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 15:24 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz