AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Cross-Platform-Entwicklung Performanceprobleme in Verbindung mit leerer MemTable
Thema durchsuchen
Ansicht
Themen-Optionen

Performanceprobleme in Verbindung mit leerer MemTable

Ein Thema von schaumermal · begonnen am 15. Apr 2022 · letzter Beitrag vom 16. Apr 2022
Antwort Antwort
Delphi.Narium

Registriert seit: 27. Nov 2017
2.596 Beiträge
 
Delphi 7 Professional
 
#1

AW: Performanceprobleme in Verbindung mit leerer MemTable

  Alt 15. Apr 2022, 18:46
Das Close freigibt wäre mir neu. Nur beim Hauptformular einer Anwendung führt das Close zum beenden des Programmes. Bei allen anderen Formularen werden die geschlossen und können mit Show wieder angezeigt werden.

Mir erschließt sich nicht, warum die Form nicht in der DPR erstellen und dann mit Show anzeigen und mit Close schließen?

Warum immer eine neue Instanz bilden, wenn es auch ohne geht?
  Mit Zitat antworten Zitat
Benutzerbild von juergen
juergen

Registriert seit: 10. Jan 2005
Ort: Bönen
1.176 Beiträge
 
Delphi 11 Alexandria
 
#2

AW: Performanceprobleme in Verbindung mit leerer MemTable

  Alt 15. Apr 2022, 22:41
Folgender Code sollte dein Problem beheben:
Delphi-Quellcode:
BEGIN
  IF NOT Assigned( Form2 ) THEN
  BEGIN
    Form2 := TForm2.Create( NIL );
  END;
  Form2.showModal;
  FreeAndNil( Form2 );
END;
Jürgen
Indes sie forschten, röntgten, filmten, funkten, entstand von selbst die köstlichste Erfindung: der Umweg als die kürzeste Verbindung zwischen zwei Punkten. (Erich Kästner)
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.666 Beiträge
 
Delphi 12 Athens
 
#3

AW: Performanceprobleme in Verbindung mit leerer MemTable

  Alt 16. Apr 2022, 12:05
Ich persönlich habe mir angewöhnt, Formulare, die ausschließlich modal angezeigt werden sollen, aus der automatischen Erstellung auszuschließen und dann die globale Form-Variable zu löschen. Angezeigt werden diese dann so:
Delphi-Quellcode:
var
  frm: TSomeForm;
begin
  frm := TSomeForm.Create(nil);
  try
    if frm.ShowModal = mrOK then
      MachWasMitDerForm;
  finally
    frm.Free;
  end;
end;
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 05:22 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-2025 by Thomas Breitkreuz