Einzelnen Beitrag anzeigen

rebugger

Registriert seit: 29. Okt 2002
Ort: Auerbach
190 Beiträge
 
Delphi 7 Professional
 
#10
  Alt 2. Nov 2002, 10:25
OK, hab ein bißchen was zusammengebastelt:
Code:
Uses ShellAPI;

procedure TMain.FormCreate(Sender: TObject);
var
  PHPstring: TStringlist;
  PHPoutput: String;
begin
  PHPpath := 'php.exe';
  PHPfile := 'index.php';

  PHPstring.LoadFromFile(PHPfile);
  PHPoutput := '>c:\ausgabe.htm';
  PHPstring.Text := StringReplace(PHPstring.Text, #13#10, '', [rfReplaceAll]);

  ShellExecute(0, nil, PHPpath + ' ' + PHPstring[0] + ' ' + PHPoutput, nil, nil, SW_SHOW);

  WebBrowser.Navigate('c:\ausgabe.htm');
end;
Nur leider sagt er bei ShellExecute:
[Fehler] main_unit.pas(89): Inkompatible Typen: 'String' und 'PChar'
  Mit Zitat antworten Zitat