OpenDialog erscheint nicht

[DeddyH]

Aus dem Ausgangspost (leicht zu übersehen):

Zitat:

- Ein kleines Testprojekt neu erstellt => OpenDialog funktioniert einwandfrei

Es muss also wahrscheinlich etwas mit dem Projekt zu tun haben.

[Dalai]

Ups, hab ich glatt übersehen. Was passiert denn beim Durchsteppen mit dem Debugger durch die fragliche Funktion, in der der OpenDialog gerufen wird?

Grüße
Dalai

[taveuni]

Gibt es einen speziellen Grund weshalb das Datamodule vor dem Mainformular created wird? Kannst Du das mal drehen? Ansonsten musst Du eins nach dem anderen auskommentieren bis Du den Schuldigen gefunden hast.

[hoika]

Hallo,

1. oder anders rum,
das neue Projekt nehmen und alles nach und nach reinnehmen.

2. Es könnte an der dprj liegen, die mal woanders hin verschieben,

[nahpets]

Noch 'ne etwas 'blödere' Idee:

Setze in der DPR mal das Hauptformular nach vorne bzw. das TDataModul1 nach ganz hinten:

Delphi-Quellcode:

begin
  Application.Initialize;
  Application.Title := 'Tagesblatt';
  Application.CreateForm(TMain, Main);
  Application.CreateForm(TAbwesenheit, Abwesenheit);
  Application.CreateForm(TGeplUrlAnz, GeplUrlAnz);
  Application.CreateForm(TGepl_Urlaub, Gepl_Urlaub);
  Application.CreateForm(TAufMich, AufMich);
  Application.CreateForm(TPasswordInputBox, PasswordInputBox);
  Application.CreateForm(TEintrag, Eintrag);
  Application.CreateForm(TDataModule1, DataModule1);
  Application.Run;
end.

Grund:

Das erste Formular in der DPR wird zum Application.MainForm. Das ist bei Dir aber ein Datenmodule. Da dieses nicht angezeigt wird, könnte es sein, dass Deinem Programm hier das Hauptformular als anzeigbares Forumlar fehlt und damit der etwas irritierende Seiteneffekt ohne jede Fehlermeldung auftritt.

[Bjoerk]

Ich hab mir jetzt nich den ganzen Thread durchgelesen.. Schon probiert?
  if OpenDialog.Execute(Self.Handle) then

[weinberger]

Zitat von nahpets:

Noch 'ne etwas 'blödere' Idee:

Setze in der DPR mal das Hauptformular nach vorne bzw. das TDataModul1 nach ganz hinten:

Delphi-Quellcode:

begin
  Application.Initialize;
  Application.Title := 'Tagesblatt';
  Application.CreateForm(TMain, Main);
  Application.CreateForm(TAbwesenheit, Abwesenheit);
  Application.CreateForm(TGeplUrlAnz, GeplUrlAnz);
  Application.CreateForm(TGepl_Urlaub, Gepl_Urlaub);
  Application.CreateForm(TAufMich, AufMich);
  Application.CreateForm(TPasswordInputBox, PasswordInputBox);
  Application.CreateForm(TEintrag, Eintrag);
  Application.CreateForm(TDataModule1, DataModule1);
  Application.Run;
end.

Grund:

Das erste Formular in der DPR wird zum Application.MainForm. Das ist bei Dir aber ein Datenmodule. Da dieses nicht angezeigt wird, könnte es sein, dass Deinem Programm hier das Hauptformular als anzeigbares Forumlar fehlt und damit der etwas irritierende Seiteneffekt ohne jede Fehlermeldung auftritt.

Danke soeben versucht. Bringt aber leider auch nix

[weinberger]

Zitat von Bjoerk:

Ich hab mir jetzt nich den ganzen Thread durchgelesen.. Schon probiert?
  if OpenDialog.Execute(Self.Handle) then

Auch versucht ohne erfolg

[taveuni]

O.K. Hast Du wie oben schon erwähnt schon mal die *.dproj umbenannt/gelöscht und nur die *.dpr geladen?

Und noch mal die Frage: Ist es bei Dir auch so dass beim Aufruf von TOpenDlg das Programm dann "blockiert" ist? Wie wenn der Dialog offen wäre - einfach nicht sichtbar? Oder passiert überhaupt nichts?

[weinberger]

Zitat von taveuni:

O.K. Hast Du wie oben schon erwähnt schon mal die *.dproj umbenannt/gelöscht und nur die *.dpr geladen?

Und noch mal die Frage: Ist es bei Dir auch so dass beim Aufruf von TOpenDlg das Programm dann "blockiert" ist? Wie wenn der Dialog offen wäre - einfach nicht sichtbar? Oder passiert überhaupt nichts?

Das erste hab ich auch schon ohne Erfolg probiert.

Das Programm ist kurzzeitg "blockiert". Wie wenn der Dialog offen wäre - einfach nicht sichtbar. Mit Sanduhr danach wieder bedienbar.