Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Dateien ausführem (https://www.delphipraxis.net/63304-dateien-ausfuehrem.html)

Barzi 16. Feb 2006 15:50


Dateien ausführem
 
Moin Leute!
Ich hab da mal ne Frage. Ich möchte mit Delphi etwas so programmieren das wenn man auf einen Button klikt eine Datei von der Festplatte oder von einer CD ausgeführt wird.
Kann mir da mal jemand ein Befehl nennen???
thx im voraus :bouncing4:

Matze 16. Feb 2006 15:53

Re: Dateien ausführem
 
Moin,

herzlich willkommen. Delphi-Referenz durchsuchenShellExecute wird dir weiterhelfen.

leddl 16. Feb 2006 15:53

Re: Dateien ausführem
 
Is dir beim Posten deines Beitrages der Button aufgefallen, bei dem steht: "Ähnliche Themen suchen?" :roll:
Das Thema wird so oft gefragt, einfach mal kurz die Suche bemühen, dann kommst du sofort zu deiner Antwort. ;)

PS: Herzlich willkommen in der DP :party: Laß dich durch meinen Post nich gleich abschrecken, sind nicht alle so unfreundlich wie ich :mrgreen:

//Edit: ZB findet man gleich auf der ersten Suchseite zu "Dateien ausführen" (der hats übrigens richtig geschrieben :zwinker:) das hier: http://www.delphipraxis.net/internal...ct.php?t=71811

:shock: Wie kommt übrigens Matzes Post vor meinen? Hab gar keinen roten Kasten bekommen. :(
Achso, das is übrigens einer von denen, die netter sind als ich :lol:

dahead 16. Feb 2006 15:55

Re: Dateien ausführem
 
Hier eine Beispiel für die Verwendung:

Delphi-Quellcode:
procedure ExplorerOpenFile(const aHandle: HWND; const aFilename: String);
begin
  ShellExecute(aHandle, 'open', PChar(aFilename), nil, nil, SW_SHOWNORMAL);
end;

// Beispielaufruf
ExplorerOpenFile(Self.Handle, 'calc.exe');
(da ich jetzt sehe, dass bereits zwei andere antworten da sind, habe ich meinen post auf das wesentliche gekürzt).

JWeis 16. Feb 2006 15:56

Re: Dateien ausführem
 
Delphi-Quellcode:
begin
  ShellExecute(Handle, 'open', Pchar('C:\test\text.txt'),'',nil,
    SW_SHOW);
end;
so kanst du die datei "text.txt" öffnen didie im verzeichnis "c:\test\" liegt

ps willkommen in der dp :dp:

ichbins 16. Feb 2006 15:59

Re: Dateien ausführem
 
@dahead:
das handle nervt doch nur...

Delphi-Quellcode:
procedure ExplorerOpenFile(const aFilename: String);
begin
  ShellExecute(0, 'open', PChar(aFilename), nil, nil, SW_SHOWNORMAL);
end;

// Beispielaufruf
ExplorerOpenFile('calc.exe');

dahead 16. Feb 2006 16:00

Re: Dateien ausführem
 
Zitat:

Zitat von ichbins
@dahead: das handle nervt doch nur...

Dich vielleicht, mich nicht.
Zitat:

Handle to a parent window. This window receives any message boxes that an application produces, such as error reporting.


Alle Zeitangaben in WEZ +1. Es ist jetzt 04:53 Uhr.

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