Einzelnen Beitrag anzeigen

Ferber

Registriert seit: 9. Mär 2005
Ort: Wien Umgebung
155 Beiträge
 
Delphi 2006 Architect
 
#2

Re: Programm zu Programm Kommunikation mit AsyncPro

  Alt 23. Jan 2006, 11:24
Hi !
Also eine Möglichkeit wäre:
Die Verzeichnisstruktur des einen Rechners zu scannen und in eine Datei zu schreiben,
diese an den anderen Rechner zu schicken, und dort die Verzeichnisstruktur unter einem Unterverzeichnis zu erzeugen.
Dann kann man mit dem Explorer beide Verzeichnisstrukturen vergleichen.
Eine Kompo zum Verzeichnis scannen findest du hier PathParser
Testen mit einem Memo oder Richedit, Ereignis OnPathEnter verwenden.
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
  PathParser1.Execute;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  Richedit1.Lines.SaveToFile('C:\Dir.txt');
end;

procedure TForm1.PathParser1PathEnter(Search: TSearchRec; Path: String; var DoThis: Boolean);
begin
  Richedit1.Lines.Add(Path);
end;
Vielleicht ists brauchbar
Otto
  Mit Zitat antworten Zitat