![]() |
Re: FileOpen
Wenn die exe im Suchpfad von Windows liegt reicht der Name sonst mit kompletten Pfad. Neben Exev kann man auch Dateien mit registrierten Endungen angeben; es werden dann die verknüpften Anwendungen gestartet.
|
Re: FileOpen
sry aber ich brauche noch etwas erklärung
|
Re: FileOpen
Und wozu genau?
|
Re: FileOpen
Reaper, du kannst hier gerne konkrete Fragen stellen, aber bitte erwarte nicht dass dir hier alles vorgekaut wird. Momentan weiss keiner was genau du machen willst bzw. bei welchem Problem du gerade "hängst".
Wenn ich meine Glaskugel raushole, dann vermute ich dass du ShellExecute brauchen wirst und dass du die volle Pfadangabe der Programme mitreinhängen wirst müssen, so wie das hier schon gepostet wurde. |
DP-Maintenance
Dieses Thema wurde von "Matze" von "Programmieren allgemein" nach "Sonstige Fragen zu Delphi" verschoben.
Delphi-Frage |
Re: FileOpen
Also! Entschuldigung für meine Ungenauigkeit!
Also nochmal. Aufgabe des Programms: Aus einem edit soll ein Wort ausgelesen werden. Dieses Wort sagt dem Programm, dass eine Datei geöffnen bzw. eine Anwendung ausgeführt werden soll. Sodass ich ein Programm habe, von dem ich viele häufig benutzte Programme ausführen kann bzw dateien öffnen kann. Man gibt also z.B. in das edit firefox ein und er startet firefox... Mein Problem ist nun, dass ich nicht weiß, wie ich schreibe, dass etwas geöffnet / ausgeführt wird. Ich weiß nicht wie es geht, aber vll könnte es ja so aussehen:
Delphi-Quellcode:
if edit1.text = 'Name des Programms/ Datei'
then ...öffne die Datei/ Strarte das Programm...; |
Re: FileOpen
Ich würde mir dazu eine Favoritenliste erstellen. Da kommt dann der Name und der komplette Pfad rein (also quasi ein Alias). Diese Aliase könnte man dann schön in einer ComboBox/Listbox oder so darstellen.
|
Re: FileOpen
Für den Beginn (!) würde ich es so machen:
Delphi-Quellcode:
Beachte dass du für ShellExecute in der 'uses' shellapi hinzufügen musst, sonst findet der Compiler den Befehl nicht.
var befehl:string;
begin if edit1.text = 'firefox' then befehl := 'Pfad zu Firefox'; if edit1.text = 'delphi' then befehl := 'Pfad zu Delphi'; ... ShellExecute(Handle, nil, PChar(befehl), nil, nil, SW_SHOW); end; Wenn dies einmal funktioniert wäre es sicher schöner/einfacher wenn du dann auf eine Combobox umsteigst. Dort kannst du die Einträge dann komfortabel auswählen. :zwinker: |
Re: FileOpen
Geht doch so schon unter jeder Windows-Version.
Start -> Ausführen... Noch schicker wurde es mit Vista/Win 7 fertig :mrgreen: |
Re: FileOpen
[WIN]-R geht schneller ;)
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 01:47 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 by Thomas Breitkreuz