Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Programm öffnen (https://www.delphipraxis.net/140503-programm-oeffnen.html)

jens106 19. Sep 2009 13:53


Programm öffnen
 
Hi,

Ich habe einen Button erstellt, der wenn man auf ihn drückt ein Programm öffnet. Momentan muss diese Datei aber leider im selben Ordner sein wie auch die .exe des Programs das ich momentan erstelle.

Frage:
Wie kann ich ein Feld erstellen wo ich einen Pfad auswählen kann, indem sich eine .exe befindet und man diese öffnet.

Praktisch wie die Öffnen Funktion bei Paint nur das ich halt keine Bilddateien sondern .exe-Dateien auswählen möchte.


Ich hoffe ihr wisst was gemeint ist und könnt mir helfen.

gruß jens106

dominikkv 19. Sep 2009 13:55

Re: Programm öffnen
 
Schau dir mal den Hier im Forum suchenTOpenDialog an.

Vasco da Gama 19. Sep 2009 13:59

Re: Programm öffnen
 
Hi, du könntest ja einen Hier im Forum suchenOpenDialog verwenden
Der ist wie der öffnen Dialog bei paint und co.

Über
Delphi-Quellcode:
if OpenDialog1.Execute then
begin

end;
kannst du ihn aufrufen.

dann hat er sehr praktische eigenschaften, wie FileName

Und direkt über den OBjektInspektor kannst du bei Filter einstellen, dass du nur exen möchtest

ich hoffe ich konnte dir helfen,

mfG

EDIT: Schade zu langsam :dp:

jens106 19. Sep 2009 15:13

Re: Programm öffnen
 
hmmm. wie muss dass denn dann aus sehen

Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
begin
if OpenDialog1.Execute then
begin
      ShellExecute(handle,PChar('open'),PChar('wordpad.exe'),PChar(''),PChar(ExtractFilePath(Application.Exename)),SW_SHOW);
end;
so funktioniert das nicht

jens106 19. Sep 2009 15:18

Re: Programm öffnen
 
sorry leute habe ein wenig zu voreilig gepostet.

Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
begin
      if OpenDialog1.Execute then
      ShellExecute(handle,PChar('open'),PChar('silkroad.exe'),PChar(''),PChar(ExtractFilePath(Application.Exename)),SW_SHOW);
end;
so funktioniert das alles aber wie kann ich jetzt in dem objektinspektor eingeben, dass ich nur .exen zulassen will?

ich habe das jetzt so hinbekommen das in dem fenster zwar unten bei Dateitypen *.exe steht aber es werden alle Dateien im Browser angezeigt

Rakshasa 19. Sep 2009 15:19

Re: Programm öffnen
 
Schau Dir mal die Eigenschaft "Filter" des TOpenDialogs an.

DeddyH 19. Sep 2009 15:20

Re: Programm öffnen
 
Schau mal in der Delphi-Hilfe zu den Optionen und Filtern eines TOpenDialogs.

jens106 19. Sep 2009 15:25

Re: Programm öffnen
 
habe ich schon. ich habe meinen thread editiert

DeddyH 19. Sep 2009 15:31

Re: Programm öffnen
 
Wie sieht der Filter denn aus?

jens106 19. Sep 2009 15:36

Re: Programm öffnen
 
Liste der Anhänge anzeigen (Anzahl: 1)
so sieht der aus


Alle Zeitangaben in WEZ +1. Es ist jetzt 19:01 Uhr.
Seite 1 von 2  1 2      

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz