Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi Form schließt sich nicht mit Close (https://www.delphipraxis.net/91813-form-schliesst-sich-nicht-mit-close.html)

messie 11. Mai 2007 08:24

Re: Form schließt sich nicht mit Close
 
Ich habe jetzt mal die Message ausprobiert. Flackert ähnlich wie beim Timer in einem Testprojekt.
Mein Fenster schließt sich aber immer noch nicht. Ich habe herausgefunden, daß es am Form.Resize liegt. Dort wird ein TFormResizer zum Zoomen der Komponenten von kalmi01
dynform
verwendet. Wenn ich das deaktiviere, schließt auch mein Fenster.

Kann ich dieselbe Message dort auch verwenden um die Ausführung des FormResizers zu unterdrücken? Denn der scheint ja die vorhandenen Messages abzuschießen.

Grüße, Messie

OT: upps, warum sieht denn der Link so aus?

[edit=Luckie]Link repariert. Mfg, Luckie[/edit]

Luckie 11. Mai 2007 09:19

Re: Form schließt sich nicht mit Close
 
Zitat:

ich beschreibe ein Form im OnShow.
Was heiß das?

messie 11. Mai 2007 09:26

Re: Form schließt sich nicht mit Close
 
Zitat:

Zitat von Luckie
Zitat:

ich beschreibe ein Form im OnShow.
Was heiß das?

Das heißt, daß ich Daten aus einer Datei an ein Objekt übergebe. Im OnShow werden die Daten dann an die Steuerelemente übergeben. OnShow deshalb, weil das Form von unterschiedlichen Stellen mit unterschiedlichen Daten aufgerufen werden kann. Ich schaue gerade, ob ich das so auslagern kann, daß ich es vor dem Form.Show aufrufe ohne Redundanz zu erzeugen.

Es bleibt aber weiter für mich interessant, wie und wo die Message zum Schließen des Fensters eingefangen wird.

Grüße, Messie

Gremlin 11. Mai 2007 09:33

Re: Form schließt sich nicht mit Close
 
Ich hab jetzt mal die Resize-Componente installiert, verstehe aber
nicht wie man diese anwendet oder was diese bewirken soll.
Das Form schliesst sich trotzdem, wird aber kurz angezeigt (Flacker-Effekt),
was aber normal ist. Wie übergibst du die Werte an das Formular?

Beispiel:

Delphi-Quellcode:

with TEditForm.Create(self) do begin
  try
    <Properties aus Form> := <Deine Werte>;
    if BedingungenZurAnzeigeDerFormOK then begin
      if (ShowModal=mrOK) then...
    end;
  finally
    Free;
  end;
end;
Die Methode BedingungenZurAnzeigeDerFormOK prüft vor der Anzeige der Form
ob es überhaupt Sinn macht, diese mit den übergebenen Werten anzuzeigen.


Vielleicht könntest du deine Form als Anhang zur Ansicht hochladen?


Alle Zeitangaben in WEZ +1. Es ist jetzt 13:10 Uhr.
Seite 2 von 2     12   

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-2025 by Thomas Breitkreuz