Registriert seit: 11. Feb 2003
Ort: Trittau
3.538 Beiträge
Delphi XE Professional
|
5. Jul 2003, 11:41
Vielleicht so:
NewFile:= PfadName + ExtractFileName(FileName)+Form1.Query1.FieldByName('Name').AsString+'.doc';
Vorher solltest Du vielleicht mit DirectoryExists überprüfen, ob das Verzeichnis existiert und gegebenenfalls mit CreateDir erstellen
|