Form schließt sich nicht mit Close

[messie]

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]

Zitat:

ich beschreibe ein Form im OnShow.

Was heiß das?

[messie]

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]

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?