Shell execute

[Dalai]

Ups, ich hab wohl in letzter Zeit zuviel AutoIt geschrieben . Dort gibt's bei der Funktion Format (bzw. StringFormat) keine eckigen Klammern für die Parameter.

@DomPerle:
Wenn du ein älteres Delphi hast, kannst du auch IncludeTrailingPathDelimiter durch IncludeTrailingBackslash ersetzen. Oder du lässt den Aufruf dieser Funktion weg und setzt die Backslashes/Pfadtrenner direkt im String. Eigentlich macht man letzteres aber nicht, denn Code sollte plattformunabhängig sein - ja, ich weiß, in meinem Beispiel ist auch noch ein Backslash enthalten, und die CMD gibt's auch nur unter Windows ... Aber das ist noch ein Grund, sich gegen die Kopiererei mittels CMD zu entscheiden, weil man das direkt mit Delphi machen kann.

Grüße
Dalai

[KodeZwerg]

Hier im Forum gefunden.
Falls es auch was anderes als kopieren per cmd.exe sein darf.

Delphi-Quellcode:

function TForm1.SHCopyFile(Handle: THandle; szSource, szDestination: TFileName): Boolean;
var
  ShellFileOperation: TSHFileOpStruct;
begin
  Result := True;
  try
    with ShellFileOperation do
    begin
      Wnd := Handle;
      wFunc := FO_COPY;
      pFrom := PChar(szSource);
      pTo := PChar(szDestination);
      // fFlags := FOF_FILESONLY OR FOF_NOCONFIRMMKDIR FOF_SIMPLEPROGRESS;
      fFlags := FOF_NOCONFIRMMKDIR;
      lpszProgressTitle := 'Dateien kopieren ...';
    end;
    SHFileOperation(ShellFileOperation);
  except
    Result := False;
  end;
end;

procedure TForm1.StartBitBtnClick(Sender: TObject);
begin
  if SHCopyFile(Handle, 'C:\Windows\*.*', 'D:\Windows.Copy\') then
  begin
    ShowMessage('Bingo ... und was funktioniert nicht?');
  end;
end;

[DomPerle]

Ich habe Delphi 5, das mir bisher für die kleinen Entwicklungen die ich mache vollkommen ausreicht. Ich benutze Delhi nur für Präsentationszwecke, also ListBox StringGrid Image etc.
Das eigentliche Programm, das die enzsprechenden Daten bereistellt, die in Delphi zur Anzeige kommen sollen schreibe ich in REXX.
Dadurch umgehe ich den nervigen Formalismus von Pascal.
Zunächst möchte ich mich bei allen bedanken, die mir Tips gegeben haben. Ich werde wohl doch den Vorschlag mit CopyFile versuchen, allerdings erhielt bei der Ausführung des Befehl die Meldung 'Zugriff verweigert' was daruaf hindeuten könnte, daß irgendeine der beiden Dateien nicht geclosed wurde.Nun suche ich erst einmal.
Vielen Dank Domperle