Einzelnen Beitrag anzeigen

Benutzerbild von Uncle Cracker
Uncle Cracker

Registriert seit: 30. Mär 2003
Ort: Freital
694 Beiträge
 
#1

Programm eine Datei übergeben

  Alt 22. Mai 2003, 20:01
Code:
procedure TForm1.Button1Click(Sender: TObject);
begin
  if OpenDialog1.Execute then EditFile.Text:=OpenDialog1.Filename;
  end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  ShellExecute(0, Nil, PChar('konv.exe'), Pchar(''), Pchar(''), SW_NORMAL);
  ShowMessage('NCG-Datei wurde erstellt')
End;
So sieht der Code aus. Also man öffnet eine Datei, der Speicherort der Datei wird dann in einem Editfeld angezeigt. Nun würde ich gern wissen wie man díese Datei mit konv.exe im 2. Pchar öffnet. Mit dem Befehl
Code:
  ShellExecute(0, Nil, PChar('konv.exe'), Pchar(EditFile), Pchar(''), SW_NORMAL);
geht's nämlich nicht.
  Mit Zitat antworten Zitat