Inhalt eines Edit an die CMD übergeben?

[mirage228]

Zitat von mlspider:

Folgende Prozedur gibt leider eine Fehlermeldung beim compilieren:

Delphi-Quellcode:

procedure TForm1.Button8Click(Sender: TObject); 
begin 
ShellExecute(Handle,'open','cmd','/c '+'cacls "c:\System Volume Information" /E /G '+PChar(Edit3.Text)+':F',nil,SW_NORMAL); 
end;

Inkompatible Typen: 'String' und 'PAnsiChar'

Hi,

versuch es mal so:

ShellExecute(Handle, 'open', 'cmd',PChar('/c ' + 'cacls "c:\System Volume Information" /E /G ' + Edit3.Text + ':F'), nil, SW_SHOWNORMAL); mfG
mirage228