Starte Programmer

Oppe i toppen af din Unit1.pas (eller hvad du nu har kaldt den), er der en sektion kaldet uses-listen, eller uses-klausulen. Der står bl.a. Windows, Forms, Messages etc. etc. Der skal du tilføje ShellApi.

Når du har gjort det kan du bruge følgende kommando til at åbne et program med

ShellExecute(handle,'open','C:\\Sti\\til\\fil.exe',nil,nil,0,SW_SHOW);

Du må lige skrive hvis det ikke virker da jeg ikke selv har tjekket det.

Jeg Forstår ikke helt hva du mener og Hvordan ind sætter jeg den kommando til en knap?

hey Jonas Der er en fejl i din Kommando

Din Kommando
"ShellExecute(handle,'open','C:\\Sti\\til\\fil.exe',nil,nil,0,SW_SHOW);"

Den Rigtige
"ShellExecute(handle,'open','C:\\Sti\\til\\fil.exe',nil,0,SW_SHOW);"

Først kal du have tilføjet ShellAPI. Her er min unit, når jeg har gjort det.

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ShellAPI;

type
  TForm1 = class(TForm)
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}


end.

Læg mærke til:

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ShellAPI;

Så laver du en knap, og skriver det som Mikkel skrev

Du kan også bruge en kode, uden ShellAPI, den ser sådan ud:

Winexec('c:\\Program.exe',1);