OpenDialog erscheint nicht

[weinberger]

Jetzt dachte ich ich habs. Statt uses... Forms, hab ich auf uses... VCL.Forms, geändert. Hat auch nix gebracht

[himitsu]

Forms = VCL.Forms , wenn VCL in den Namespaces des Projekts definiert ist (ansonsten findet Delphi Forms nichts, da es nur eine vcl.forms.pas und eine fmx.forms.pas gibt)

Hast du einen vordefinierten InitialPath, oder gibst du einen FileName (inkl. Path) rein?
Wenn der Pfad nicht existiert, dann öffnet Windows den Dialog nicht (ohne Fehlermeldung ... das Programm denkt du hättest auf Abbrechen gedrückt)

[weinberger]

Zitat von himitsu:

Forms = VCL.Forms , wenn VCL in den Namespaces des Projekts definiert ist (ansonsten findet Delphi Forms nichts, da es nur eine vcl.forms.pas und eine fmx.forms.pas gibt)

Hast du einen vordefinierten InitialPath, oder gibst du einen FileName (inkl. Path) rein?
Wenn der Pfad nicht existiert, dann öffnet Windows den Dialog nicht (ohne Fehlermeldung ... das Programm denkt du hättest auf Abbrechen gedrückt)

Ich habe einen vordefinierten Pfad z.Bsp. D:\

[Freyr77]

Wenn ich das jetzt richtig gelesen habe... wieso setzt du die OpenDialoge nicht nochmal neu aufs Design und gibst ihnen die alten Namen? Ist dir damit nicht schneller geholfen?

[Klaus01]

.. oder erstellst sie zur Laufzeit?

Grüße
Klaus

[weinberger]

Zitat von Klaus01:

.. oder erstellst sie zur Laufzeit?

Grüße
Klaus

Das versuch ich gleich mal

[weinberger]

Zitat von Freyr77:

Zitat von weinberger:

Zitat von Freyr77:

Wenn ich das jetzt richtig gelesen habe... wieso setzt du die OpenDialoge nicht nochmal neu aufs Design und gibst ihnen die alten Namen? Ist dir damit nicht schneller geholfen?

Hab ich scho versucht. Hat nix gebracht leider

Was ist denn nicht gegangen? Das ist ja eigentlich fast nicht möglich, wenn er die alten Komponenten mit Namen wieder hat sollte der Code eigentlich laufen.
Das mit der Laufzeit von Klaus01 kann natürlich auch dein Problem lösen...

Zitat von weinberger:

Zitat von Klaus01:

.. oder erstellst sie zur Laufzeit?

Grüße
Klaus

Das versuch ich gleich mal

Code:

procedure TMain.SpeedButton1Click(Sender: TObject);
var
Open: TOpenDialog;
begin
Open := TOpenDialog.Create(Self);
Open.InitialDir := 'D:\Tools';
Open.Execute();
end;

hat auch nicht geklappt. Ich werd noch verrückt

[weinberger]

Zitat von Freyr77:

Wenn ich das jetzt richtig gelesen habe... wieso setzt du die OpenDialoge nicht nochmal neu aufs Design und gibst ihnen die alten Namen? Ist dir damit nicht schneller geholfen?

Hab ich schon versucht. Hat nix gebracht leider

[Freyr77]

Zitat von weinberger:

Zitat von Freyr77:

Wenn ich das jetzt richtig gelesen habe... wieso setzt du die OpenDialoge nicht nochmal neu aufs Design und gibst ihnen die alten Namen? Ist dir damit nicht schneller geholfen?

Hab ich scho versucht. Hat nix gebracht leider

Was ist denn nicht gegangen? Das ist ja eigentlich fast nicht möglich, wenn er die alten Komponenten mit Namen wieder hat sollte der Code eigentlich laufen.
Das mit der Laufzeit von Klaus01 kann natürlich auch dein Problem lösen...

[taveuni]

Hast Du irgendwo in der Initialisierung CoInitialize drin? Füge mal ComObj in deine USES Liste in der dpr.