Forum: Object-Pascal / Delphi-Language
Delphi
by MARGERSCH,
31. Aug 2005
Habe jetzt ein "ChDir" eingebaut. Damit funktioniert's
Der gesamte Code nach Aufruf des Buttons lautet :
procedure TfmBackup.sbBackupDirClick(Sender: TObject);
begin
sBackupDir:= lblBackupDir.Caption;
ChDir(sBackupDir); // neu eingefügt, damit funktioniert's
if SelectDirectory(sBackupDir, , HelpContext) then
if sBackupDir <> lblBackupDir.Caption then
...
Forum: Object-Pascal / Delphi-Language
Delphi
by MARGERSCH,
31. Aug 2005
Hallo,
ich benutze zur Auswahl von Verzeichnissen auf einem Formular zweimal das Dialogfeld
Verzeichnis auswählen (die zweite Syntax von SelectDirectory).
Beide Aufrufe erfolgen durch eine Schaltfläche (TSpeedButton). Einmal wird ein zu
sicherndes Datenverzeichnis (Voreinstellung : C:\Data, Var.: sDataDir) und einmal ein
Sicherungsverzeichnis (Voreinstellung : C:\Backup, Var....