Forum: Object-Pascal / Delphi-Language
Delphi
by Sir Rufo,
10. Nov 2015
Da scheint deine Routine wohl Schwierigkeiten zu haben diese FRP-Datei C:\PFAD in C:\PFAD.pdf umzuwandeln.
Klingelt da jetzt was?
Forum: Object-Pascal / Delphi-Language
Delphi
by Sir Rufo,
10. Nov 2015
Nein, hilft so gar nicht ... denn im TSearchRec.Name steht der Dateiname ohne Pfadangabe :warn:
Forum: Object-Pascal / Delphi-Language
Delphi
by Sir Rufo,
9. Nov 2015
Wenn ich das richtig verstanden habe, dann willst du alle *.frp Dateien im Verzeichnis C:\WoAuchImmer umwandeln. Richtig?
procedure ConvertFrpToPdf( const AFilename: string );
begin
FrpToPdf( AFilename, ChangeFileExt( AFilename, '.pdf' ) );
end;
procedure DoIt;
begin
ProcessFiles( 'C:\WoAuchImmer', '*.frp', ConvertFrpToPdf );
Forum: Object-Pascal / Delphi-Language
Delphi
by Sir Rufo,
9. Nov 2015
Ich würde mir schon mal gar keine spezielle Routine dafür bauen, sondern eine generelle und diese dann verwenden. Dann wird auch der gesamte Code übersichtlicher.
Hier etwas zum Herumspielen
program Project1;
{$APPTYPE CONSOLE}
{$R *.res}
uses