Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: Zugang zu modaler Form verhindern

    Delphi
    by rbest, 19. Mär 2004
  hi maximov, wie gesagt, mit deinem Vorschlag hab ich's hingekriegt. :cheers: Nur noch der Vollständigkeit halber:
  function TModalForm.ShowModal: Integer;
  begin
  if IchWillKeineForm
  then ModalResult := mrCancel
  else result := inherited showModal;
  end;
  bingt bei mir eine Compiler-Warnung, aber nach Änderung von ModalResult in Result meckert sie nicht mehr.
  Besten Dank allen...
• Forum: Object-Pascal / Delphi-Language

  Re: Zugang zu modaler Form verhindern

    Delphi
    by rbest, 17. Mär 2004
  @maximov
  was gemacht wird? Zum Bleistift eine Mitarbeiter-Code-Eingabe, bei falschem Code Abbruch. Oder ein SQL-Select, wenn dieser kein Ergebnis liefert, soll die Form nicht auftauchen.
• Forum: Object-Pascal / Delphi-Language

  Re: Zugang zu modaler Form verhindern

    Delphi
    by rbest, 16. Mär 2004
  @maximov
  exactly. Aber eins verstehe ich trotzdem nicht. Nach showmodal wird auch FormShow ausgeführt. Warum funzt das Close dort nicht?
• Forum: Object-Pascal / Delphi-Language

  Re: Zugang zu modaler Form verhindern

    Delphi
    by rbest, 16. Mär 2004
  @r_kerber
  Klar, das wär das näxte gewesen. Aber die Macht der Gewohnheit - ich komm von FoxPro, dort gibt es eine Init-Methode, die bei Rückgabe von False den Aufbau der Maske verhindert. So brauche ich eine Prüfung, die ja jedesmal zu dieser Form gehört, nur an einer Stelle.
• Forum: Object-Pascal / Delphi-Language

  Zugang zu modaler Form verhindern

    Delphi
    by rbest, 16. Mär 2004
  Hi Kollegen,
  wie kann ich verhindern, daß eine modale Form angezeigt wird, wenn eine bestimmte Bedingung nicht zutrifft. Habe es folgendermassen versucht:
  dlgPzDruck := TfrmPzDruck.Create(self);
  dlgPzDruck.ShowModal;
  Im FormCreate habe ich dann in etwa solchen Code:
  if IchWillKeineForm then
  begin
  ModalResult := mrCancel;
  Close; // release führt zum totalen Hänger
  end;